From 975e8c4d52360e39a7354aa53386bb5a56006999 Mon Sep 17 00:00:00 2001 From: Phil Freeman Date: Sat, 3 May 2014 11:52:22 -0700 Subject: [PATCH] Fix show instance --- src/Data/Maybe.purs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Data/Maybe.purs b/src/Data/Maybe.purs index f45fe9a..3ee96b7 100644 --- a/src/Data/Maybe.purs +++ b/src/Data/Maybe.purs @@ -38,7 +38,7 @@ module Data.Maybe where instance monadMaybe :: Monad Maybe instance showMaybe :: (Show a) => Show (Maybe a) where - show (Just x) = "Just " ++ (show x) + show (Just x) = "Just (" ++ show x ++ ")" show Nothing = "Nothing" instance eqMaybe :: (Eq a) => Eq (Maybe a) where