[project @ 1996-06-05 06:44:31 by partain]

[ghc-hetmet.git] / ghc / compiler / rename / ParseIface.y

diff --git a/ghc/compiler/rename/ParseIface.y b/ghc/compiler/rename/ParseIface.y
index bd7dc9d..86c4675 100644 (file)
--- a/ghc/compiler/rename/ParseIface.y
+++ b/ghc/compiler/rename/ParseIface.y
@@ -3,7 +3,7 @@
 
 module ParseIface ( parseIface ) where
 
-import Ubiq{-uitous-}
+IMP_Ubiq(){-uitous-}
 
 import ParseUtils
 
@@ -362,6 +362,7 @@ iname               :: { FAST_STRING }
 iname          :  VARID                { $1 }
                |  CONID                { $1 }
                |  OPAREN VARSYM CPAREN { $2 }
+               |  OPAREN BANG   CPAREN { SLIT("!"){-sigh, double-sigh-} }
                |  OPAREN CONSYM CPAREN { $2 }
 
 qiname         :: { RdrName }