         Edinburgh IMP77 Compiler - Version 8.4

    1  %begin
    2    ! This is an imp80 construct which does not compile under imp77
    3    ! However after commenting out the imp80-isms, what's left blows
    4    ! up i2c in an unacceptable way rather than generating a program
    5    ! that would merely fail at runtime
    6    %byteintegerarray nval(0:100)
    7    %byteinteger b
    8    
    9    !%byteintegerarrayformat nfm(1 : 4)
   10    %byteintegerarrayname nest
   11  
   12    !nest == array(addr(nval),nfm)
   13  
   14    b = nest(2)
   15  
   16  %endofprogram
?NVAL unused

    6 Statements compiled
