.file	"20020715-1.c"
	.text
	.align	2
	.globl	scale
	.type	scale, @function
scale:
	link.w %a6,#0
	move.l %d2,-(%sp)
	move.b %d2,%d0
	extb.l %d0
	tst.l %d1
	jbeq .L2
	move.b (%a0),%d2
	jbsr g
	move.b %d2,%d0
	extb.l %d0
	.align	2
.L2:
	move.l %d0,-(%sp)
	jbsr f
	move.l -4(%a6),%d2
	unlk %a6
	rts
	.size	scale, .-scale
	.ident	"GCC: (GNU) 3.3.2"