Integrated the garbage collector.
This commit is contained in:
parent
bbe0d77a19
commit
b3525db7fd
5 changed files with 21 additions and 12 deletions
|
|
@ -1,9 +1,9 @@
|
|||
-- main = head (Cons (sum (repeat 10 5)) Nil);
|
||||
main = head (Cons (sum (repeat 5 9223372036854775807)) Nil); --9223372036854775807
|
||||
|
||||
main = case (bind (fmap (\s . s + 1) (Just 5)) (\s . pure (s + 10))) of {
|
||||
Just a => a ;
|
||||
Nothing => minusOne ;
|
||||
};
|
||||
-- main = case (bind (fmap (\s . s + 1) (Just 5)) (\s . pure (s + 10))) of {
|
||||
-- Just a => a ;
|
||||
-- Nothing => minusOne ;
|
||||
-- };
|
||||
|
||||
---- MAYBE MONAD ----
|
||||
data Maybe () where {
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue