File tree Expand file tree Collapse file tree 1 file changed +0
-6
lines changed Expand file tree Collapse file tree 1 file changed +0
-6
lines changed Original file line number Diff line number Diff line change @@ -206,9 +206,6 @@ instance NFData k => NFData1 (Leaf k) where
206
206
instance NFData2 Leaf where
207
207
liftRnf2 rnf1 rnf2 (L k v) = rnf1 k `seq` rnf2 v
208
208
209
- -- Invariant: The length of the 1st argument to 'Full' is
210
- -- 2^bitsPerSubkey
211
-
212
209
-- | A map from keys to values. A map cannot contain duplicate keys;
213
210
-- each key can map to at most one value.
214
211
data HashMap k v
@@ -423,9 +420,6 @@ instance Eq k => Eq1 (HashMap k) where
423
420
instance (Eq k , Eq v ) => Eq (HashMap k v ) where
424
421
(==) = equal1 (==)
425
422
426
- -- We rely on there being no Empty constructors in the tree!
427
- -- This ensures that two equal HashMaps will have the same
428
- -- shape, modulo the order of entries in Collisions.
429
423
equal1 :: Eq k
430
424
=> (v -> v' -> Bool )
431
425
-> HashMap k v -> HashMap k v' -> Bool
You can’t perform that action at this time.
0 commit comments