.file	"20020716-1.c"
	.text
	.align	2
	.globl	sub1
	.type	sub1, @function
sub1:
	link.w %a6,#0
	move.l 8(%a6),%d0
	unlk %a6
	rts
	.size	sub1, .-sub1
	.align	2
	.globl	testcond
	.type	testcond, @function
testcond:
	link.w %a6,#0
	move.l 8(%a6),-(%sp)
	jbsr sub1
	addq.l #4,%sp
	tst.l %d0
	seq %d0
	extb.l %d0
	neg.l %d0
.L3:
	moveq.l #77,%d1
	swap %d1
	tst.l %d0
	jbne .L2
	clr.l %d1
.L2:
	move.l %d1,%d0
	unlk %a6
	rts
	.size	testcond, .-testcond
	.align	2
	.globl	main
	.type	main, @function
main:
	link.w %a6,#0
	pea 1.w
	jbsr testcond
	addq.l #4,%sp
	tst.l %d0
	jbeq .L7
	jbsr abort
	.align	2
.L7:
	clr.l -(%sp)
	jbsr exit
	nop
	.size	main, .-main
	.ident	"GCC: (GNU) 3.3.2"