Edinburgh IMP77 Compiler - Version 8.4
    1 %begin
				.machinemode zarch
				.machine "zEC12"
		.text
		.Ltext0:
				.align	8
		.globl main
		main:
		.LFB185:
		.LVL0:
				stmg	%r6,%r15,48(%r15)
				lgr	%r14,%r15
				lay	%r15,-5808(%r15)
				aghi	%r14,-8
				std	%f8,0(%r14)
				ear	%r1,%a0
				sllg	%r1,%r1,32
				ear	%r1,%a1
				lay	%r4,5792(%r15)
				mvc	0(8,%r4),40(%r1)
    2   %string(100) s
				brasl	%r14,_imp_initialise@PLT
		.LVL1:
    3   %string(25) left = "left"
    4   %string(20) middle = "middle"
    5   %string(15) right = "right"
    6   s = left . right
				aghik	%r11,%r15,672
				lghi	%r4,25
				la	%r3,928(%r15)
				lgr	%r2,%r11
				brasl	%r14,_imp_strncpy@PLT
		.LVL2:
    7   printstring(s); newline
				aghik	%r1,%r15,1184
				ldgr	%f8,%r1
				lghi	%r4,20
				la	%r3,1440(%r15)
				lgr	%r2,%r1
				brasl	%r14,_imp_strncpy@PLT
		.LVL3:
    8   s = left . middle . right
				aghik	%r10,%r15,1696
				lghi	%r4,15
				la	%r3,1952(%r15)
				lgr	%r2,%r10
				brasl	%r14,_imp_strncpy@PLT
		.LVL4:
		.LBB48:
		.LBB49:
				aghik	%r8,%r15,5536
				lgr	%r4,%r10
				lgr	%r3,%r11
				lgr	%r2,%r8
				brasl	%r14,_imp_join@PLT
		.LVL5:
		.LBE49:
		.LBE48:
				aghik	%r9,%r15,416
				lghi	%r4,100
				la	%r3,2208(%r15)
				lgr	%r2,%r9
				brasl	%r14,_imp_strncpy@PLT
		.LVL6:
				lay	%r1,5024(%r15)
				mvc	0(256,%r1),2464(%r15)
		.LBB50:
		.LBB51:
				mvc	160(256,%r15),0(%r1)
				aghik	%r7,%r15,160
				lgr	%r2,%r7
				brasl	%r14,_imp_printstring@PLT
		.LVL7:
		.LBE51:
		.LBE50:
		.LBB52:
		.LBB53:
				brasl	%r14,_imp_newline@PLT
		.LVL8:
		.LBE53:
		.LBE52:
		.LBB54:
		.LBB55:
		.LBB56:
    9   printstring(s); newline
   10   s <- left . right
				aghik	%r6,%r15,2976
				lgdr	%r4,%f8
				lgr	%r3,%r11
				lgr	%r2,%r6
				brasl	%r14,_imp_join@PLT
		.LVL9:
		.LBE56:
				lgr	%r4,%r10
				lgr	%r3,%r6
				lgr	%r2,%r8
				brasl	%r14,_imp_join@PLT
		.LVL10:
		.LBE55:
		.LBE54:
				lghi	%r4,100
				la	%r3,2720(%r15)
				lgr	%r2,%r9
				brasl	%r14,_imp_strncpy@PLT
		.LVL11:
				lay	%r1,4768(%r15)
				mvc	0(256,%r1),3232(%r15)
		.LBB57:
		.LBB58:
				mvc	160(256,%r15),0(%r1)
				lgr	%r2,%r7
				brasl	%r14,_imp_printstring@PLT
		.LVL12:
		.LBE58:
		.LBE57:
		.LBB59:
		.LBB60:
				brasl	%r14,_imp_newline@PLT
		.LVL13:
		.LBE60:
		.LBE59:
		.LBB61:
		.LBB62:
   11   printstring(s); newline
   12   s <- left . middle . right
				lgr	%r4,%r10
				lgr	%r3,%r11
				lgr	%r2,%r8
				brasl	%r14,_imp_join@PLT
		.LVL14:
		.LBE62:
		.LBE61:
				lghi	%r4,100
				la	%r3,3488(%r15)
				lgr	%r2,%r9
				brasl	%r14,_imp_strncpy@PLT
		.LVL15:
   13   printstring(s); newline
   14 %endofprogram
				aghik	%r11,%r15,4256
				la	%r4,1184(%r15)
				la	%r3,672(%r15)
				lgr	%r2,%r11
				brasl	%r14,_imp_join@PLT
		.LVL18:
		.LBE69:
				aghik	%r4,%r15,1696
				lgr	%r3,%r11
				lay	%r2,5536(%r15)
				brasl	%r14,_imp_join@PLT
		.LVL19:
		.LBE68:
		.LBE67:
				lghi	%r4,100
				la	%r3,4000(%r15)
				la	%r2,416(%r15)
				brasl	%r14,_imp_strncpy@PLT
		.LVL20:
				llc	%r1,416(%r15)
				clijle	%r1,100,.L3
				mvi	416(%r15),100
		.L3:
				lay	%r1,5536(%r15)
				lay	%r2,4512(%r15)
				mvc	0(256,%r1),0(%r2)
		.LBB70:
		.LBB71:
				mvc	160(256,%r15),0(%r1)
				aghik	%r2,%r15,160
				brasl	%r14,_imp_printstring@PLT
		.LVL21:
		.LBE71:
		.LBE70:
		.LBB72:
		.LBB73:
				brasl	%r14,_imp_newline@PLT
		.LVL22:
		.LBE73:
		.LBE72:
		.LBB74:
		.LBB75:
				lghi	%r2,0
				brasl	%r14,exit@PLT
		.LVL23:
		.LBE75:
		.LBE74:
		.LFE185:
		.Letext0:
   18 Statements compiled
				llc	%r1,416(%r15)
				clijle	%r1,100,.L2
				mvi	416(%r15),100
		.L2:
				lay	%r1,5280(%r15)
				mvc	0(256,%r1),3744(%r15)
		.LBB63:
		.LBB64:
				mvc	160(256,%r15),0(%r1)
				aghik	%r2,%r15,160
				brasl	%r14,_imp_printstring@PLT
		.LVL16:
		.LBE64:
		.LBE63:
		.LBB65:
		.LBB66:
				brasl	%r14,_imp_newline@PLT
		.LVL17:
		.LBE66:
		.LBE65:
		.LBB67:
		.LBB68:
		.LBB69: