diff options
| -rw-r--r-- | compiler/simplStg/StgLiftLams/LiftM.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/compiler/simplStg/StgLiftLams/LiftM.hs b/compiler/simplStg/StgLiftLams/LiftM.hs index c9e520ae8b..c024956a66 100644 --- a/compiler/simplStg/StgLiftLams/LiftM.hs +++ b/compiler/simplStg/StgLiftLams/LiftM.hs @@ -47,7 +47,6 @@ import Control.Monad.Trans.RWS.Strict ( RWST, runRWST ) import qualified Control.Monad.Trans.RWS.Strict as RWS import Control.Monad.Trans.Cont ( ContT (..) ) import Data.ByteString ( ByteString ) -import Data.List ( foldl' ) -- | @uncurry 'mkStgBinding' . 'decomposeStgBinding' = id@ decomposeStgBinding :: GenStgBinding pass -> (RecFlag, [(BinderP pass, GenStgRhs pass)]) |