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
}