         Edinburgh IMP77 Compiler - Version 8.4

    1  %BEGIN
    2    %RECORDFORMAT F(%INTEGER I,J,K,%INTEGERARRAY A(1:5))
    3    %RECORD(F) R
    4    %INTEGERARRAYNAME B
    5  
    6    ! Bug in AST_SELECT:
    7    
    8    B==R_A
    9  
   10  %ENDOFPROGRAM

    6 Statements compiled
