diff options
| author | Brian Wignall <brianwignall@gmail.com> | 2019-11-08 16:21:03 -0500 |
|---|---|---|
| committer | Brian Wignall <brianwignall@gmail.com> | 2019-11-23 19:04:52 -0500 |
| commit | 7b4c7b75be351e9b6a40093cbccab728dd89064f (patch) | |
| tree | 01126ac3823a1f1b197ac1865d7bc628eb4676a5 /compiler/simplCore | |
| parent | c14b723f7fa24b4db0b561f9ab0d6e0f4261fd2f (diff) | |
| download | haskell-7b4c7b75be351e9b6a40093cbccab728dd89064f.tar.gz | |
Fix typos
Diffstat (limited to 'compiler/simplCore')
| -rw-r--r-- | compiler/simplCore/SetLevels.hs | 2 | ||||
| -rw-r--r-- | compiler/simplCore/SimplUtils.hs | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/compiler/simplCore/SetLevels.hs b/compiler/simplCore/SetLevels.hs index da1e31ea6f..223bbcfa97 100644 --- a/compiler/simplCore/SetLevels.hs +++ b/compiler/simplCore/SetLevels.hs @@ -777,7 +777,7 @@ Exammples: It's controlled by a flag (floatConsts), because doing this too early loses opportunities for RULES which (needless to say) are important in some nofib programs (gcd is an example). [SPJ note: -I think this is obselete; the flag seems always on.] +I think this is obsolete; the flag seems always on.] Note [Floating join point bindings] ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ diff --git a/compiler/simplCore/SimplUtils.hs b/compiler/simplCore/SimplUtils.hs index 5073bbff99..e8829c845c 100644 --- a/compiler/simplCore/SimplUtils.hs +++ b/compiler/simplCore/SimplUtils.hs @@ -558,7 +558,7 @@ discarding the arguments to zip. Usually this is fine, but on the LHS of a rule it's not, because 'as' and 'bs' are now not bound on the LHS. -This is a pretty pathalogical example, so I'm not losing sleep over +This is a pretty pathological example, so I'm not losing sleep over it, but the simplest solution was to check sm_inline; if it is False, which it is on the LHS of a rule (see updModeForRules), then don't make use of the strictness info for the function. |