diff options
| author | johnvg | 2003-06-19 11:02:32 +0000 |
|---|---|---|
| committer | johnvg | 2003-06-19 11:02:32 +0000 |
| commit | d1b46be354d694322e6de0abe4826c78cf2a1d94 (patch) | |
| tree | e31ebd1d02fc9807b05f1a2435f8a57b77aef158 /frontend/parse.icl | |
| parent | bug fix: do not move a case inside an explicit case (diff) | |
enable boxed records
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@1352 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
Diffstat (limited to 'frontend/parse.icl')
| -rw-r--r-- | frontend/parse.icl | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/frontend/parse.icl b/frontend/parse.icl index 971d2df..57cb157 100644 --- a/frontend/parse.icl +++ b/frontend/parse.icl @@ -1658,13 +1658,11 @@ where = case token of CurlyOpenToken -> want_record_type_rhs name False exi_vars pState -/* ExclamationToken # (token, pState) = nextToken TypeContext pState | token==CurlyOpenToken -> want_record_type_rhs name True exi_vars pState -> (PD_Type td, parseError "Record type" No ("after ! in definition of record type "+name+" { ") pState) -*/ /* ColonToken | isEmpty exi_vars -> (PD_Erroneous, parseError "Algebraic type" No "no colon, :," pState) |