diff options
author | Krzysztof Gogolewski <krzysztof.gogolewski@tweag.io> | 2021-01-29 02:16:40 +0100 |
---|---|---|
committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-01-29 23:10:35 -0500 |
commit | bd0b27267985c6c3482578ccf71a3cab9a1d7b12 (patch) | |
tree | 757d2a480bab8329d290f5691f159b02ef13df66 /compiler/GHC/Driver/Session.hs | |
parent | 3b8235334b7838013c9e955db3e7762a1c7fef43 (diff) | |
download | haskell-bd0b27267985c6c3482578ccf71a3cab9a1d7b12.tar.gz |
Fix parsing of -fstg-lift-lams-non-rec
-fstg-lift-lams-rec-* and -fstg-lift-lams-non-rec-* were setting the same
field.
Fix manual: -fstg-lift-lams-non-rec-args is disabled by
-fstg-lift-lams-non-rec-args-any, there's no -fno-stg-lift-*.
Diffstat (limited to 'compiler/GHC/Driver/Session.hs')
-rw-r--r-- | compiler/GHC/Driver/Session.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/GHC/Driver/Session.hs b/compiler/GHC/Driver/Session.hs index b312747989..c63301fd71 100644 --- a/compiler/GHC/Driver/Session.hs +++ b/compiler/GHC/Driver/Session.hs @@ -2820,9 +2820,9 @@ dynamic_flags_deps = [ , make_ord_flag defFlag "fstg-lift-lams-rec-args-any" (noArg (\d -> d { liftLamsRecArgs = Nothing })) , make_ord_flag defFlag "fstg-lift-lams-non-rec-args" - (intSuffix (\n d -> d { liftLamsRecArgs = Just n })) + (intSuffix (\n d -> d { liftLamsNonRecArgs = Just n })) , make_ord_flag defFlag "fstg-lift-lams-non-rec-args-any" - (noArg (\d -> d { liftLamsRecArgs = Nothing })) + (noArg (\d -> d { liftLamsNonRecArgs = Nothing })) , make_ord_flag defFlag "fstg-lift-lams-known" (noArg (\d -> d { liftLamsKnown = True })) , make_ord_flag defFlag "fno-stg-lift-lams-known" |