diff options
Diffstat (limited to 'compiler/simplCore/FloatOut.lhs')
| -rw-r--r-- | compiler/simplCore/FloatOut.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/simplCore/FloatOut.lhs b/compiler/simplCore/FloatOut.lhs index e6195e93cd..bcd118a12c 100644 --- a/compiler/simplCore/FloatOut.lhs +++ b/compiler/simplCore/FloatOut.lhs @@ -114,7 +114,7 @@ Well, maybe. We don't do this at the moment. floatOutwards :: FloatOutSwitches -> DynFlags -> UniqSupply - -> [CoreBind] -> IO [CoreBind] + -> CoreProgram -> IO CoreProgram floatOutwards float_sws dflags us pgm = do { |