32 lines
592 B
Text
32 lines
592 B
Text
|
|
||
|
|
# l is for long word (64bits)
|
||
|
|
# w is for word (32bits)
|
||
|
|
# h is for half word (16bits)
|
||
|
|
# b is for byte (8bits)
|
||
|
|
|
||
|
|
type :four = {l, b, w}
|
||
|
|
|
||
|
|
function $test() {
|
||
|
|
@start
|
||
|
|
%y =w copy 0
|
||
|
|
|
||
|
|
%s =l alloc8 16 # allocate a :four struct
|
||
|
|
%s1 =l add %s, 12 # get address of the w
|
||
|
|
storel 3, %s # set the l
|
||
|
|
storew 4, %s1 # set the w
|
||
|
|
|
||
|
|
# function call with the above :four
|
||
|
|
# struct as first argument and 5 int
|
||
|
|
# arguments
|
||
|
|
|
||
|
|
%f =l copy $F
|
||
|
|
%x =w call %f(w %y, w 1, w 2, :four %s, w 5, w 6)
|
||
|
|
|
||
|
|
# store the result in the
|
||
|
|
# global variable a
|
||
|
|
|
||
|
|
%x1 =w add %y, %x
|
||
|
|
storew %x1, $a
|
||
|
|
ret
|
||
|
|
}
|