|
|
@ -7,6 +7,7 @@ |
|
|
|
(cmp res0 138 (ne? (fault "assert failed"))) |
|
|
|
(cmp res0 138 (ne? (fault "assert failed"))) |
|
|
|
(halt) |
|
|
|
(halt) |
|
|
|
(sym wwww r0) |
|
|
|
(sym wwww r0) |
|
|
|
|
|
|
|
(sym q r7) |
|
|
|
|
|
|
|
|
|
|
|
(proc my-add a b ; give arguments names |
|
|
|
(proc my-add a b ; give arguments names |
|
|
|
(sym q r7) |
|
|
|
(sym q r7) |
|
|
@ -17,4 +18,6 @@ |
|
|
|
(add q FOO) |
|
|
|
(add q FOO) |
|
|
|
(ret q) |
|
|
|
(ret q) |
|
|
|
) |
|
|
|
) |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
(add wwww wwww) ; test that it is still defined |
|
|
|
) |
|
|
|
) |
|
|
|