         Edinburgh IMP77 Compiler - Version 8.4

    1  %begin
    2    %constinteger TAB = 9
    3    %integer a, b, c
    4    ! create a tab-delimited data file:
    5    open output(2, "temp.txt")
    6    select output(2)
    7    {by the way PRINT CH is missing from the perms}
    8    write(123, -1); print symbol(TAB); write (42, -1); print symbol(TAB); write(17, -1); newline
    9    close output
   10    select output(0)
   11    open input(2, "temp.txt")
   12    select input(2)
   13    read(a)
   14    read(b)
   15    read(c)
   16    print string("Total = "); write(a+b+c, -1); newline
   17  %endofprogram

   22 Statements compiled
