Edinburgh IMP77 Compiler - Version 8.4-2024.12.18

     1  %begin
 0000 C8 00 00 01                           ENTER 0000,1
     2    %integer int var
     3    int var = 1
 0004 C7 45 F8 01 00 00 00                  MOV DWORD PTR [%EBP-8],#1
     4    %while int var < 10 %cycle
 000B                      L1001  EQU $
 000B 8B 45 F8                              MOV %EAX,[%EBP-8]
 000E 3D 0A 00 00 00                        CMP %EAX,#10
 0013 7D 00                                 JGE L1002
     5       int var = int var + 1
 0015 FF 45 F8                              INC DWORD PTR [%EBP-8]
     6    %repeat
 0018 EB 00                                 JMP L1001
 001A                      L1002  EQU $
     7  %endofprogram
 001A C9                                    LEAVE
 001B C3                                    RET