Skip to content

Commit e46a07b

Browse files
committed
remove PRec wrapper in Picture Show instance
1 parent 762989a commit e46a07b

1 file changed

Lines changed: 4 additions & 1 deletion

File tree

src/CodeWorld/Tasks/Picture.hs

Lines changed: 4 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -139,7 +139,10 @@ newtype Picture = PRec (ReifyPicture Picture)
139139
The recursive structure of the type is necessary
140140
for [Reify CSE detection](https://hackage.haskell.org/package/data-reify).
141141
-}
142-
deriving (Show,Eq,Ord,Generic,NFData,Data)
142+
deriving (Eq,Ord,Generic,NFData,Data)
143+
144+
instance Show Picture where
145+
show (PRec p) = show p
143146

144147

145148
pattern Rectangle :: Double -> Double -> Picture

0 commit comments

Comments
 (0)