.symbol
 fp 30
 sp 29
 retval 28
 rads 27
 gv 1100
 ax 1101
.code 0
 mov fp #3500
 mov sp #3000
 jal rads main
 trap r0 #0
; fun inc pv 1 fs 1
:inc
; gnAsg :((* #1 )(+ (* #1 )10 ))
; gnBop :(+ (* #1 )10 )
st r1 @1 fp
st r2 @2 fp
st r3 @3 fp
add fp fp #4
st rads @0 fp
pop sp r1
; deref LHS
ld r2 @0 r1
add r3 r2 #10
st r3 @0 r1
:L101
ld rads @0 fp
sub fp fp #4
ld r3 @3 fp
ld r2 @2 fp
ld r1 @1 fp
ret rads
; fun main pv 0 fs 5
:main
; gnAsg :(#1 (% #2 #3 ))
; gnBop :(% #2 #3 )
; gnAsg :(#4 (& (vec ax 2 )))
; gnAsg :(#5 (vec #4 1 ))
st r1 @1 fp
st r2 @2 fp
st r3 @3 fp
st r4 @4 fp
st r5 @5 fp
st r6 @6 fp
st r7 @7 fp
add fp fp #8
st rads @0 fp
ld r6 gv
trap r6 #2
xor r6 r2 r3
mov r1 r6
mov r6 #1101
mov r7 #2
add r6 r6 r7
mov r4 r6
; vec RHS
mov r7 #1
ld r6 +r4 r7
mov r5 r6
:L102
ld rads @0 fp
sub fp fp #8
ld r7 @7 fp
ld r6 @6 fp
ld r5 @5 fp
ld r4 @4 fp
ld r3 @3 fp
ld r2 @2 fp
ld r1 @1 fp
ret rads
.data 200
.end
