Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/6f5f64c3f73a58fc5cea5f355313c9f959fbd685 >--------------------------------------------------------------- commit 6f5f64c3f73a58fc5cea5f355313c9f959fbd685 Author: Ian Lynagh <[email protected]> Date: Sun Nov 20 14:51:23 2011 +0000 Remove posix013 It prints the getSystemID otuput, which varies from system to system. >--------------------------------------------------------------- tests/lib/libposix/posix013.hs | 21 --------------------- 1 files changed, 0 insertions(+), 21 deletions(-) diff --git a/tests/lib/libposix/posix013.hs b/tests/lib/libposix/posix013.hs deleted file mode 100644 index b78930b..0000000 --- a/tests/lib/libposix/posix013.hs +++ /dev/null @@ -1,21 +0,0 @@ ---!! Querying for system information. -module Main(main) where - -import Posix - -main = do - sid <- getSystemID - let - info = - [ "Node Name: " , nodeName sid - , "OS: " , systemName sid - , "Arch: " , machine sid - , "Version: " , version sid - , "Release: " , release sid - ] - putStrLn2 info - -putStrLn2 :: [String] -> IO () -putStrLn2 [] = return () -putStrLn2 [x] = putStrLn x -putStrLn2 (x1:x2:xs) = putStrLn (x1++x2) >> putStrLn2 xs _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
