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
206206instance NFData2 Leaf where
207207 liftRnf2 rnf1 rnf2 (L k v) = rnf1 k `seq` rnf2 v
208208
209- -- Invariant: The length of the 1st argument to 'Full' is
210- -- 2^bitsPerSubkey
211-
212209-- | A map from keys to values. A map cannot contain duplicate keys;
213210-- each key can map to at most one value.
214211data HashMap k v
@@ -423,9 +420,6 @@ instance Eq k => Eq1 (HashMap k) where
423420instance (Eq k , Eq v ) => Eq (HashMap k v ) where
424421 (==) = equal1 (==)
425422
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.
429423equal1 :: Eq k
430424 => (v -> v' -> Bool )
431425 -> HashMap k v -> HashMap k v' -> Bool
You can’t perform that action at this time.
0 commit comments