.text
.globl _start
.ent _start,0
_start:
.frame $15,0,$15
br $29,1f
1: ldgp $29, 0($29)
.prologue 0
ldq $27,main($29) !literal!1
jsr $26,($27)
or $0,$0,$16
.end _start
.globl _exit
_exit:
lda $0,1
callsys
call_pal 0
.globl write
write:
lda $0,4
ret