@@ -407,9 +407,3 @@ instance AppendMap k' v' ~ t => Rewrapped (AppendMap k a) t
407instance Wrapped (AppendMap k a) where
407instance Wrapped (AppendMap k a) where
408 type Unwrapped (AppendMap k a) = Map k a
408 type Unwrapped (AppendMap k a) = Map k a
409 _Wrapped' = iso (\(AppendMap m) -> m) AppendMap
409 _Wrapped' = iso (\(AppendMap m) -> m) AppendMap
411−-- | Operator for creating a singleton 'Map'
412−(=:) :: k -> a -> AppendMap k a
413−k =: v = singleton k v