SNOJOB
         IDENT SNOJOB                                                   SNOJOB       1
         TITLE RUN-TIME ERROR MESSAGE TEXTS                             SNOJOB       2
         LCC   OVERLAY(SNOJOB,1,0)                                      SNOJOB       3
*                                                                       SNOJOB       4
*                                                                       SNOJOB       5
*  THIS ASSEMBLY GENERATES AN ABSOLUTE OVERLAY CONTAINING ERROR MESSAGE SNOJOB       6
*  TEXTS PRECEDED BY A DIRECTORY.  AN ENTRY IN THE DIRECTORY IS 30 BITS SNOJOB       7
*  LONG, AND CONTAIN A POINTER, RELATIVE TO THE FIRST WORD OF THE       SNOJOB       8
*  DIRECTORY, OF THE CORRESPONDING MESSAGE TEXT.  DIRECTORY ENTRIES, ANDSNOJOB       9
*  THE CALLS TO THE @E@ MACRO WHICH GENERATES THEM, MUST BE IN ORDER OF SNOJOB      10
*  ERROR NUMBER.                                                        SNOJOB      11
*  MESSAGES OF THE FORM  (DUMMY -- NO. K)  ARE NOT CURRENTLY IN USE;    SNOJOB      12
*  THEIR ERROR NUMBERS SHOULD BE REASSIGNED WHEN A NEW RUN-TIME ERROR ISSNOJOB      13
*  DEFINED.                                                             SNOJOB      14
*                                                                       SNOJOB      15
*                                                                       SNOJOB      16
         MACRO E,NUM,MESSAGE                                            SNOJOB      17
         LOCAL ADDR                                                     SNOJOB      18
         IFNE  NUM,ECTR                                                 SNOJOB      19
         ERR (TABLE OUT OF SEQUENCE OR MISSING ENTRY)                   SNOJOB      20
         ENDIF                                                          SNOJOB      21
ECTR     SET   ECTR+1                                                   SNOJOB      22
         VFD   30/ADDR-ORIGIN                                           SNOJOB      23
         USE   TEXTS                                                    SNOJOB      24
ADDR     DIS   ,? MESSAGE_.?                                            SNOJOB      25
         USE   *                                                        SNOJOB      26
         ENDM                                                           SNOJOB      27
*                                                                       SNOJOB      28
ECTR     SET   0                                                        SNOJOB      29
ORIGIN   BSS   0                                                        SNOJOB      30
         ENTRY ORIGIN                                                   SNOJOB      31
