.file	"20021015-1.c"
	.globl	g_list
	.data
	.type	g_list, @object
	.size	g_list, 1
g_list:
	.byte	49
	.text
	.align	2
	.globl	g
	.type	g, @function
g:
	link.w %a6,#0
	move.l 24(%a6),%a0
	move.l (%a0),%a0
	cmp.l #g_list,%a0
	jbeq .L2
	jbsr abort
	.align	2
.L2:
	clr.b (%a0)
	unlk %a6
	rts
	.size	g, .-g
	.align	2
	.globl	main
	.type	main, @function
main:
	link.w %a6,#-8
	movm.l #0x3020,-(%sp)
	lea g_list,%a1
	move.l %a1,-4(%a6)
	moveq.l #100,%d3
	tst.b g_list
	jbeq .L10
	lea g,%a2
	.align	2
.L8:
	move.l %a1,%d2
	pea -4(%a6)
	pea -8(%a6)
	move.l %d3,-(%sp)
	move.l %a1,-(%sp)
	clr.l -(%sp)
	jbsr (%a2)
	move.l -4(%a6),%a1
	move.l %a1,%a0
	sub.l %d2,%a0
	sub.l %a0,%d3
	lea (20,%sp),%sp
	tst.b (%a1)
	jbne .L8
.L10:
	clr.l %d0
	movm.l -20(%a6),#0x40c
	unlk %a6
	rts
	.size	main, .-main
	.ident	"GCC: (GNU) 3.3.2"