diff options
| author | Mirek Kratochvil <exa.exa@gmail.com> | 2023-02-26 18:10:10 +0100 |
|---|---|---|
| committer | Mirek Kratochvil <exa.exa@gmail.com> | 2023-02-26 18:10:10 +0100 |
| commit | 0d52bcf663ead766ae83c8f30f90beaea5790789 (patch) | |
| tree | 7163b9365d4bafb9dfc70c2d50d1d3e1e1742232 /app/Load.hs | |
| parent | 538dc0714afb48e399fb41342e943c7ff7feae65 (diff) | |
| download | prlg-0d52bcf663ead766ae83c8f30f90beaea5790789.tar.gz prlg-0d52bcf663ead766ae83c8f30f90beaea5790789.tar.bz2 | |
semicolon colons semi
Diffstat (limited to 'app/Load.hs')
| -rw-r--r-- | app/Load.hs | 3 |
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) |
