diff options
| author | Alasdair Armstrong | 2017-10-25 14:12:50 +0100 |
|---|---|---|
| committer | Alasdair Armstrong | 2017-10-25 14:20:16 +0100 |
| commit | c432deec5454a073c645352d9dec674be28fa568 (patch) | |
| tree | 41880495556b53e5dc70a87eab13443c4443c21c /language | |
| parent | c4fafd80d816fd06a4091c217c43e232ac9a8706 (diff) | |
Generate ast.ml from ott file and update makefile.
Fix until loop not being counted as sugar
Diffstat (limited to 'language')
| -rw-r--r-- | language/l2.ott | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/language/l2.ott b/language/l2.ott index 579f26b3..f08b089b 100644 --- a/language/l2.ott +++ b/language/l2.ott @@ -682,7 +682,7 @@ exp :: 'E_' ::= | if exp1 then exp2 :: S :: ifnoelse {{ ichlo [[ if exp1 then exp2 else ( ) ]] }} | loop exp1 exp2 :: :: loop | while exp1 do exp2 :: S :: while {{ ichlo [[ loop while exp1 exp2 ]] }} - | repeat exp1 until exp2 S :: :: until {{ ichlo [[ loop until exp2 exp1 ]] }} + | repeat exp1 until exp2 :: S :: until {{ ichlo [[ loop until exp2 exp1 ]] }} | foreach ( id from exp1 to exp2 by exp3 in order ) exp4 :: :: for {{ com loop }} | foreach ( id from exp1 to exp2 by exp3 ) exp4 :: S :: forup {{ ichlo [[ foreach id from exp1 to exp2 by exp3 in inc exp4 ]] }} | foreach ( id from exp1 to exp2 ) exp3 :: S :: forupbyone {{ ichlo [[ foreach id from exp1 to exp2 by 1 in inc exp4 ]] }} |