Added a Malloc instruction.
This commit is contained in:
parent
230a205965
commit
c77139dfa8
3 changed files with 27 additions and 19 deletions
|
|
@ -1,2 +1,13 @@
|
|||
main = const 1 2 ;
|
||||
id x = x;
|
||||
|
||||
const x y = x ;
|
||||
|
||||
data Maybe () where {
|
||||
Just : Int -> Maybe ()
|
||||
Nothing : Maybe ()
|
||||
};
|
||||
|
||||
main = case (Just 5) of {
|
||||
Just a => 10 ;
|
||||
Nothing => 0 ;
|
||||
}; --const (id 0) (id 'a') ;
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue