Fix since annotation
This commit is contained in:
parent
410c325b18
commit
dfa0435e9e
|
@ -387,7 +387,7 @@ instance Eq1 NKeyName where
|
||||||
liftEq _ (StaticKey a) (StaticKey b) = a == b
|
liftEq _ (StaticKey a) (StaticKey b) = a == b
|
||||||
liftEq _ _ _ = False
|
liftEq _ _ _ = False
|
||||||
|
|
||||||
-- | @since UNRELEASED
|
-- | @since 0.10.1
|
||||||
instance Ord1 NKeyName where
|
instance Ord1 NKeyName where
|
||||||
liftCompare cmp (DynamicKey a) (DynamicKey b) = liftCompare2 (liftCompare cmp) cmp a b
|
liftCompare cmp (DynamicKey a) (DynamicKey b) = liftCompare2 (liftCompare cmp) cmp a b
|
||||||
liftCompare _ (DynamicKey _) (StaticKey _) = LT
|
liftCompare _ (DynamicKey _) (StaticKey _) = LT
|
||||||
|
|
Loading…
Reference in New Issue