Add signature of inferred bind to allow some mutually defined definitions
This commit is contained in:
parent
a37a52d9f8
commit
bbe0d77a19
4 changed files with 111 additions and 28 deletions
|
|
@ -1,9 +1,9 @@
|
|||
data True() where {
|
||||
True: True()
|
||||
data Bool () where {
|
||||
True : Bool ()
|
||||
False : Bool ()
|
||||
};
|
||||
|
||||
toBool = case 0 of {
|
||||
0 => False;
|
||||
_ => True;
|
||||
};
|
||||
main: Int;
|
||||
main =
|
||||
case True of {
|
||||
True => 1;
|
||||
_ => 0;
|
||||
};
|
||||
Loading…
Add table
Add a link
Reference in a new issue