.file	"a1.c"
	.text
	.align	2
	.globl	foo
	.type	foo, @function
foo:
	link.w %a6,#0
	move.l %a2,-(%sp)
	move.l 8(%a6),%a0
	move.l 12(%a6),%a1
	lea (%a0,%a0.l*4),%a2
	move.l %a2,%d1
	move.l %a2,%d0
	lsl.l #4,%d0
	add.l %d0,%d1
	move.l %d1,(%a1)
	lea (%a0,%a0.l*2),%a2
	move.l %a2,%d0
	lsl.l #2,%d0
	sub.l %a0,%d0
	lsl.l #2,%d0
	sub.l %a0,%d0
	add.l %d0,%d0
	neg.l %d0
	move.l %d0,4(%a1)
	move.l (%sp)+,%a2
	unlk %a6
	rts
	.size	foo, .-foo
	.ident	"GCC: (GNU) 3.3.2"