diff options
| -rw-r--r-- | ghc/compiler/main/CmdLineOpts.lhs | 2 | ||||
| -rw-r--r-- | ghc/compiler/rename/Rename.lhs | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/ghc/compiler/main/CmdLineOpts.lhs b/ghc/compiler/main/CmdLineOpts.lhs index a7f85802a0..d438189ced 100644 --- a/ghc/compiler/main/CmdLineOpts.lhs +++ b/ghc/compiler/main/CmdLineOpts.lhs @@ -529,6 +529,8 @@ isStaticHscFlag f = "fignore-interface-pragmas", "fno-hi-version-check", "dno-black-holing", + "fno-method-sharing", + "fno-monomorphism-restriction", "fomit-interface-pragmas", "fno-pre-inlining", "fdo-eta-reduction", diff --git a/ghc/compiler/rename/Rename.lhs b/ghc/compiler/rename/Rename.lhs index 87eb777eca..c30be13bbb 100644 --- a/ghc/compiler/rename/Rename.lhs +++ b/ghc/compiler/rename/Rename.lhs @@ -891,7 +891,7 @@ warnDeprec :: (Name, DeprecTxt) -> RnM d () warnDeprec (name, txt) = pushSrcLocRn (getSrcLoc name) $ addWarnRn $ - sep [ text (occNameFlavour (nameOccName name)) <+> ppr name <+> + sep [ text (occNameFlavour (nameOccName name)) <+> quotes (ppr name) <+> text "is deprecated:", nest 4 (ppr txt) ] |