[project @ 1996-07-25 20:43:49 by partain]
[ghc-hetmet.git] / ghc / compiler / utils / ListSetOps.lhs
index 3be4d89..3917247 100644 (file)
@@ -4,17 +4,21 @@
 \section[ListSetOps]{Set-like operations on lists}
 
 \begin{code}
+#ifdef COMPILING_GHC
+#include "HsVersions.h"
+#endif
+
 module ListSetOps (
        unionLists,
        intersectLists,
        minusList
-#if ! defined(COMPILING_GHC)
+#ifndef COMPILING_GHC
        , disjointLists, intersectingLists
 #endif
    ) where
 
 #if defined(COMPILING_GHC)
-import Ubiq{-uitous-}
+IMP_Ubiq(){-uitous-}
 
 import Util    ( isIn, isn'tIn )
 #endif