Edinburgh IMP77 Compiler - Version 8.4-2024.12.18

     1  %begin
 0000 C8 00 00 01                           ENTER 0000,1
     2    %integer i, k
     3    k = 1
 0004 C7 45 F4 01 00 00 00                  MOV DWORD PTR [%EBP-12],#1
     4    i = k << 3
 000B 8B 45 F4                              MOV %EAX,[%EBP-12]
 000E C1 E0 03                              SHL %EAX,#3
 0011 89 45 F8                              MOV [%EBP-8],%EAX
     5  %endofprogram
 0014 C9                                    LEAVE
 0015 C3                                    RET