fix stylish

Author: michaelpj

plutus-core/plutus-ir/src/PlutusIR/Compiler.hs

@@ -41,8 +41,8 @@ import           PlutusIR.Error
 import qualified PlutusIR.Transform.Beta            as Beta
 import qualified PlutusIR.Transform.DeadCode        as DeadCode
 import qualified PlutusIR.Transform.Inline          as Inline
+import qualified PlutusIR.Transform.LetFloat        as LetFloat
 import qualified PlutusIR.Transform.LetMerge        as LetMerge
-import qualified PlutusIR.Transform.LetFloat     as LetFloat
 import qualified PlutusIR.Transform.NonStrict       as NonStrict
 import qualified PlutusIR.Transform.RecSplit        as RecSplit
 import           PlutusIR.Transform.Rename          ()

plutus-core/plutus-ir/src/PlutusIR/Transform/LetFloat.hs

@@ -158,9 +158,9 @@ type Marks = Scope
 -- 2) to calculate freevars/tyvars of a let.
 -- 2) to store it in the 'FloatTable'.
 data BindingGrp tyname name uni fun a = BindingGrp {
-    _bgAnn  :: a,
-    __bgRec :: Recursivity,
-    _bgBindings   :: NE.NonEmpty (Binding tyname name uni fun a)
+    _bgAnn      :: a,
+    __bgRec     :: Recursivity,
+    _bgBindings :: NE.NonEmpty (Binding tyname name uni fun a)
     }
 makeLenses ''BindingGrp
 

plutus-core/plutus-ir/test/TransformSpec.hs

@@ -18,8 +18,8 @@ import           PlutusIR.Parser
 import qualified PlutusIR.Transform.Beta            as Beta
 import qualified PlutusIR.Transform.DeadCode        as DeadCode
 import qualified PlutusIR.Transform.Inline          as Inline
+import qualified PlutusIR.Transform.LetFloat        as LetFloat
 import qualified PlutusIR.Transform.LetMerge        as LetMerge
-import qualified PlutusIR.Transform.LetFloat     as LetFloat
 import qualified PlutusIR.Transform.NonStrict       as NonStrict
 import qualified PlutusIR.Transform.RecSplit        as RecSplit
 import           PlutusIR.Transform.Rename          ()