[update for ghc 6.6
John Meacham <john@repetae.net>**20061012080908] hunk ./Util/TrueSet.hs 12
-    intersect,
+    intersection,
hunk ./Util/TrueSet.hs 41
-intersects xs = foldlStrict intersect full xs
+intersects xs = foldlStrict intersection full xs
hunk ./Util/TrueSet.hs 48
-difference x y = x `intersect` invert y
+difference x y = x `intersection` invert y
hunk ./Util/TrueSet.hs 51
-(TrueSet x True)  `intersect` (TrueSet y True) = TrueSet (x `Set.union` y) True
-(TrueSet x False) `intersect` (TrueSet y False) = TrueSet (x `Set.intersect` y) False
-(TrueSet x True)  `intersect` (TrueSet y False) = TrueSet (y Set.\\ x) False
-(TrueSet x False) `intersect` (TrueSet y True) = TrueSet (x Set.\\ y) False
-(TrueSet x True)  `union` (TrueSet y True) = TrueSet (x `Set.intersect` y) True
+(TrueSet x True)  `intersection` (TrueSet y True) = TrueSet (x `Set.union` y) True
+(TrueSet x False) `intersection` (TrueSet y False) = TrueSet (x `Set.intersection` y) False
+(TrueSet x True)  `intersection` (TrueSet y False) = TrueSet (y Set.\\ x) False
+(TrueSet x False) `intersection` (TrueSet y True) = TrueSet (x Set.\\ y) False
+(TrueSet x True)  `union` (TrueSet y True) = TrueSet (x `Set.intersection` y) True