Changeset 2770 for src/Main.hs
- Timestamp:
- 05/06/05 12:33:53 (4 years ago)
- svk:copy_cache_prev:
- 4271
- Files:
-
- 1 modified
-
src/Main.hs (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
src/Main.hs
r2768 r2770 124 124 CmdReset -> tabulaRasa >>= (liftSTM . writeTVar env) >> loop 125 125 126 -- |Create a \'blank\' 'Env' for our program to execute in. Of course, 127 -- 'prepareEnv' actually declares quite a few symbols in the environment, 128 -- e.g. \'\@\*ARGS\', \'\$\*PID\', \'\$\*ERR\' etc. 129 -- ('Tabula rasa' is Latin for 'a blank slate'.) 126 130 tabulaRasa :: IO Env 127 131 tabulaRasa = prepareEnv "<interactive>" []
