Change "OPTIONS" to "OPTIONS_GHC" in error messages; fixes #4327
authorIan Lynagh <igloo@earth.li>
Fri, 24 Sep 2010 12:04:23 +0000 (12:04 +0000)
committerIan Lynagh <igloo@earth.li>
Fri, 24 Sep 2010 12:04:23 +0000 (12:04 +0000)
compiler/main/HeaderInfo.hs

index 0f0798b..508f855 100644 (file)
@@ -256,7 +256,7 @@ checkProcessArgsResult flags
       liftIO $ throwIO $ mkSrcErr $ listToBag $ map mkMsg flags
     where mkMsg (L loc flag)
               = mkPlainErrMsg loc $
-                  (text "unknown flag in  {-# OPTIONS #-} pragma:" <+>
+                  (text "unknown flag in  {-# OPTIONS_GHC #-} pragma:" <+>
                    text flag)
 
 -----------------------------------------------------------------------------
@@ -295,5 +295,5 @@ optionsErrorMsgs unhandled_flags flags_lines _filename
                                          L l f' <- flags_lines, f == f' ]
         mkMsg (L flagSpan flag) = 
             ErrUtils.mkPlainErrMsg flagSpan $
-                    text "unknown flag in  {-# OPTIONS #-} pragma:" <+> text flag
+                    text "unknown flag in  {-# OPTIONS_GHC #-} pragma:" <+> text flag