.file	"960218-1.c"
	.text
	.align	2
	.globl	g
	.type	g, @function
g:
	link.w %a6,#0
	move.l 8(%a6),glob
	clr.l %d0
	unlk %a6
	rts
	.size	g, .-g
	.align	2
	.globl	f
	.type	f, @function
f:
	link.w %a6,#0
	move.l %a2,-(%sp)
	move.l 8(%a6),%d0
	not.l %d0
	jbeq .L8
	lea g,%a2
	.align	2
.L6:
	move.l %d0,-(%sp)
	jbsr (%a2)
	addq.l #4,%sp
	tst.l %d0
	jbne .L6
.L8:
	move.l -4(%a6),%a2
	unlk %a6
	rts
	.size	f, .-f
	.align	2
	.globl	main
	.type	main, @function
main:
	link.w %a6,#0
	pea 3.w
	jbsr f
	addq.l #4,%sp
	moveq.l #-4,%d0
	cmp.l glob,%d0
	jbeq .L10
	jbsr abort
	.align	2
.L10:
	clr.l -(%sp)
	jbsr exit
	nop
	.size	main, .-main
	.comm	glob,4,2
	.ident	"GCC: (GNU) 3.3.2"