diff options
| author | Tom Smeding <tom@tomsmeding.com> | 2025-05-12 17:49:50 +0200 |
|---|---|---|
| committer | Tom Smeding <tom@tomsmeding.com> | 2025-05-12 17:49:50 +0200 |
| commit | 6e004613855a332364e21b2c5616b6752002458a (patch) | |
| tree | 6e0408e30085471f02210f4bc952f7d2712f3f7e | |
| parent | 8cf53cbc01ccf59e9f57dc7f2d056d933363ddaf (diff) | |
Show Bag
| -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 |