@@ -80,6 +80,9 @@ module Prelude
80 \ return JSON.stringify(s);\
80 \ return JSON.stringify(s);\
81 \}" :: String -> String
81 \}" :: String -> String
83+ instance showUnit :: Show Unit where
84+ show (Unit {}) = "Unit {}"
83 instance showString :: Show String where
86 instance showString :: Show String where
84 show = showStringImpl
87 show = showStringImpl