The below expression type-checks and executes in Omega:
case Just of { Just -> 42 }
Here is the transcript:
prompt> case Just of { Just -> 42 }
Case match failure
The value: <primfun Just>
doesn't match any of the patterns:
Just
(Vprimfun Just)
GHC rejects it (rightfully so):
Prelude> case Just of { Just -> 42 }
<interactive>:1:15:
Couldn't match expected type `a -> Maybe a'
against inferred type `Maybe a1'
In the pattern: Just
In a case alternative: Just -> 42
In the expression: case Just of { Just -> 42 }
Original issue reported on code.google.com by ggr...@gmail.com on 3 Feb 2011 at 10:43
Original issue reported on code.google.com by
ggr...@gmail.com
on 3 Feb 2011 at 10:43