Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/IO/HPutStrLn.hs
module IO (hPutStrLn) where import DHandle import HPutStr import HPutChar hPutStrLn :: Handle -> String -> IO () hPutStrLn h s = do hPutStr h s hPutChar h '\n'