[project @ 1999-06-12 16:17:23 by keithw]
[ghc-hetmet.git] / ghc / tests / lib / should_run / enum02.hs
index 27be3fd..abd5725 100644 (file)
@@ -14,7 +14,7 @@ main = do
   putStrLn "Testing Enum Int64:"
   testEnumInt64
 
-#define printTest(x) (do{ putStr ( "    " ++ "x" ++ " = " ) ; print (x) })
+#define printTest(x) (do{ putStr ( "    " ++ #x ++ " = " ) ; print (x) })
 
 testEnumInt8 :: IO ()
 testEnumInt8 = do