diff options
| -rw-r--r-- | src/Data/Bag.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Data/Bag.hs b/src/Data/Bag.hs index 84c770a..b424857 100644 --- a/src/Data/Bag.hs +++ b/src/Data/Bag.hs @@ -4,7 +4,7 @@ module Data.Bag where -- | An ordered sequence that can be folded over. data Bag a = BZero | BOne a | BTwo (Bag a) (Bag a) | BList [Bag a] - deriving (Functor, Foldable, Traversable) + deriving (Show, Functor, Foldable, Traversable) -- Really only here for 'pure' instance Applicative Bag where |