Fix build on darwin
authorÖmer Sinan Ağacan <omeragacan@gmail.com>
Mon, 26 Nov 2018 09:27:59 +0000 (12:27 +0300)
committerÖmer Sinan Ağacan <omeragacan@gmail.com>
Mon, 26 Nov 2018 09:27:59 +0000 (12:27 +0300)
CPP error introduced with b2950e0

compiler/simplStg/StgLiftLams/Transformation.hs

index 8c4d616..7b37bac 100644 (file)
@@ -102,7 +102,7 @@ liftRhs
   -> LlStgRhs
   -> LiftM OutStgRhs
 liftRhs mb_former_fvs rhs@(StgRhsCon ccs con args)
-  = ASSERT2 ( isNothing mb_former_fvs, text "Should never lift a constructor" $$ ppr rhs)
+  = ASSERT2(isNothing mb_former_fvs, text "Should never lift a constructor" $$ ppr rhs)
     StgRhsCon ccs con <$> traverse liftArgs args
 liftRhs Nothing (StgRhsClosure _ ccs upd infos body) = do
   -- This RHS wasn't lifted.