.file	"loop.p"
	.version	"01.01"
gcc2_compiled.:
	.local	A
	.comm	A,4,4
	.local	B
	.comm	B,4,4
	.local	I
	.comm	I,4,4
	.local	J
	.comm	J,4,4
.text
	.align 4
.globl pascal_main_program
	.type	 pascal_main_program,@function
pascal_main_program:
	pushl %ebp
	movl %esp,%ebp
	pushl %ebx
	nop
	movl $1,I
	.p2align 4,,7
.L4:
	movl $1,J
	.p2align 4,,7
.L8:
	movl I,%eax
	addl $-2,%eax
	movl %eax,%edx
	addl J,%edx
	leal 0(,%edx,4),%eax
	movl $A,%edx
	movl J,%ecx
	addl $-2,%ecx
	movl %ecx,%ebx
	addl I,%ebx
	leal 0(,%ebx,4),%ecx
	movl $B,%ebx
	movl (%ecx,%ebx),%ecx
	movl %ecx,(%eax,%edx)
.L10:
	cmpl $0,J
	jle .L11
	jmp .L6
	.p2align 4,,7
.L11:
	incl J
	jmp .L8
	.p2align 4,,7
.L9:
.L7:
.L6:
	cmpl $0,I
	jle .L12
	jmp .L3
	.p2align 4,,7
.L12:
	incl I
	jmp .L4
	.p2align 4,,7
.L5:
.L3:
.L2:
	movl -4(%ebp),%ebx
	movl %ebp,%esp
	popl %ebp
	ret
.Lfe1:
	.size	 pascal_main_program,.Lfe1-pascal_main_program
.data
	.type	 ctor_run_condition_0.4,@object
	.size	 ctor_run_condition_0.4,1
ctor_run_condition_0.4:
.byte 1
.globl _p_atexit
.text
	.align 4
.globl init_pascal_main_program
	.type	 init_pascal_main_program,@function
init_pascal_main_program:
	pushl %ebp
	movl %esp,%ebp
	subl $8,%esp
	cmpb $0,ctor_run_condition_0.4
	je .L14
	movb $0,ctor_run_condition_0.4
	addl $-12,%esp
	pushl $fini_pascal_main_program
	call _p_atexit
	addl $16,%esp
.L14:
.L13:
	movl %ebp,%esp
	popl %ebp
	ret
.Lfe2:
	.size	 init_pascal_main_program,.Lfe2-init_pascal_main_program
	.align 4
.globl fini_pascal_main_program
	.type	 fini_pascal_main_program,@function
fini_pascal_main_program:
	pushl %ebp
	movl %esp,%ebp
.L15:
	movl %ebp,%esp
	popl %ebp
	ret
.Lfe3:
	.size	 fini_pascal_main_program,.Lfe3-fini_pascal_main_program
.globl init_pascal_main_program
.globl pascal_main_program
.globl _p_finalize
	.align 4
.globl main
	.type	 main,@function
main:
	pushl %ebp
	movl %esp,%ebp
	subl $8,%esp
	addl $-4,%esp
	movl 16(%ebp),%eax
	pushl %eax
	movl 12(%ebp),%eax
	pushl %eax
	movl 8(%ebp),%eax
	pushl %eax
	call _p_initialize
	addl $16,%esp
	call init_pascal_main_program
	call pascal_main_program
	call _p_finalize
	xorl %eax,%eax
	jmp .L16
	.p2align 4,,7
.L16:
	movl %ebp,%esp
	popl %ebp
	ret
.Lfe4:
	.size	 main,.Lfe4-main
	.ident	"GCC: (GNU) 2.95.2 19991024 (release)"