Edinburgh IMP77 Compiler - Version 8.4
    1       %EXTERNALINTEGERFN IAND(%INTEGERNAME A,B)
				.machinemode zarch
				.machine "zEC12"
		.text
		.Ltext0:
				.align	8
		.globl IAND
		IAND:
		.LFB185:
		.LVL0:
    2       %RESULT=A&B
				l	%r2,0(%r2)
		.LVL1:
				n	%r2,0(%r3)
    3       %END
				lgfr	%r2,%r2
				br	%r14
		.LFE185:
				.align	8
		.globl IOR
		IOR:
		.LFB186:
    4       %EXTERNALINTEGERFN IOR(%INTEGERNAME A,B)
		.LVL2:
    5       %RESULT=A!B
				l	%r2,0(%r2)
		.LVL3:
				o	%r2,0(%r3)
    6       %END
				lgfr	%r2,%r2
				br	%r14
		.LFE186:
				.align	8
		.globl IEOR
		IEOR:
		.LFB187:
    7       %EXTERNALINTEGERFN IEOR(%INTEGERNAME A,B)
		.LVL4:
    8       %RESULT=A!!B
				l	%r2,0(%r2)
		.LVL5:
				x	%r2,0(%r3)
    9       %END
				lgfr	%r2,%r2
				br	%r14
		.LFE187:
				.align	8
		.globl NOT
		NOT:
		.LFB188:
   10       %EXTERNALINTEGERFN NOT(%INTEGERNAME A)
		.LVL6:
   11       %RESULT=\A
				l	%r2,0(%r2)
		.LVL7:
				xilf	%r2,4294967295
   12       %END
				lgfr	%r2,%r2
				br	%r14
		.LFE188:
				.align	8
		.globl ISHFT
		ISHFT:
		.LFB189:
   13       %EXTERNALINTEGERFN ISHFT(%INTEGERNAME A,B)
		.LVL8:
   14       %IF B>0 %THEN %RESULT=A<<B %ELSE %RESULT=A>>(-B)
				lt	%r1,0(%r3)
				jle	.L10
   15       %END
				l	%r2,0(%r2)
		.LVL9:
				sll	%r2,0(%r1)
		.L11:
				lgfr	%r2,%r2
				br	%r14
		.LVL10:
		.L10:
   16       %EXTERNALINTEGERFNSPEC RETURNCODE
   17       %EXTERNALINTEGERFN SUCESS(%INTEGERNAME DUMMY)
				lcr	%r1,%r1
				l	%r2,0(%r2)
		.LVL11:
				srl	%r2,0(%r1)
				j	.L11
		.LFE189:
				.align	8
		.globl SUCESS
		SUCESS:
		.LFB190:
		.LVL12:
				stmg	%r14,%r15,112(%r15)
				lay	%r15,-160(%r15)
   18       %RESULT=RETURNCODE
				brasl	%r14,RETURNCODE@PLT
		.LVL13:
   19       %END
				lg	%r4,272(%r15)
				lmg	%r14,%r15,272(%r15)
				br	%r4
		.LFE190:
		.Letext0:
?DUMMY unused
   20       %ENDOFFILE
   20 Statements compiled