13 Feb
2002
13 Feb
'02
1:09 a.m.
How should I modify the function below so that characters are printed out as they arrive? Thanks. Tom printchar :: Handle -> IO () printchar handle = do c <- hGetChar handle putChar c