New morb tree for internal use in monomorphizer, data types implemented

This commit is contained in:
Rakarake 2023-03-31 17:02:54 +02:00
parent 9b38c6d804
commit d097cd28e8
5 changed files with 334 additions and 25 deletions

View file

@ -0,0 +1,13 @@
data Either(a b) where {
Left: a -> Either (a b)
Right: b -> Either (a b)
};
unwrapLeft x = case x of {
Left y => y;
};
wow = Left 5;
main = unwrapLeft wow;