diff options
author | Ian Lynagh <ian@well-typed.com> | 2012-10-25 03:01:56 +0100 |
---|---|---|
committer | Ian Lynagh <ian@well-typed.com> | 2012-10-25 03:01:56 +0100 |
commit | df2bcd8a51f3b4cc4879767b99f28742917e53e5 (patch) | |
tree | 8757a83c8b9bed88a58f67d8c8abc8a7f80362f6 /ghc | |
parent | c67b43133ee9f71b280577b274cb3753a396a83a (diff) | |
download | haskell-df2bcd8a51f3b4cc4879767b99f28742917e53e5.tar.gz |
Set the default way correctly when dynamic-by-default
Diffstat (limited to 'ghc')
-rw-r--r-- | ghc/Main.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/Main.hs b/ghc/Main.hs index 37b7f31e31..f05ddab7f6 100644 --- a/ghc/Main.hs +++ b/ghc/Main.hs @@ -292,7 +292,7 @@ checkOptions mode dflags srcs objs = do hPutStrLn stderr ("Warning: -debug, -threaded and -ticky are ignored by GHCi") -- -prof and --interactive are not a good combination - when (notNull (filter (not . wayRTSOnly) (ways dflags)) + when ((filter (not . wayRTSOnly) (ways dflags) /= defaultWays (settings dflags)) && isInterpretiveMode mode) $ do ghcError (UsageError "--interactive can't be used with -prof or -unreg.") |