diff --git a/ghc/driver/Main.hs b/ghc/driver/Main.hs
index 415f0a62c96b5e1924e51fd3cd19e66002b23ca1..16544a657e947a7cf834427f4d3963cdc13f06cb 100644
--- a/ghc/driver/Main.hs
+++ b/ghc/driver/Main.hs
@@ -51,7 +51,7 @@ name = global (value) :: IORef (ty); \
 -----------------------------------------------------------------------------
 -- non-configured things
 
-_Haskell1Version = "5" -- i.e., Haskell 98
+cHaskell1Version = "5" -- i.e., Haskell 98
 
 -----------------------------------------------------------------------------
 -- Usage Message
@@ -201,7 +201,7 @@ getStopAfter flags
 	-- Cpp-related flags
 GLOBAL_VAR(cpp_flag, False, Bool)
 hs_source_cpp_opts = global
-	[ "-D__HASKELL1__="++_Haskell1Version
+	[ "-D__HASKELL1__="++cHaskell1Version
 	, "-D__GLASGOW_HASKELL__="++cProjectVersionInt				
 	, "-D__HASKELL98__"
 	, "-D__CONCURRENT_HASKELL__"