Starting Finnish for new API

This commit is contained in:
aarne
2003-12-19 16:57:48 +00:00
parent 4c9cb3eccc
commit 5b641a1947
13 changed files with 2546 additions and 12 deletions

View File

@@ -168,8 +168,8 @@ execCommand env c s = case c of
return (env', state1)
-}
---- CCEnvOn name -> return (languageOn (language name) env,s)
---- CCEnvOff name -> return (languageOff (language name) env,s)
CCEnvOn name -> return (env,s) ---- return (languageOn (language name) env,s)
CCEnvOff name -> return (env,s) ---- return (languageOff (language name) env,s)
-- this command is improved by the use of IO
CRefineRandom -> do