         Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				.machine ppc
				.section	".text"
		.Ltext0:
				.align 2
				.globl main
		main:
		.LFB185:
		.LVL0:
				stwu 1,-624(1)
				mflr 0
				stw 0,628(1)
				stw 31,620(1)
				lwz 9,-28680(2)
				stw 9,604(1)
				li 9,0
    2
				bl _imp_initialise
		.LVL1:
				addi 10,1,196
    3   ! the example in https://www.ancientgeek.org.uk/EMAS/EMAS_Papers/The_IMP_language_and_compiler.pdf
    4   %integer i, j, k, n
    5
    6   n = 42 ; ! a little initialisation has been added which was not explicit in the paper to avoid runtime errors.
    7
    8   %integer %array a(0:100), b(0:n)
    9
   10   a(n) = n %for n = 0, 1, 100
   11   b(n) = n %for n = 0, 1, 42
				li 9,-1
				li 8,101
				mtctr 8
		.LVL2:
		.L2:
   12   write(n,3); newline
				li 9,-1
		.LVL4:
				li 8,43
				mtctr 8
		.L3:
		.LVL5:
				addi 9,9,1
		.LVL6:
				li 4,3
				li 3,42
				bl _imp_writeint
		.LVL7:
		.LBB11:
		.LBB12:
				bl _imp_newline
		.LVL8:
				addi 10,1,200
				addi 9,1,32
		.LBE12:
		.LBE11:
				li 3,0
   13
				bdnz .L2
				addi 10,1,24
   14   n = 42
				addi 9,9,1
		.LVL3:
				bdnz .L3
		.L4:
   15
				stwu 9,4(10)
		.LDL1:
   16   j = 0; k = 0;
				stwu 9,4(10)
		.LDL2:
		.LDL3:
   17
				li 31,0
				li 8,42
				mtctr 8
		.LVL9:
		.L5:
		.LBB13:
   18   %cycle i = 1, 1, n
   19     j = j + a(i)
				lwzu 8,4(10)
				add 3,3,8
		.LVL10:
   20     k = k + b(i+1)        ;! should cause a runtime error since i+1 == n+1 and array b is 0:n ...
				lwzu 8,4(9)
				add 31,31,8
		.LVL11:
		.LDL4:
   21   %repeat
   22
   23   write(j, 5); write(k, 5); newline
				bdnz .L5
		.L6:
		.LBE13:
				li 4,5
				bl _imp_writeint
		.LVL12:
   24
				li 4,5
				mr 3,31
				bl _imp_writeint
		.LVL13:
		.LBB14:
		.LBB15:
				bl _imp_newline
		.LVL14:
		.LBE15:
		.LBE14:
		.LBB16:
		.LBB17:
				li 3,0
				bl exit
		.LVL15:
		.LBE17:
		.LBE16:
		.LFE185:
		.Letext0:
   25 %endofprogram
   19 Statements compiled
