diff options
| author | ronny | 2001-07-25 15:29:02 +0000 |
|---|---|---|
| committer | ronny | 2001-07-25 15:29:02 +0000 |
| commit | 495f67ae3dc268ccf3ddf0f9bbcca3d358d85d19 (patch) | |
| tree | 157e0b74234badcb48b59b3499e4a85dfc83af2d | |
| parent | This commit was generated by cvs2svn to compensate for changes in r572, (diff) | |
put back look-a-head token after class in import list if its not '('
git-svn-id: https://svn.cs.ru.nl/repos/clean-compiler/trunk@574 1f8540f1-abd5-4d5b-9d24-4c5ce8603e2d
| -rw-r--r-- | frontend/parse.icl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/frontend/parse.icl b/frontend/parse.icl index 74c0f13..ea61722 100644 --- a/frontend/parse.icl +++ b/frontend/parse.icl @@ -978,7 +978,7 @@ want_2_0_import_declaration token pState | token == OpenToken # (members, pState) = want_names want IC_Expression CloseToken pState -> (ID_Class { ii_ident = class_id, ii_extended = ii_extended } (Yes members), pState) - -> (ID_Class { ii_ident = class_id, ii_extended = ii_extended } No, pState) + -> (ID_Class { ii_ident = class_id, ii_extended = ii_extended } No, tokenBack pState) InstanceToken # (class_name, pState) = want pState // (ii_extended, pState) = optional_extension pState // MW: removed but still not ok |