mirror of
https://github.com/anoma/juvix.git
synced 2024-12-15 01:52:11 +03:00
16 lines
194 B
Plaintext
16 lines
194 B
Plaintext
-- case type mismatch
|
|
|
|
type list {
|
|
nil : list;
|
|
cons : * -> list -> list;
|
|
}
|
|
|
|
function main() {
|
|
alloc nil;
|
|
case list {
|
|
nil: { pop; push "a"; }
|
|
cons: { pop; push 1; }
|
|
};
|
|
ret;
|
|
}
|