[project @ 1996-06-05 06:44:31 by partain]
[ghc-hetmet.git] / ghc / compiler / parser / literal.ugn
index d8424a4..49c68b0 100644 (file)
@@ -2,8 +2,10 @@
 #include "hspincl.h"
 %}
 %{{
+#include "HsVersions.h"
+
 module U_literal where
-import Ubiq --  debugging consistency check
+IMP_Ubiq() --  debugging consistency check
 import UgenUtil
 %}}
 type literal;
@@ -16,10 +18,5 @@ type literal;
        charprim    : < gcharprim   : hstring; >;
        string      : < gstring     : hstring; >;
        stringprim  : < gstringprim : hstring; >;
-       clitlit     : < gclitlit    : stringId;
-                       gclitlit_kind : stringId; >;
-       norepi      : < gnorepi     : stringId; >;
-       norepr      : < gnorepr_n   : stringId; 
-                       gnorepr_d   : stringId; >;
-       noreps      : < gnoreps     : hstring; >;
+       clitlit     : < gclitlit    : stringId; >;
 end;