******************************************* * BAB's Micro Modula-2 Compiler v1.1 Beta * ******************************************* --LEXEME-- --TOKEN-- --ATTRIBUTE-- PROCEDURE procedure n/a Max identifier n/a ( l_paran n/a i identifier n/a , comma n/a j identifier n/a : colon n/a INTEGER type_name n/a ) r_paran n/a : colon n/a INTEGER type_name n/a ; semicolon n/a { UNKNOWN n/a return identifier n/a maximum identifier n/a of identifier n/a integers identifier n/a i identifier n/a and identifier n/a j identifier n/a } UNKNOWN n/a BEGIN begin n/a IF if n/a i identifier n/a < rel_op n/a j identifier n/a THEN then n/a max identifier n/a := assignment n/a i identifier n/a ; semicolon n/a ELSE else n/a max identifier n/a := assignment n/a j identifier n/a ; semicolon n/a END end n/a ; semicolon n/a END end n/a Max identifier n/a ; semicolon n/a Program exiting . . . Process completed with exit code 1