diff options
| author | johnvg | 2005-01-25 16:26:40 +0000 |
|---|---|---|
| committer | johnvg | 2005-01-25 16:26:40 +0000 |
| commit | 41fd830484d817d5102561ed2a2f98d0d3d54fcb (patch) | |
| tree | 9ee43d0e95dbb815c398130c3b0afd7f77faff4a /frontend | |
| parent | optimize apply of unknown function with two or more arguments, not yet enabled (diff) | |
print "(let ...) or #" for Let and "update of record" for RecordUpdate
in error messages
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1511 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend')
| -rw-r--r-- | frontend/syntax.icl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/frontend/syntax.icl b/frontend/syntax.icl index edfad93..9f35a45 100644 --- a/frontend/syntax.icl +++ b/frontend/syntax.icl @@ -862,6 +862,10 @@ where = file <<< bv show_expression file (MatchExpr _ expr) = file <<< "match expression" + show_expression file (Let _) + = file <<< "(let ... ) or #" + show_expression file (RecordUpdate _ _ _) + = file <<< "update of record" show_expression file _ = file |