Implement -XStaticValues
[ghc.git] / testsuite / tests / driver / spacesInArgs.hs
1
2 import System.Environment
3
4 main :: IO ()
5 main = do args <- getArgs
6 mapM_ (putStrLn . f) args
7
8 f :: String -> String
9 f str = "Arg: " ++ show str
10