NIL
67←; here are error messages for Interlisp-D

NIL
67←(PRINT "here are error messages for Interlisp-D"]
"here are error messages for Interlisp-D"
"here are error messages for Interlisp-D"
68←
NIL
68←
NIL
68←(for X from 0 to 55 do (printout T X ,,, (ERRORSTRING X) T]
0   SYSTEM ERROR
1   UNUSED
2   STACK OVERFLOW
3   ILLEGAL RETURN
4   ARG NOT LIST
5   HARD DISK ERROR
6   ATTEMPT TO SET NIL OR T
7   ATTEMPT TO RPLAC NIL
8   UNDEFINED OR ILLEGAL GO
9   FILE WON'T OPEN
10   NON-NUMERIC ARG
11   ATOM TOO LONG
12   ATOM HASH TABLE FULL
13   FILE NOT OPEN
14   ARG NOT LITATOM
15   ! too many files open
16   END OF FILE
17   ERROR
18   BREAK
19   ILLEGAL STACK ARG
20   FAULT IN EVAL
21   ARRAYS FULL
22   FILE SYSTEM RESOURCES EXCEEDED
23   FILE NOT FOUND
24   BAD SYSOUT FILE
25   UNUSUAL CDR ARG LIST
26   HASH TABLE FULL
27   ILLEGAL ARG
28   ARG NOT ARRAY
29   ILLEGAL OR IMPOSSIBLE BLOCK
30   STACK PTR HAS BEEN RELEASED
31   STORAGE FULL
32   ATTEMPT TO USE ITEM OF INCORRECT TYPE
33   ILLEGAL DATA TYPE NUMBER
34   DATA TYPES FULL
35   ATTEMPT TO BIND NIL OR T
36   ! too many user interrupt characters
37   ! read-macro context error
38   ILLEGAL READTABLE
39   ILLEGAL TERMINAL TABLE
40   ! swapblock too big for buffer
41   PROTECTION VIOLATION
42   BAD FILE NAME
43   USER BREAK
44   UNBOUND ATOM
45   UNDEFINED CAR OF FORM
46   UNDEFINED FUNCTION
47   CONTROL-E
48   FLOATING UNDERFLOW
49   FLOATING OVERFLOW
50   OVERFLOW
51   ARG NOT HARRAY
52   TOO MANY ARGUMENTS
53   NIL
54   NIL
55   NIL
NIL
69←(ERRORSTRING 0]
"SYSTEM ERROR"
70←(ERRORSTRING 1]
"UNUSED"
71←(ERRORSTRING 2]
"STACK OVERFLOW"
72←(RETURN ]

ILLEGAL RETURN
NIL

73←(ERRORN]
(3 NIL)
74←(RETURN 5]

ILLEGAL RETURN
5

75←ERRORN]
(3 5)
76←(RETURN (IPLUS 3 4) (IPLUS 6 1]

ILLEGAL RETURN
7

77←ERRORN]
(3 7)
78←(RETURN (IPLUS 3 1) (IPLUS 9 1]

ILLEGAL RETURN
4

79←ERRORN]
(3 4)
80←(RPLACA 5 9]

ARG NOT LIST
5

81←ERRORN]
(4 5)
82←(SETQ NIL 7]

ATTEMPT TO SET NIL OR T
7

83←ERRORN]
(6 7)
84←(SETQ T (IPLUS 4 5]

ATTEMPT TO SET NIL OR T
9

85←ERRORN]
(6 9)
86←RPLACA NIL 5]

ATTEMPT TO RPLAC NIL
5

87←ERRORN]
(7 5)
88←RPLACA T 5]
Use SETTOPVAL to 'set' a top level value

ARG NOT LIST
T

89←(RPLACD T 6]
Use SETPROPLIST to 'set' a property list

ARG NOT LIST
T

90←DRIBBLE]