Enable new warning for fragile/incorrect CPP #if usage
[ghc.git] / ghc / GHCi / UI.hs
index deee24a..f3154c6 100644 (file)
@@ -379,7 +379,7 @@ findEditor :: IO String
 findEditor = do
   getEnv "EDITOR"
     `catchIO` \_ -> do
-#if mingw32_HOST_OS
+#ifdef mingw32_HOST_OS
         win <- System.Win32.getWindowsDirectory
         return (win </> "notepad.exe")
 #else