1 	.text

     2 

     3 	.globl _start

     4 	.ent _start,0

     5 _start:

     6 	.frame $15,0,$15

     7 	br $29,1f

     8 1:	ldgp $29, 0($29)

     9 	.prologue 0

    10 	ldq $27,main($29) !literal!1

    11 	jsr $26,($27)

    12 	or $0,$0,$16

    13 	.end _start

    14 

    15 	.globl _exit

    16 _exit:

    17 	lda $0,1

    18 	callsys

    19 

    20 	call_pal 0

    21 

    22 	.globl write

    23 write:

    24 	lda $0,4

    25 	callsys

    26 	ret