*                                                                       SNOJOB      32
*                                                                       SNOJOB      33
00 E (DUMMY -- NO. 0)                                                   SNOJOB      34
01 E (DUMMY -- NO. 1)                                                   SNOJOB      35
02 E (NON-INTEGER STRING USED IN NUMERIC CONTEXT)                       SNOJOB      36
03 E (DIVISION BY ZERO WAS ATTEMPTED)                                   SNOJOB      37
04 E (VARIABLE TO THE LEFT OF A " DOES NOT CONTAIN AN ARRAY)            SNOJOB      38
05 E (DUMMY -- NO. 5)                                                   SNOJOB      39
06 E (TOO MANY SUBSCRIPTS IN AN ARRAY REFERENCE)                        SNOJOB      40
07 E (TOO FEW SUBSCRIPTS IN AN ARRAY REFERENCE)                         SNOJOB      41
08 E (DUMMY -- NO. 8)                                                   SNOJOB      42
09 E (A FAILURE OCCURRED IN THE EVALUATION OF THE GO-TO PART)           SNOJOB      43
10 E (TRANSFER TO AN UNDEFINED LABEL)                                   SNOJOB      44
11 E (DUMMY -- NO. 11)                                                  SNOJOB      45
12 E (FORBIDDEN OPERAND TYPE FOR ALTERNATION)                           SNOJOB      46
13 E (THE DATA TYPE USED MAY ONLY BE CONCATENATED WITH THE NULL STRING) SNOJOB      47
14 E (CALL OF AN UNDEFINED PROCEDURE)                                   SNOJOB      48
15 E (THE LEFT OPERAND FOR A PATTERN MATCH MUST BE A STRING)            SNOJOB      49
16 E (THE RIGHT OPERAND FOR A PATTERN MATCH MUST BE A PATTERN)          SNOJOB      50
17 E (THE MAXIMUM FIELD LENGTH HAS BEEN EXCEEDED)                       SNOJOB      51
18 E (THE MAXIMUM STRING LENGTH HAS BEEN EXCEEDED)                      SNOJOB      52
19 E (THE STATEMENT LIMIT HAS BEEN EXCEEDED)                            SNOJOB      53
20 E (DUMMY -- NO. 20)                                                  SNOJOB      54
21 E (THE PARAMETER FOR A FIELD FUNCTION WAS NOT A DATA REFERENCE)      SNOJOB      55
22 E (NO SUCH FIELD IN THE REFERENCED DATA STRUCTURE)                   SNOJOB      56
23 E (RETURN FROM LEVEL ZERO)                                           SNOJOB      57
24 E (THE VALUE OF A VARIABLE IN A DEFERRED-EVALUATION PATTERN (UNARY *)SNOJOB      58
, MUST BE A PATTERN OR STRING)                                          SNOJOB      59
25 E (AN -NRETURN- WAS EXPECTED FROM THE PROCEDURE CALLED)              SNOJOB      60
26 E (A PROCEDURE RETURNING BY -NRETURN- MUST SUPPLY A NAME AS ITS VALUESNOJOB      61
,)                                                                      SNOJOB      62
27 E (INDIRECT REFERENCE TO THE NULL STRING)                            SNOJOB      63
28 E (DATA CONSTRUCTOR CANNOT SUPPLY A NAME)                            SNOJOB      64
29 E (WRONG PARAMETER TYPE FOR STANDARD PROCEDURE)                      SNOJOB      65
30 E (SYNTAX ERROR IN DATA PROTOTYPE)                                   SNOJOB      66
31 E (DUPLICATE NAMES IN DATA PROTOTYPE)                                SNOJOB      67
32 E (STRING ARITHMETIC NOT YET IMPLEMENTED)                            SNOJOB      68
33 E (OPERAND FOR INDIRECTION MUST BE NAME OR STRING)                   SNOJOB      69
34 E (TYPE ERROR IN GO-TO PART)                                         SNOJOB      70
35 E (FILE SPECIFIED TO I/O PROCEDURE MUST BE CURRENTLY ATTACHED)       SNOJOB      71
36 E (DUMMY -- NO. 36)                                                  SNOJOB      72
37 E (REAL ARITHMETIC OVERFLOW)                                         SNOJOB      73
38 E (MIXED MODES (INTEGER, REAL) FOR ARITHMETIC OPERATION)             SNOJOB      74
39 E (ILLEGAL CHARACTER IN ARRAY PROTOTYPE)                             SNOJOB      75
40 E (ILLEGAL FILENAME GIVEN TO I/O ASSOCIATION PROCEDURE)              SNOJOB      76
41 E (DUMMY -- NO. 41)                                                  SNOJOB      77
42 E (ARGUMENT FOR LEN, POS, RPOS, TAB, OR RTAB MUST BE IN THE INTERVAL SNOJOB      78
,"0, 2**17-1!)                                                          SNOJOB      79
43 E (SYNTAX ERROR IN ARRAY PROTOTYPE)                                  SNOJOB      80
44 E (SYNTAX ERROR IN PROCEDURE PROTOTYPE)                              SNOJOB      81
45 E (LEFT OPERAND FOR BINARY $ AND . MUST BE A PATTERN)                SNOJOB      82
46 E (PATTERN MATCH WITH REPLACEMENT REQUIRES STRING-VALUED RIGHT HAND SSNOJOB      83
,IDE)                                                                   SNOJOB      84
47 E (TYPE ERROR IN NUMERIC CONTEXT)                                    SNOJOB      85
48 E (LOWER BOUND GREATER THAN UPPER BOUND IN ARRAY PROTOTYPE)          SNOJOB      86
49 E (AN ARRAY BOUND WAS TOO LARGE)                                     SNOJOB      87
50 E (AN ARRAY DIMENSION WAS TOO LARGE)                                 SNOJOB      88
51 E (SYNTAX ERROR IN STRING TO BE COMPILED)                            SNOJOB      89
52 E (ONLY STRINGS MAY BE OUTPUT)                                       SNOJOB      90
53 E (INCORRECT SYNTAX FOR STRING TO BE CONVERTED TO REAL)              SNOJOB      91
54 E (COMPILER STACK OVERFLOW, SIMPLIFY THE CONSTRUCTION)               SNOJOB      92
55 E (ATTEMPT TO READ PAST END-OF-INFORMATION)                          SNOJOB      93
56 E (STRING TO BE DISPLAYED WAS LONGER THAN 80 CHARACTERS)             SNOJOB      94
57 E (AN ARRAY MUST CONTAIN FEWER THAN 2**17 ELEMENTS)                  SNOJOB      95
58 E (DUMMY - NO. 58)                                                   SNOJOB      96
59 E (IMPROPER ARGUMENT FOR PSEUDO-FIELD FUNCTION (FIRST, REST, LEFT, RISNOJOB      97
,GHT, PARAM, BASE, OR SELECTOR))                                        SNOJOB      98
60 E (SYNTAX ERROR IN ITEM() SELECTOR)                                  SNOJOB      99
*                                                                       SNOJOB     100
*                                                                       SNOJOB     101
         END   ORIGIN                                                   SNOJOB     102