3 "/bin:/usr/bin:/users/ets/simonm/bin:/users/ets/simonm/bin/i386-unknown-freebsd2.2:/usr/local/bin:/usr/X11R6/bin:/usr/local/X11R6/bin:/local/fp/bin:/local/fp/bin/i386-unknown-freebsd2.2:/local/ets/go/i386-unknown-freebsd2.2:/local/fp/bin/i386-unknown-freebsd2.1.0:/local/ets/go/i386-unknown-freebsd2.1.0:/usr/local/teTeX/bin:/sbin:/usr/sbin"
4 --!!! test various I/O Requests
10 --import Trace ToDo: get this via GlaExts -- SOF
14 hPutStr stderr (shows prog "\n")
16 hPutStr stderr (shows args "\n")
18 hPutStr stderr (shows path "\n")
19 stdin_txt <- getContents
21 file_cts <- readFile (head args)
22 hPutStr stderr file_cts
23 trace "hello, trace" $
24 catch (getEnv "__WURBLE__" >> return ()) (\ e -> error "hello, error\n")