Commit 00f8529c authored by Mike Ledger's avatar Mike Ledger

remove monoid

parent 0da2963f
Pipeline #15891484 passed with stage
in 21 minutes and 42 seconds
......@@ -124,11 +124,6 @@ instance NFData RadixTree where
rnf (RadixAccept t v) = t `seq` rnf v
rnf (RadixSkip v) = rnf v
-- | Does not define 'mappend'
instance Monoid RadixTree where
mempty = RadixSkip V.empty
mappend _ _ = mempty
-- | Compress a totally-unoptimised 'Trie' into a nice and easily-parsable
-- 'RadixTree'
fromTrie :: Trie -> RadixTree
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment