Edinburgh IMP77 Compiler - Version 8.4
    1       %EXTERNALINTEGERFN IAND(%INTEGERNAME A,B)
		.Ltext0:
				.align	1
				.global	IAND
				.thumb
				.thumb_func
		IAND:
		.LFB185:
				@ args = 0, pretend = 0, frame = 0
				@ frame_needed = 0, uses_anonymous_args = 0
				@ link register save eliminated.
		.LVL0:
    2       %RESULT=A&B
				ldr	r0, [r0]
		.LVL1:
				ldr	r3, [r1]
    3       %END
				ands	r0, r0, r3
				bx	lr
		.LFE185:
				.align	1
				.global	IOR
				.thumb
				.thumb_func
		IOR:
		.LFB186:
    4       %EXTERNALINTEGERFN IOR(%INTEGERNAME A,B)
				@ args = 0, pretend = 0, frame = 0
				@ frame_needed = 0, uses_anonymous_args = 0
				@ link register save eliminated.
		.LVL2:
    5       %RESULT=A!B
				ldr	r0, [r0]
		.LVL3:
				ldr	r3, [r1]
    6       %END
				orrs	r0, r0, r3
				bx	lr
		.LFE186:
				.align	1
				.global	IEOR
				.thumb
				.thumb_func
		IEOR:
		.LFB187:
    7       %EXTERNALINTEGERFN IEOR(%INTEGERNAME A,B)
				@ args = 0, pretend = 0, frame = 0
				@ frame_needed = 0, uses_anonymous_args = 0
				@ link register save eliminated.
		.LVL4:
    8       %RESULT=A!!B
				ldr	r0, [r0]
		.LVL5:
				ldr	r3, [r1]
    9       %END
				eors	r0, r0, r3
				bx	lr
		.LFE187:
				.align	1
				.global	NOT
				.thumb
				.thumb_func
		NOT:
		.LFB188:
   10       %EXTERNALINTEGERFN NOT(%INTEGERNAME A)
				@ args = 0, pretend = 0, frame = 0
				@ frame_needed = 0, uses_anonymous_args = 0
				@ link register save eliminated.
		.LVL6:
   11       %RESULT=\A
				ldr	r0, [r0]
		.LVL7:
   12       %END
				mvns	r0, r0
				bx	lr
		.LFE188:
				.align	1
				.global	ISHFT
				.thumb
				.thumb_func
		ISHFT:
		.LFB189:
   13       %EXTERNALINTEGERFN ISHFT(%INTEGERNAME A,B)
				@ args = 0, pretend = 0, frame = 0
				@ frame_needed = 0, uses_anonymous_args = 0
				@ link register save eliminated.
		.LVL8:
   14       %IF B>0 %THEN %RESULT=A<<B %ELSE %RESULT=A>>(-B)
				ldr	r3, [r1]
				cmp	r3, #0
   15       %END
				ittee	gt
				ldrgt	r0, [r0]
		.LVL9:
				lslgt	r0, r0, r3
		.L6:
				bx	lr
		.LFE189:
				.align	1
				.global	SUCESS
				.thumb
				.thumb_func
		SUCESS:
		.LFB190:
				@ args = 0, pretend = 0, frame = 0
				@ frame_needed = 0, uses_anonymous_args = 0
		.LVL10:
				push	{r3, lr}
   16       %EXTERNALINTEGERFNSPEC RETURNCODE
   17       %EXTERNALINTEGERFN SUCESS(%INTEGERNAME DUMMY)
				rsble	r3, r3, #0
				ldrle	r0, [r0]
				it	le
				lsrle	r0, r0, r3
   18       %RESULT=RETURNCODE
				bl	RETURNCODE(PLT)
		.LVL11:
   19       %END
				pop	{r3, pc}
		.LFE190:
		.Letext0:
?DUMMY unused
   20       %ENDOFFILE
   20 Statements compiled