[nhc-bugs] A bug

[Wojciech Moczydlowski, Jr]

5.hs:

module Main where

main = mapM_ putStrLn [ "echo " ++ show x ++ " | a.out " | x <- [1..]]

[khaliff@90-mia-3 khaliff]$ hmake 5
nhc98    -c -o 5.o 5.hs
nhc98    -o 5 5.o 
[khaliff@90-mia-3 khaliff]$ 5 > /dev/null 
hPutStr: internal error, not a cons-list!
hPutStr:   got CONSTRW src=0x401cc80c size=1
hPutStr:     char=''
[khaliff@90-mia-3 khaliff]$ nhc98 --version
/usr/local/bin/nhc98: v1.04 (2001-05-21)
  [ config: ix86-Linux/ghc by khaliff@90-mia-3.acn.waw.pl on 25 May 2001 ]

Wojciech Moczydlowski, Jr