X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Fcompiler%2Futils%2FBag.lhs;h=6085e37123c31c221b6e1a62fe2feb350999e39a;hb=e7498a3ee1d0484d02a9e86633cc179c76ebf36e;hp=857dda2c974ed183261dd7fbe9f910529b56e479;hpb=30cf375e0bc79a6b71074a5e0fd2ec393241a751;p=ghc-hetmet.git

diff --git a/ghc/compiler/utils/Bag.lhs b/ghc/compiler/utils/Bag.lhs
index 857dda2..6085e37 100644
--- a/ghc/compiler/utils/Bag.lhs
+++ b/ghc/compiler/utils/Bag.lhs
@@ -4,6 +4,8 @@
 \section[Bags]{@Bag@: an unordered collection with duplicates}
 
 \begin{code}
+#include "HsVersions.h"
+
 module Bag (
 	Bag,	-- abstract type
 
@@ -15,7 +17,8 @@ module Bag (
     ) where
 
 #ifdef COMPILING_GHC
-import Ubiq{-uitous-}
+IMP_Ubiq(){-uitous-}
+IMPORT_1_3(List(partition))
 
 import Outputable	( interpp'SP )
 import Pretty