( (def A 10) (def FOO (=add A (sub 10 5))) ; FOO is 15 (ld r0 (=add 14 1)) (cmp r0 15 (ne? (fault "1"))) (ld r0 (=add FOO 1)) (cmp r0 16 (ne? (fault "2"))) (ld r0 (=add (sub FOO 2) 3)) (cmp r0 16 (ne? (fault "3"))) )