pin fourmolu version in CI

Fix new version fourmolu warnings
Lamagraph · Sep 13, 2024 · 4f1e47f · 4f1e47f
1 parent 26421f4
commit 4f1e47f
Show file tree

Hide file tree

Showing 2 changed files with 10 additions and 8 deletions.
diff --git a/.github/workflows/fourmolu.yaml b/.github/workflows/fourmolu.yaml
@@ -12,4 +12,4 @@ jobs:
       - name: Run fourmolu
         uses: haskell-actions/run-fourmolu@v10
         with:
-          version: "latest"
+          version: "0.15.0.0"
diff --git a/lamagraph-core/src/Core/Node.hs b/lamagraph-core/src/Core/Node.hs
@@ -49,9 +49,9 @@ markAllInnerEdges nodes =
       markPort port =
         Port
           (_targetAddress port)
-          ( boolToBit $
-              bitToBool (_edgeIsVisited port)
-                || isJust (elemIndex (Just (_targetAddress port)) addressesOfLoadedNodes)
+          ( boolToBit
+              $ bitToBool (_edgeIsVisited port)
+              || isJust (elemIndex (Just (_targetAddress port)) addressesOfLoadedNodes)
           )
       markPorts loadedNode =
         LoadedNode
@@ -68,8 +68,10 @@ isActive ::
   LoadedNode numberOfPorts ->
   Bool
 isActive leftNode rightNode =
-  leftNodePrimaryPortAddress == _originalAddress rightNode
-    && rightNodePrimaryPortAddress == _originalAddress leftNode
+  leftNodePrimaryPortAddress
+    == _originalAddress rightNode
+    && rightNodePrimaryPortAddress
+    == _originalAddress leftNode
  where
   leftNodePrimaryPortAddress = _targetAddress (_primaryPort $ _node leftNode)
   rightNodePrimaryPortAddress = _targetAddress (_primaryPort $ _node rightNode)
@@ -85,8 +87,8 @@ selectAddressToLoad loadedNode =
   if isPortToLoad loadedNode primaryPort
     then Just $ _targetAddress primaryPort
     else
-      foldl (\s mbPort -> mbPort >>= addressToLoad s) Nothing $
-        _secondaryPorts node
+      foldl (\s mbPort -> mbPort >>= addressToLoad s) Nothing
+        $ _secondaryPorts node
  where
   node = _node loadedNode
   primaryPort = _primaryPort node