[project @ 1999-02-05 14:28:34 by sof]

[ghc-hetmet.git] / ghc / compiler / parser / UgenAll.lhs

diff --git a/ghc/compiler/parser/UgenAll.lhs b/ghc/compiler/parser/UgenAll.lhs
index b9edb42..c6ddcdd 100644 (file)
--- a/ghc/compiler/parser/UgenAll.lhs
+++ b/ghc/compiler/parser/UgenAll.lhs
@@ -1,32 +1,29 @@
 Stuff the Ugenny things show to the parser.
 
 \begin{code}
-#include "HsVersions.h"
-
 module UgenAll (
-       -- re-exported Prelude stuff
-       returnUgn, thenUgn,
-
        -- stuff defined in utils module
-       EXP_MODULE(UgenUtil) ,
+       module UgenUtil,
 
        -- re-exported ugen-generated stuff
-       EXP_MODULE(U_binding) ,
-       EXP_MODULE(U_constr) ,
-       EXP_MODULE(U_entidt) ,
-       EXP_MODULE(U_list) ,
-       EXP_MODULE(U_literal) ,
-       EXP_MODULE(U_maybe) ,
-       EXP_MODULE(U_either) ,
-       EXP_MODULE(U_pbinding) ,
-       EXP_MODULE(U_qid) ,
-       EXP_MODULE(U_tree) ,
-       EXP_MODULE(U_ttype)
+       module U_binding,
+       module U_constr,
+       module U_entidt,
+       module U_list,
+       module U_literal,
+       module U_maybe,
+       module U_either,
+       module U_grhsb,
+       module U_gdexp,
+       module U_match,
+       module U_qid,
+       module U_tree,
+       module U_ttype
     ) where
 
-import PreludeGlaST
+#include "HsVersions.h"
 
-IMP_Ubiq(){-uitous-}
+import GlaExts
 
 -- friends:
 import U_binding
@@ -36,7 +33,9 @@ import U_list
 import U_literal
 import U_maybe
 import U_either
-import U_pbinding
+import U_gdexp
+import U_grhsb
+import U_match
 import U_qid
 import U_tree
 import U_ttype