Croissant Runtime
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 
crsn/examples/aliases.csn

23 lines
443 B

(
(def FOO 777)
(undef FOO)
(def FOO 123) ; define a constant
(call my-add 7 8)
(cmp res0 138 (ne? (fault "assert failed")))
(halt)
(sym wwww r0)
(sym q r7)
(proc my-add a b ; give arguments names
(sym q r7)
(unsym q)
(sym q r0) ; give register a temporary alias
(add q a b)
(add q FOO)
(ret q)
)
(add wwww wwww) ; test that it is still defined
)