10 lines
178 B
Plaintext
10 lines
178 B
Plaintext
export
|
|
function w $main () {
|
|
@start
|
|
%x0 =l call $GC_malloc (l 16)
|
|
%.2 =l add %x0, 8
|
|
storel 18, %x0
|
|
storel 22, %.2
|
|
%x1 =l call $scm_write (l %x0)
|
|
ret %x1
|
|
} |