.file	"20020916-1.c"
	.text
	.align	2
	.globl	foo
	.type	foo, @function
foo:
	link.w %a6,#0
	move.l 8(%a6),%d1
	sle %d0
	extb.l %d0
	addq.l #1,%d0
	tst.l %d1
	jbge .L3
	moveq.l #1,%d0
	.align	2
.L3:
	unlk %a6
	rts
	.size	foo, .-foo
	.align	2
	.globl	main
	.type	main, @function
main:
	link.w %a6,#0
	pea 1.w
	jbsr foo
	addq.l #4,%sp
	moveq.l #1,%d1
	cmp.l %d0,%d1
	jbeq .L5
	jbsr abort
	.align	2
.L5:
	clr.l %d0
	unlk %a6
	rts
	.size	main, .-main
	.ident	"GCC: (GNU) 3.3.2"