.file	"scal.c"
	.text
	.align	2
	.globl	write_at
	.type	write_at, @function
write_at:
	link.w %a6,#0
	moveq.l #1,%d0
	move.l %d0,g2
	move.l 12(%a6),%d0
	move.l 8(%a6),%a0
	move.l 16(%a6),(%a0,%d0.l*4)
	addq.l #1,g2
	unlk %a6
	rts
	.size	write_at, .-write_at
	.section	.rodata.str1.1,"aMS",@progbits,1
.LC0:
	.string	"%d\n"
	.text
	.align	2
	.globl	main
	.type	main, @function
main:
	link.w %a6,#0
	moveq.l #12,%d0
	move.l %d0,g2
	pea 12345.w
	move.l #g2,%d0
	sub.l #g1,%d0
	asr.l #2,%d0
	move.l %d0,-(%sp)
	pea g1
	jbsr write_at
	move.l g2,-(%sp)
	pea .LC0
	jbsr printf
	unlk %a6
	rts
	.size	main, .-main
	.comm	g1,4,2
	.comm	g2,4,2
	.ident	"GCC: (GNU) 3.3.2"