.set noat
	.set noreorder
	.set nomacro
	.globl curval
	.globl curval
	.section	.bss
	.type	curval, @object
	.size	curval, 10
	.align 1
curval:
	.zero	10
	.section	.sbss,"aw"
	.type	idc, @object
	.size	idc, 2
	.align 1
idc:
	.zero	2
	.text
	.align 2
	.align 4
	.globl get_id
	.ent get_id
get_id:
	.frame $30,0,$26,0
	ldah $29,0($27)		!gpdisp!1
	lda $29,0($29)		!gpdisp!1
$get_id..ng:
	.prologue 1
	ldah $3,curval($29)		!gprelhigh
	lda $3,curval($3)		!gprellow
	lda $4,2($3)
	ldq_u $2,2($3)
	ldq_u $1,9($3)
	extql $2,$4,$2
	extqh $1,$4,$1
	bis $2,$1,$2
	insbl $16,$2,$16
	ldq_u $1,0($2)
	mskbl $1,$2,$1
	bis $16,$1,$16
	stq_u $16,0($2)
	ret $31,($26),1
	.end get_id
	.align 2
	.align 4
	.globl get_tok
	.ent get_tok
get_tok:
	.frame $30,0,$26,0
	.mask 0x4000000,0
	ldah $29,0($27)		!gpdisp!2
	lda $29,0($29)		!gpdisp!2
$get_tok..ng:
	lda $30,-16($30)
	ldah $1,idc($29)		!gprelhigh
	stq $26,0($30)
	.prologue 1
	lda $3,idc($1)		!gprellow
	ldah $8,curval($29)		!gprelhigh
	ldq_u $2,idc($1)		!gprellow
	lda $4,curval($8)		!gprellow
	lda $16,99($31)
	extwl $2,$3,$1
	ldq_u $5,9($4)
	lda $3,2($4)
	ldq_u $6,2($4)
	sll $1,48,$1
	mskqh $5,$3,$5
	sra $1,48,$1
	mskql $6,$3,$6
	s4subq $1,$1,$2
	s4subq $2,$1,$2
	ldah $1,id_space($29)		!gprelhigh
	lda $1,id_space($1)		!gprellow
	s4subq $2,$2,$2
	addq $2,$1,$2
	insqh $2,$3,$7
	insql $2,$3,$2
	bis $5,$7,$5
	stq_u $5,9($4)
	ldah $1,cur_line($29)		!gprelhigh
	bis $6,$2,$6
	stq_u $6,2($4)
	ldl $2,cur_line($1)		!gprellow
	ldah $1,char_pos($29)		!gprelhigh
	ldq_u $3,curval($8)		!gprellow
	sll $2,10,$2
	ldl $5,char_pos($1)		!gprellow
	mskwl $3,$4,$3
	bis $2,$5,$1
	inswl $1,$4,$1
	bis $1,$3,$1
	stq_u $1,curval($8)		!gprellow
	cpys $f31,$f31,$f31
	bsr $26,$get_id..ng
	ldq $26,0($30)
	addl $31,$0,$0
	lda $30,16($30)
	ret $31,($26),1
	.end get_tok
	.align 2
	.align 4
	.globl main
	.ent main
main:
	.frame $30,0,$26,0
	.mask 0x4000000,0
	ldah $29,0($27)		!gpdisp!3
	lda $29,0($29)		!gpdisp!3
$main..ng:
	lda $30,-16($30)
	stq $26,0($30)
	.prologue 1
	bsr $26,$get_tok..ng
	mov $31,$16
	ldq $27,exit($29)		!literal!4
	jsr $26,($27),exit		!lituse_jsr!4
	.end main
	.section	.bss
	.type	id_space, @object
	.size	id_space, 66
id_space:
	.zero	66
	.section	.sbss,"aw"
	.type	cur_line, @object
	.size	cur_line, 4
	.align 2
cur_line:
	.zero	4
	.type	char_pos, @object
	.size	char_pos, 4
	.align 2
char_pos:
	.zero	4
	.ident	"GCC: (GNU) 3.3.2"