10 Sep
2004
10 Sep
'04
10:54 p.m.
Stephan Zaubzer writes:
Here my attempts:
data Entry a = EmptyEntry | MakeEntry a a
showEntry :: (Show a) => Entry a -> String showEntry EmptyEntry = "Empty" showEntry MakeEntry a b = show a ++ ": " ++ show b
what am I doing wrong? I have seen this way on some tutorials.
I believe that if you looked cautiously at the system response you would guess yourself. Parentheses missing, it should be showEntry (MakeEntry a b) = ... Jerzy Karczmarczuk ... who has a pleasure of correcting thousands students' programs per year, so this kind of error burns his eyes...