diff options
Diffstat (limited to 'compiler/simplCore/FloatOut.hs')
| -rw-r--r-- | compiler/simplCore/FloatOut.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/simplCore/FloatOut.hs b/compiler/simplCore/FloatOut.hs index 6cb21f9470..0be1a9e0ad 100644 --- a/compiler/simplCore/FloatOut.hs +++ b/compiler/simplCore/FloatOut.hs @@ -47,7 +47,7 @@ The Big Main Idea is: a non-one-shot value lambda, and hence may be shared. -To achieve this we may need to do two thing: +To achieve this we may need to do two things: a) Let-bind the sub-expression: @@ -103,7 +103,7 @@ It turns out that this generates a subexpression of the form @ \deq x ys -> let eq = eqFromEqDict deq in ... @ -vwhich might usefully be separated to +which might usefully be separated to @ \deq -> let eq = eqFromEqDict deq in \xy -> ... @ |