.file	"930603-3.c"
	.text
	.align	2
	.globl	f
	.type	f, @function
f:
	link.w %a6,#0
	move.l %d2,-(%sp)
	move.l 8(%a6),%a0
	move.l 12(%a6),%d0
	clr.l %d1
	moveq.l #100,%d2
	cmp.l %d0,%d2
	jbeq .L3
	moveq.l #107,%d2
	cmp.l %d0,%d2
	jbne .L5
	move.b 3(%a0),%d0
	lsr.b #4,%d0
	move.b %d0,%d1
	jbra .L2
	.align	2
.L3:
	bfextu (%a0){#0:#7},%d1
	jbra .L2
	.align	2
.L5:
	jbsr abort
	.align	2
.L2:
	move.l %d1,%d0
	move.l -4(%a6),%d2
	unlk %a6
	rts
	.size	f, .-f
	.align	2
	.globl	main
	.type	main, @function
main:
	link.w %a6,#-4
	move.b #-86,-4(%a6)
	move.b #5,-3(%a6)
	pea 100.w
	pea -4(%a6)
	jbsr f
	addq.l #8,%sp
	moveq.l #85,%d1
	cmp.l %d0,%d1
	jbeq .L8
	jbsr abort
	.align	2
.L8:
	clr.l -(%sp)
	jbsr exit
	nop
	.size	main, .-main
	.ident	"GCC: (GNU) 3.3.2"