Fix fourmolu formatting

FPtje · Jun 16, 2024 · 3135ff2 · 3135ff2
1 parent 4c672c5
commit 3135ff2
Show file tree

Hide file tree

Showing 2 changed files with 24 additions and 22 deletions.
diff --git a/src/GLua/ASTInstances.hs b/src/GLua/ASTInstances.hs
@@ -1,5 +1,5 @@
-{-# OPTIONS_GHC -fno-warn-orphans #-}
 {-# LANGUAGE TemplateHaskell #-}
+{-# OPTIONS_GHC -fno-warn-orphans #-}
 
 -- | Contains class instances and functions related to AST These are not put
 -- in the AST.ag file as importing an AG file would copy the instance
@@ -11,23 +11,25 @@ import GLua.EncodingOptions (encodingOptions)
 
 import Data.Aeson.TH (deriveJSON)
 
-$(concat <$> mapM (deriveJSON encodingOptions)
-  [ ''AST
-  , ''Block
-  , ''MStat
-  , ''MElse
-  , ''MElseIf
-  , ''Stat
-  , ''AReturn
-  , ''FuncName
-  , ''PrefixExp
-  , ''PFExprSuffix
-  , ''MExpr
-  , ''Expr
-  , ''Args
-  , ''Field
-  , ''FieldSep
-  , ''BinOp
-  , ''UnOp
-  ]
-  )
+$( concat
+    <$> mapM
+      (deriveJSON encodingOptions)
+      [ ''AST
+      , ''Block
+      , ''MStat
+      , ''MElse
+      , ''MElseIf
+      , ''Stat
+      , ''AReturn
+      , ''FuncName
+      , ''PrefixExp
+      , ''PFExprSuffix
+      , ''MExpr
+      , ''Expr
+      , ''Args
+      , ''Field
+      , ''FieldSep
+      , ''BinOp
+      , ''UnOp
+      ]
+ )
diff --git a/src/GLua/EncodingOptions.hs b/src/GLua/EncodingOptions.hs
@@ -1,7 +1,7 @@
 -- | Json encoding options
 module GLua.EncodingOptions where
 
-import qualified Data.Aeson    as Aeson
+import qualified Data.Aeson as Aeson
 
 -- | Default glualint json encoding options
 encodingOptions :: Aeson.Options