Changeset 2774 for src/Main.hs

Timestamp:

05/06/05 16:47:16 (4 years ago)

Author:

autrijus

svk:copy_cache_prev:

4340

Message:

* merge the App form with Syn "()" form; App now takes

Exp as the subroutine, so former App name invs args
needs to be written as App (Var name) invs args now.

Files:

• src/Main.hs (modified) (1 diff)

src/Main.hs

@@ -180 +180 @@
     return ()
     where
-    exp = App "&require" [] [Val $ VStr fn]
+    exp = App (Var "&require") [] [Val $ VStr fn]
 
 doRunSingle :: TVar Env -> RunOptions -> String -> IO ()