SafeHaskell: Fix typo in warning
authorDavid Terei <davidterei@gmail.com>
Tue, 7 Jun 2011 01:23:48 +0000 (18:23 -0700)
committerDavid Terei <davidterei@gmail.com>
Sat, 18 Jun 2011 03:40:34 +0000 (20:40 -0700)
compiler/main/DynFlags.hs

index 7263796..8563dd1 100644 (file)
@@ -1266,7 +1266,7 @@ shFlagsDisallowed dflags = foldl check_method (dflags, []) bad_flags
                      (xopt Opt_TemplateHaskell, "-XTemplateHaskell",
                      flip xopt_unset Opt_TemplateHaskell)]
 
-        safeFailure str = [L noSrcSpan $ "Warning2: " ++ str ++ " is not allowed in"
+        safeFailure str = [L noSrcSpan $ "Warning: " ++ str ++ " is not allowed in"
                                       ++ " SafeHaskell; ignoring " ++ str]