From: ross <unknown>
Date: Sat, 29 Jan 2005 12:15:33 +0000 (+0000)
Subject: [project @ 2005-01-29 12:15:33 by ross]
X-Git-Tag: Initial_conversion_from_CVS_complete~1151
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=d121c0cfb9a8a383b82f7e3a3493a9a57e9e93cf

[project @ 2005-01-29 12:15:33 by ross]
Oops, misspelled OPTIONS_GHC
---

diff --git a/ghc/utils/hsc2hs/Main.hs b/ghc/utils/hsc2hs/Main.hs
index eae0bbf..02bcb89 100644
--- a/ghc/utils/hsc2hs/Main.hs
+++ b/ghc/utils/hsc2hs/Main.hs
@@ -1,7 +1,7 @@
 {-# OPTIONS -fffi -cpp #-}
 
 ------------------------------------------------------------------------
--- $Id: Main.hs,v 1.70 2005/01/28 16:28:56 ross Exp $
+-- $Id: Main.hs,v 1.71 2005/01/29 12:15:33 ross Exp $
 --
 -- Program for converting .hsc files to .hs files, by converting the
 -- file into a C program which is run to generate the Haskell source.
@@ -724,7 +724,7 @@ outHeaderHs flags inH toks =
 	"    printf (\"{-# OPTIONS %s #-}\\n\", \""++
                   showCString s++"\");\n"++
 	"#else\n"++
-	"    printf (\"{-# GHC_OPTIONS %s #-}\\n\", \""++
+	"    printf (\"{-# OPTIONS_GHC %s #-}\\n\", \""++
                   showCString s++"\");\n"++
 	"#endif\n"
     outInclude s =