diff options
Diffstat (limited to 'assignment-13/Util.dcl')
-rw-r--r-- | assignment-13/Util.dcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/assignment-13/Util.dcl b/assignment-13/Util.dcl index baef165..9e6ae0a 100644 --- a/assignment-13/Util.dcl +++ b/assignment-13/Util.dcl @@ -9,6 +9,7 @@ class print a :: a -> PrState -> PrState printToString :: a -> String | print a +instance print (PrState -> PrState) instance print String instance print Int @@ -16,4 +17,4 @@ nl :: PrState -> PrState indent :: PrState -> PrState unindent :: PrState -> PrState -prsperse :: (PrState -> PrState) [a] -> PrState -> PrState | print a +prsperse :: a [b] -> PrState -> PrState | print a & print b |