MODULE ICL9LPCTETXT STATIC INT EMTLEN IS 80 , ERRCNT IS 120 , MAXENO IS 398 , ERRCNT1 IS ERRCNT+1 , MAXENO1 IS MAXENO+1 ; STATIC WORD BVDTB IS X'18000000' ; MODE DESC IS LONG WORD STRUCT (WORD TB, AD) , EMTEXT IS (EMTLEN) BYTE , EMTLIST IS (ERRCNT1) EMTEXT , ENOMAPROW IS (MAXENO1) INT ; STATIC EMTLIST EMTEXTS IS ( @ 0 /ERROR NO. NOT RECOGNIZED/ @ X"C5D9D9D6D940D5D64B40D5D6E340D9C5C3D6C7D5C9E9C5C4404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 1 /ERROR IN SIMPLE TYPE/ @ X"C5D9D9D6D940C9D540E2C9D4D7D3C540E3E8D7C540404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 2 /SYMBOL EXPECTED WAS IDENTIFIER/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E240C9C4C5D5E3C9C6C9C5D9" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 4 /SYMBOL EXPECTED WAS ')'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D5D7D40404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 5 /SYMBOL EXPECTED WAS ':'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D7A7D40404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 6 /UNEXPECTED SYMBOL/ @ X"E4D5C5E7D7C5C3E3C5C440E2E8D4C2D6D340404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 7 /ERROR IN PARAMETER LIST/ @ X"C5D9D9D6D940C9D540D7C1D9C1D4C5E3C5D940D3C9E2E340404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 8 /SYMBOL EXPECTED WAS 'OF'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407DD6C67D404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 9 /SYMBOL EXPECTED WAS '('/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D4D7D40404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 10 /ERROR IN TYPE/ @ X"C5D9D9D6D940C9D540E3E8D7C54040404040404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 11 /SYMBOL EXPECTED WAS '['/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D4A7D40404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 12 /SYMBOL EXPECTED WAS ']'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D5A7D40404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 13 /SYMBOL EXPECTED WAS 'END'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407DC5D5C47D4040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 14 /SYMBOL EXPECTED WAS ';'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D5E7D40404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 15 /SYMBOL EXPECTED WAS INTEGER CONSTANT/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E240C9D5E3C5C7C5D940C3D6" X"D5E2E3C1D5E3404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 16 /SYMBOL EXPECTED WAS '='/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D7E7D40404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 17 /SYMBOL EXPECTED WAS 'BEGIN'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407DC2C5C7C9D57D404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 18 /ERROR IN DECLARATION PART/ @ X"C5D9D9D6D940C9D540C4C5C3D3C1D9C1E3C9D6D540D7C1D9E34040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 19 /ERROR IN FIELD-LIST/ @ X"C5D9D9D6D940C9D540C6C9C5D3C460D3C9E2E34040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 20 /SYMBOL EXPECTED WAS ','/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D6B7D40404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 21 /MISORDERED DECLARATIONS?/ @ X"D4C9E2D6D9C4C5D9C5C440C4C5C3D3C1D9C1E3C9D6D5E26F404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 50 /ERROR IN CONSTANT/ @ X"C5D9D9D6D940C9D540C3D6D5E2E3C1D5E340404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 51 /SYMBOL EXPECTED WAS ':='/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407D7A7E7D404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 52 /SYMBOL EXPECTED WAS 'THEN'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407DE3C8C5D57D40404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 53 /SYMBOL EXPECTED WAS 'UNTIL'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407DE4D5E3C9D37D404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 54 /SYMBOL EXPECTED WAS 'DO'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407DC4D67D404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 55 /SYMBOL EXPECTED WAS 'TO' OR 'DOWNTO'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407DE3D67D40D6D9407DC4" X"D6E6D5E3D67D404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 56 /SYMBOL EXPECTED WAS 'IF'/ @ X"E2E8D4C2D6D340C5E7D7C5C3E3C5C440E6C1E2407DC9C67D404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 58 /ERROR IN FACTOR/ @ X"C5D9D9D6D940C9D540C6C1C3E3D6D9404040404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 59 /ERROR IN VARIABLE/ @ X"C5D9D9D6D940C9D540E5C1D9C9C1C2D3C540404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 90 /PREMATURE END OF SOURCE TEXT/ @ X"D7D9C5D4C1E3E4D9C540C5D5C440D6C640E2D6E4D9C3C540E3C5E7E34040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 101 /IDENTIFIER DECLARED TWICE/ @ X"C9C4C5D5E3C9C6C9C5D940C4C5C3D3C1D9C5C440E3E6C9C3C54040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 102 /LOW BOUND EXCEEDS HIGH BOUND/ @ X"D3D6E640C2D6E4D5C440C5E7C3C5C5C4E240C8C9C7C840C2D6E4D5C44040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 103 /IDENTIFIER IS NOT OF APPROPRIATE CLASS/ @ X"C9C4C5D5E3C9C6C9C5D940C9E240D5D6E340D6C640C1D7D7D9D6D7D9C9C1" X"E3C540C3D3C1E2E240404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 104 /IDENTIFIER NOT DECLARED/ @ X"C9C4C5D5E3C9C6C9C5D940D5D6E340C4C5C3D3C1D9C5C440404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 105 /SIGN NOT ALLOWED/ @ X"E2C9C7D540D5D6E340C1D3D3D6E6C5C44040404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 106 /NUMBER EXPECTED/ @ X"D5E4D4C2C5D940C5E7D7C5C3E3C5C4404040404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 107 /INCOMPATIBLE SUBRANGE TYPES/ @ X"C9D5C3D6D4D7C1E3C9C2D3C540E2E4C2D9C1D5C7C540E3E8D7C5E2404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 108 /FILE NOT ALLOWED HERE/ @ X"C6C9D3C540D5D6E340C1D3D3D6E6C5C440C8C5D9C5404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 109 /TYPE MUST NOT BE REAL/ @ X"E3E8D7C540D4E4E2E340D5D6E340C2C540D9C5C1D3404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 110 /TAGFIELD TYPE MUST BE ORDINAL OR SUBRANGE/ @ X"E3C1C7C6C9C5D3C440E3E8D7C540D4E4E2E340C2C540D6D9C4C9D5C1D340" X"D6D940E2E4C2D9C1D5C7C540404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 111 /INCOMPATIBLE WITH TAGFIELD TYPE/ @ X"C9D5C3D6D4D7C1E3C9C2D3C540E6C9E3C840E3C1C7C6C9C5D3C440E3E8D7" X"C54040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 112 /INDEX TYPE MUST NOT BE REAL/ @ X"C9D5C4C5E740E3E8D7C540D4E4E2E340D5D6E340C2C540D9C5C1D3404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 113 /INDEX TYPE MUST BE ORDINAL OR SUBRANGE/ @ X"C9D5C4C5E740E3E8D7C540D4E4E2E340C2C540D6D9C4C9D5C1D340D6D940" X"E2E4C2D9C1D5C7C540404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 114 /BASE TYPE MUST NOT BE REAL/ @ X"C2C1E2C540E3E8D7C540D4E4E2E340D5D6E340C2C540D9C5C1D340404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 115 /BASE TYPE MUST BE ORDINAL OR SUBRANGE/ @ X"C2C1E2C540E3E8D7C540D4E4E2E340C2C540D6D9C4C9D5C1D340D6D940E2" X"E4C2D9C1D5C7C54040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 116 /ERROR IN TYPE OF STANDARD PROCEDURE PARAMETER/ @ X"C5D9D9D6D940C9D540E3E8D7C540D6C640E2E3C1D5C4C1D9C440D7D9D6C3" X"C5C4E4D9C540D7C1D9C1D4C5E3C5D9404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 117 /UNSATISFIED FORWARD REFERENCE/ @ X"E4D5E2C1E3C9E2C6C9C5C440C6D6D9E6C1D9C440D9C5C6C5D9C5D5C3C540" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 119 /FORWARD DECLARED: REPETITION OF PARAMETER LIST NOT/ @ @ / ALLOWED/ @ X"C6D6D9E6C1D9C440C4C5C3D3C1D9C5C47A40D9C5D7C5E3C9E3C9D6D540D6" X"C640D7C1D9C1D4C5E3C5D940D3C9E2E340D5D6E340C1D3D3D6E6C5C44040" X"4040404040404040404040404040404040404040" , @ 120 /FUNCTION RESULT TYPE MUST BE ORDINAL, SUBRANGE OR / @ @ /POINTER/ @ X"C6E4D5C3E3C9D6D540D9C5E2E4D3E340E3E8D7C540D4E4E2E340C2C540D6" X"D9C4C9D5C1D36B40E2E4C2D9C1D5C7C540D6D940D7D6C9D5E3C5D9404040" X"4040404040404040404040404040404040404040" , @ 121 /FILE VALUE PARAMETER NOT ALLOWED/ @ X"C6C9D3C540E5C1D3E4C540D7C1D9C1D4C5E3C5D940D5D6E340C1D3D3D6E6" X"C5C440404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 122 /FORWARD DECLARED FUNCTION; REPETITION OF RESULT TY/ @ @ /PE NOT ALLOWED/ @ X"C6D6D9E6C1D9C440C4C5C3D3C1D9C5C440C6E4D5C3E3C9D6D55E40D9C5D7" X"C5E3C9E3C9D6D540D6C640D9C5E2E4D3E340E3E8D7C540D5D6E340C1D3D3" X"D6E6C5C440404040404040404040404040404040" , @ 123 /MISSING RESULT TYPE IN FUNCTION DECLARATION/ @ X"D4C9E2E2C9D5C740D9C5E2E4D3E340E3E8D7C540C9D540C6E4D5C3E3C9D6" X"D540C4C5C3D3C1D9C1E3C9D6D54040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 124 /F - FORMAT FOR REAL ONLY/ @ X"C6406040C6D6D9D4C1E340C6D6D940D9C5C1D340D6D5D3E8404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 125 /ERROR IN TYPE OF STANDARD FUNCTION PARAMETER/ @ X"C5D9D9D6D940C9D540E3E8D7C540D6C640E2E3C1D5C4C1D9C440C6E4D5C3" X"E3C9D6D540D7C1D9C1D4C5E3C5D940404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 126 /NUMBER OF PARAMETERS DOES NOT AGREE WITH DECLARATI/ @ @ /ON/ @ X"D5E4D4C2C5D940D6C640D7C1D9C1D4C5E3C5D9E240C4D6C5E240D5D6E340" X"C1C7D9C5C540E6C9E3C840C4C5C3D3C1D9C1E3C9D6D54040404040404040" X"4040404040404040404040404040404040404040" , @ 128 /RESULT TYPE OF PARAMETER FUNCTION DOES NOT AGREE W/ @ @ /ITH DECLARATION/ @ X"D9C5E2E4D3E340E3E8D7C540D6C640D7C1D9C1D4C5E3C5D940C6E4D5C3E3" X"C9D6D540C4D6C5E240D5D6E340C1C7D9C5C540E6C9E3C840C4C5C3D3C1D9" X"C1E3C9D6D5404040404040404040404040404040" , @ 129 /TYPE CONFLICT OF OPERANDS/ @ X"E3E8D7C540C3D6D5C6D3C9C3E340D6C640D6D7C5D9C1D5C4E24040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 130 /EXPRESSION IS NOT OF SET TYPE/ @ X"C5E7D7D9C5E2E2C9D6D540C9E240D5D6E340D6C640E2C5E340E3E8D7C540" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 131 /TESTS ON EQUALITY ALLOWED ONLY/ @ X"E3C5E2E3E240D6D540C5D8E4C1D3C9E3E840C1D3D3D6E6C5C440D6D5D3E8" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 132 /STRICT INCLUSION NOT ALLOWED/ @ X"E2E3D9C9C3E340C9D5C3D3E4E2C9D6D540D5D6E340C1D3D3D6E6C5C44040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 133 /FILE COMPARISON NOT ALLOWED/ @ X"C6C9D3C540C3D6D4D7C1D9C9E2D6D540D5D6E340C1D3D3D6E6C5C4404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 134 /ILLEGAL TYPE OF OPERAND(S)/ @ X"C9D3D3C5C7C1D340E3E8D7C540D6C640D6D7C5D9C1D5C44DE25D40404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 135 /TYPE OF OPERAND MUST BE BOOLEAN/ @ X"E3E8D7C540D6C640D6D7C5D9C1D5C440D4E4E2E340C2C540C2D6D6D3C5C1" X"D54040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 136 /SET ELEMENT TYPE MUST BE ORDINAL OR SUBRANGE/ @ X"E2C5E340C5D3C5D4C5D5E340E3E8D7C540D4E4E2E340C2C540D6D9C4C9D5" X"C1D340D6D940E2E4C2D9C1D5C7C540404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 137 /SET ELEMENT TYPES NOT COMPATIBLE/ @ X"E2C5E340C5D3C5D4C5D5E340E3E8D7C5E240D5D6E340C3D6D4D7C1E3C9C2" X"D3C540404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 138 /TYPE OF VARIABLE IS NOT ARRAY/ @ X"E3E8D7C540D6C640E5C1D9C9C1C2D3C540C9E240D5D6E340C1D9D9C1E840" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 139 /INDEX TYPE IS NOT COMPATIBLE WITH DECLARATION/ @ X"C9D5C4C5E740E3E8D7C540C9E240D5D6E340C3D6D4D7C1E3C9C2D3C540E6" X"C9E3C840C4C5C3D3C1D9C1E3C9D6D5404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 140 /TYPE OF VARIABLE IS NOT RECORD/ @ X"E3E8D7C540D6C640E5C1D9C9C1C2D3C540C9E240D5D6E340D9C5C3D6D9C4" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 141 /TYPE OF VARIABLE MUST BE FILE OR POINTER/ @ X"E3E8D7C540D6C640E5C1D9C9C1C2D3C540D4E4E2E340C2C540C6C9D3C540" X"D6D940D7D6C9D5E3C5D94040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 142 /ILLEGAL PARAMETER SUBSTITUTION/ @ X"C9D3D3C5C7C1D340D7C1D9C1D4C5E3C5D940E2E4C2E2E3C9E3E4E3C9D6D5" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 143 /ILLEGAL TYPE OF LOOP CONTROL VARIABLE/ @ X"C9D3D3C5C7C1D340E3E8D7C540D6C640D3D6D6D740C3D6D5E3D9D6D340E5" X"C1D9C9C1C2D3C54040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 144 /ILLEGAL TYPE OF EXPRESSION/ @ X"C9D3D3C5C7C1D340E3E8D7C540D6C640C5E7D7D9C5E2E2C9D6D540404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 145 /TYPE CONFLICT/ @ X"E3E8D7C540C3D6D5C6D3C9C3E34040404040404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 146 /ASSIGNMENT OF FILES NOT ALLOWED/ @ X"C1E2E2C9C7D5D4C5D5E340D6C640C6C9D3C5E240D5D6E340C1D3D3D6E6C5" X"C44040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 147 /LABEL TYPE INCOMPATIBLE WITH SELECTING EXPRESSION/ @ X"D3C1C2C5D340E3E8D7C540C9D5C3D6D4D7C1E3C9C2D3C540E6C9E3C840E2" X"C5D3C5C3E3C9D5C740C5E7D7D9C5E2E2C9D6D54040404040404040404040" X"4040404040404040404040404040404040404040" , @ 148 /SUBRANGE BOUNDS MUST BE ORDINAL/ @ X"E2E4C2D9C1D5C7C540C2D6E4D5C4E240D4E4E2E340C2C540D6D9C4C9D5C1" X"D34040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 149 /INDEX TYPE MUST NOT BE INTEGER/ @ X"C9D5C4C5E740E3E8D7C540D4E4E2E340D5D6E340C2C540C9D5E3C5C7C5D9" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 150 /ASSIGNMENT TO STANDARD FUNCTION IS NOT ALLOWED/ @ X"C1E2E2C9C7D5D4C5D5E340E3D640E2E3C1D5C4C1D9C440C6E4D5C3E3C9D6" X"D540C9E240D5D6E340C1D3D3D6E6C5C44040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 151 /ASSIGNMENT TO FORMAL FUNCTION IS NOT ALLOWED/ @ X"C1E2E2C9C7D5D4C5D5E340E3D640C6D6D9D4C1D340C6E4D5C3E3C9D6D540" X"C9E240D5D6E340C1D3D3D6E6C5C440404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 152 /NO SUCH FIELD IN THIS RECORD/ @ X"D5D640E2E4C3C840C6C9C5D3C440C9D540E3C8C9E240D9C5C3D6D9C44040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 154 /ACTUAL PARAMETER MUST BE A VARIABLE/ @ X"C1C3E3E4C1D340D7C1D9C1D4C5E3C5D940D4E4E2E340C2C540C140E5C1D9" X"C9C1C2D3C540404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 155 /CONTROL VARIABLE MUST NOT BE FORMAL/ @ X"C3D6D5E3D9D6D340E5C1D9C9C1C2D3C540D4E4E2E340D5D6E340C2C540C6" X"D6D9D4C1D340404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 156 /MULTIDEFINED CASE LABEL/ @ X"D4E4D3E3C9C4C5C6C9D5C5C440C3C1E2C540D3C1C2C5D340404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 158 /MISSING CORRESPONDING VARIANT DECLARATION/ @ X"D4C9E2E2C9D5C740C3D6D9D9C5E2D7D6D5C4C9D5C740E5C1D9C9C1D5E340" X"C4C5C3D3C1D9C1E3C9D6D540404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 159 /REAL OR STRING TAGFIELDS NOT ALLOWED/ @ X"D9C5C1D340D6D940E2E3D9C9D5C740E3C1C7C6C9C5D3C4E240D5D6E340C1" X"D3D3D6E6C5C4404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 161 /AGAIN FORWARD DECLARED/ @ X"C1C7C1C9D540C6D6D9E6C1D9C440C4C5C3D3C1D9C5C44040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 162 /PARAMETER SIZE MUST BE CONSTANT/ @ X"D7C1D9C1D4C5E3C5D940E2C9E9C540D4E4E2E340C2C540C3D6D5E2E3C1D5" X"E34040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 164 /SUBSTITUTION OF STANDARD PROC/FUNC NOT ALLOWED/ @ X"E2E4C2E2E3C9E3E4E3C9D6D540D6C640E2E3C1D5C4C1D9C440D7D9D6C361" X"C6E4D5C340D5D6E340C1D3D3D6E6C5C44040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 165 /MULTIDEFINED LABEL/ @ X"D4E4D3E3C9C4C5C6C9D5C5C440D3C1C2C5D3404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 166 /MULTIDECLARED LABEL/ @ X"D4E4D3E3C9C4C5C3D3C1D9C5C440D3C1C2C5D34040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 167 /UNDECLARED LABEL/ @ X"E4D5C4C5C3D3C1D9C5C440D3C1C2C5D34040404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 168 /UNDEFINED LABEL IN BLOCK JUST ENDED/ @ X"E4D5C4C5C6C9D5C5C440D3C1C2C5D340C9D540C2D3D6C3D240D1E4E2E340" X"C5D5C4C5C440404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 169 /ERROR IN BASE SET/ @ X"C5D9D9D6D940C9D540C2C1E2C540E2C5E340404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 170 /PROCEDURE OR FUNCTION WITH ONLY VALUE PARAMETERS E/ @ @ /XPECTED/ @ X"D7D9D6C3C5C4E4D9C540D6D940C6E4D5C3E3C9D6D540E6C9E3C840D6D5D3" X"E840E5C1D3E4C540D7C1D9C1D4C5E3C5D9E240C5E7D7C5C3E3C5C4404040" X"4040404040404040404040404040404040404040" , @ 172 /UNDECLARED EXTERNAL FILE/ @ X"E4D5C4C5C3D3C1D9C5C440C5E7E3C5D9D5C1D340C6C9D3C5404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 173 /PACKED COMPONENT CANNOT BE PASSED AS VARIABLE PARA/ @ @ /METER/ @ X"D7C1C3D2C5C440C3D6D4D7D6D5C5D5E340C3C1D5D5D6E340C2C540D7C1E2" X"E2C5C440C1E240E5C1D9C9C1C2D3C540D7C1D9C1D4C5E3C5D94040404040" X"4040404040404040404040404040404040404040" , @ 174 /FORWARD PROCEDURE OR FUNCTION NOT FOUND IN BLOCK J/ @ @ /UST ENDED/ @ X"C6D6D9E6C1D9C440D7D9D6C3C5C4E4D9C540D6D940C6E4D5C3E3C9D6D540" X"D5D6E340C6D6E4D5C440C9D540C2D3D6C3D240D1E4E2E340C5D5C4C5C440" X"4040404040404040404040404040404040404040" , @ 175 /SUBRANGE BOUNDS CANNOT BE REAL/ @ X"E2E4C2D9C1D5C7C540C2D6E4D5C4E240C3C1D5D5D6E340C2C540D9C5C1D3" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 176 /LABEL NOT DEFINED AT CORRECT LEVEL/ @ X"D3C1C2C5D340D5D6E340C4C5C6C9D5C5C440C1E340C3D6D9D9C5C3E340D3" X"C5E5C5D34040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 177 /PERMANENT FILE UNDECLARED/ @ X"D7C5D9D4C1D5C5D5E340C6C9D3C540E4D5C4C5C3D3C1D9C5C44040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 178 /NO INPUT OR OUTPUT FILE SPECIFIED/ @ X"D5D640C9D5D7E4E340D6D940D6E4E3D7E4E340C6C9D3C540E2D7C5C3C9C6" X"C9C5C4404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 201 /ERROR IN REAL CONSTANT: DIGIT EXPECTED/ @ X"C5D9D9D6D940C9D540D9C5C1D340C3D6D5E2E3C1D5E37A40C4C9C7C9E340" X"C5E7D7C5C3E3C5C440404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 202 /STRING CONSTANT MUST NOT EXCEED SOURCE LINE/ @ X"E2E3D9C9D5C740C3D6D5E2E3C1D5E340D4E4E2E340D5D6E340C5E7C3C5C5" X"C440E2D6E4D9C3C540D3C9D5C54040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 203 /INTEGER CONSTANT EXCEEDS RANGE/ @ X"C9D5E3C5C7C5D940C3D6D5E2E3C1D5E340C5E7C3C5C5C4E240D9C1D5C7C5" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 205 /STRING OF LENGTH ZERO NOT ALLOWED/ @ X"E2E3D9C9D5C740D6C640D3C5D5C7E3C840E9C5D9D640D5D6E340C1D3D3D6" X"E6C5C4404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 250 /TOO MANY NESTED SCOPES OF IDENTIFIERS/ @ X"E3D6D640D4C1D5E840D5C5E2E3C5C440E2C3D6D7C5E240D6C640C9C4C5D5" X"E3C9C6C9C5D9E24040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 251 /ERROR IN INITIALISATION OF GLOBAL VARIABLES/ @ X"C5D9D9D6D940C9D540C9D5C9E3C9C1D3C9E2C1E3C9D6D540D6C640C7D3D6" X"C2C1D340E5C1D9C9C1C2D3C5E24040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 252 /TOO MANY FORWARD REFERENCES OF PROCEDURE ENTRIES/ @ X"E3D6D640D4C1D5E840C6D6D9E6C1D9C440D9C5C6C5D9C5D5C3C5E240D6C6" X"40D7D9D6C3C5C4E4D9C540C5D5E3D9C9C5E2404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 253 /PROCEDURE TOO LONG/ @ X"D7D9D6C3C5C4E4D9C540E3D6D640D3D6D5C7404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 255 /TOO MANY ERRORS ON THIS SOURCE LINE/ @ X"E3D6D640D4C1D5E840C5D9D9D6D9E240D6D540E3C8C9E240E2D6E4D9C3C5" X"40D3C9D5C540404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 294 /TOO MUCH OBJECT CODE IN THIS LINE/ @ X"E3D6D640D4E4C3C840D6C2D1C5C3E340C3D6C4C540C9D540E3C8C9E240D3" X"C9D5C5404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 295 /R-H MARGIN SETTING TOO LARGE/ @ X"D960C840D4C1D9C7C9D540E2C5E3E3C9D5C740E3D6D640D3C1D9C7C54040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 296 /PROGRAM SOURCE LINE TOO LONG/ @ X"D7D9D6C7D9C1D440E2D6E4D9C3C540D3C9D5C540E3D6D640D3D6D5C74040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 297 /UNRECOGNISED DIRECTIVE IDENTIFIER/ @ X"E4D5D9C5C3D6C7D5C9E2C5C440C4C9D9C5C3E3C9E5C540C9C4C5D5E3C9C6" X"C9C5D9404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 298 /MISPLACED DIRECTIVE/ @ X"D4C9E2D7D3C1C3C5C440C4C9D9C5C3E3C9E5C54040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 299 /INVALID DIRECTIVE/ @ X"C9D5E5C1D3C9C440C4C9D9C5C3E3C9E5C540404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 300 /DIVISION BY ZERO/ @ X"C4C9E5C9E2C9D6D540C2E840E9C5D9D64040404040404040404040404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 302 /VALUE OUTSIDE EXPECTED RANGE/ @ X"E5C1D3E4C540D6E4E3E2C9C4C540C5E7D7C5C3E3C5C440D9C1D5C7C54040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" , @ 303 /OVERFLOW OR DIVISION BY ZERO IN INTEGER ARITHMETIC/ @ X"D6E5C5D9C6D3D6E640D6D940C4C9E5C9E2C9D6D540C2E840E9C5D9D640C9" X"D540C9D5E3C5C7C5D940C1D9C9E3C8D4C5E3C9C340404040404040404040" X"4040404040404040404040404040404040404040" , @ 398 /IMPLEMENTATION RESTRICTION/ @ X"C9D4D7D3C5D4C5D5E3C1E3C9D6D540D9C5E2E3D9C9C3E3C9D6D540404040" X"404040404040404040404040404040404040404040404040404040404040" X"4040404040404040404040404040404040404040" ) ; STATIC ENOMAPROW ENOMAP IS ( @ 0 @ 0 , 1 , 2 , 0 , 3 , 4 , 5 , 6 , @ 8 @ 7 , 8 , 9 , 10 , 11 , 12 , 13 , 14 , @ 16 @ 15 , 16 , 17 , 18 , 19 , 20 , 0 , 0 , @ 24 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 32 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 40 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 48 @ 0 , 0 , 21 , 22 , 23 , 24 , 25 , 26 , @ 56 @ 27 , 0 , 28 , 29 , 0 , 0 , 0 , 0 , @ 64 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 72 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 80 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 88 @ 0 , 0 , 30 , 0 , 0 , 0 , 0 , 0 , @ 96 @ 0 , 0 , 0 , 0 , 0 , 31 , 32 , 33 , @ 104 @ 34 , 35 , 36 , 37 , 38 , 39 , 40 , 41 , @ 112 @ 42 , 43 , 44 , 45 , 46 , 47 , 0 , 48 , @ 120 @ 49 , 50 , 51 , 52 , 53 , 54 , 55 , 0 , @ 128 @ 56 , 57 , 58 , 59 , 60 , 61 , 62 , 63 , @ 136 @ 64 , 65 , 66 , 67 , 68 , 69 , 70 , 71 , @ 144 @ 72 , 73 , 74 , 75 , 76 , 77 , 78 , 79 , @ 152 @ 80 , 0 , 81 , 82 , 83 , 0 , 84 , 85 , @ 160 @ 0 , 86 , 87 , 0 , 88 , 89 , 90 , 91 , @ 168 @ 92 , 93 , 94 , 0 , 95 , 96 , 97 , 98 , @ 176 @ 99 , 100 , 101 , 0 , 0 , 0 , 0 , 0 , @ 184 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 192 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 200 @ 0 , 102 , 103 , 104 , 0 , 105 , 0 , 0 , @ 208 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 216 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 224 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 232 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 240 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 248 @ 0 , 0 , 106 , 107 , 108 , 109 , 0 , 110 , @ 256 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 264 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 272 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 280 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 288 @ 0 , 0 , 0 , 0 , 0 , 0 , 111 , 112 , @ 296 @ 113 , 114 , 115 , 116 , 117 , 0 , 118 , 119 , @ 304 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 312 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 320 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 328 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 336 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 344 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 352 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 360 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 368 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 376 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 384 @ 0 , 0 , 0 , 0 , 0 , 0 , 0 , 0 , @ 392 @ 0 , 0 , 0 , 0 , 0 , 0 , 120 ) ; GLOBAL STATIC PROC ICL9LPET IS ( INT ENO , DESC TEXTVAR ) : BEGIN INT INX IS IF (ENO<0) OR (ENO>MAXENO) THEN 0 ELSE ENOMAP (ENO) FI ; REF EMTEXT TEXT IS DTOB(DESC:(BVDTB+W'EMTLEN, TEXTVAR.AD)) ; TEXT := EMTEXTS (INX) ; END ; ENDMODULE