summaryrefslogtreecommitdiff
path: root/app/Load.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/Load.hs')
-rw-r--r--app/Load.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/app/Load.hs b/app/Load.hs
index 85a6d03..f705114 100644
--- a/app/Load.hs
+++ b/app/Load.hs
@@ -39,8 +39,9 @@ intern prlgs = do
compile :: IR.PrlgInt -> PrlgEnv Code
compile prlgv = do
comma <- findAtom ","
+ semi <- findAtom ";"
cut <- findAtom "!"
- return $ C.seqGoals (C.compileGoals comma cut prlgv)
+ return $ C.compileGoals comma semi cut prlgv
expansion ::
(Int -> IR.PrlgInt -> IR.PrlgInt)