diff options
Diffstat (limited to 'libraries/base/tests/enum01.hs')
-rw-r--r-- | libraries/base/tests/enum01.hs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/libraries/base/tests/enum01.hs b/libraries/base/tests/enum01.hs index 0f261732b6..0ae39b14d1 100644 --- a/libraries/base/tests/enum01.hs +++ b/libraries/base/tests/enum01.hs @@ -1,5 +1,9 @@ -- !!! Testing the Prelude's Enum instances. -{-# LANGUAGE CPP #-} +{-# OPTIONS_GHC -F -pgmF ./enum_processor.py #-} +-- The processor is a non-CPP-based equivalent of +-- #define printTest(x) (do{ putStr ( " " ++ "x" ++ " = " ) ; print (x) }) +-- which is not portable to clang + module Main(main) where import Control.Exception @@ -82,7 +86,6 @@ main = do OK - on with the regression testing. -} -#define printTest(x) (do{ putStr ( " " ++ "x" ++ " = " ) ; print (x) }) testEnumInt :: IO () |