Report a paste

Please put a quick comment for the admin.

If it looks like spam, the admin will mark it as spam so that the spam filter picks it up in the future.

If the paste contains something private or offensive, it'll probably just be deleted.

No title

data Side = L | R

data StateHist = S | T Side Int Int StateHist

Show StateHist where
 show S = ""
 show T L x y sh = "L "
 show T R x y sh = "R "

--does not compile, error message:
- + Errors (1)
 `-- builtin line 0 col -1:
     When checking left hand side of Prelude.Show.Main.StateHist implementation of Prelude.Show.Show, method show:
     Type mismatch between
             String (Type of Main.StateHist implementation of Prelude.Show.Show, method show x)
     and
             _ ->
             _ (Is Main.StateHist implementation of Prelude.Show.Show, method show x applied to too many arguments?)