1: /*
2: * $Id: errmsg.h,v 1.4 2025/05/20 16:20:42 snw Exp $
3: * error message definitions
4: *
5: *
6: * Author: Serena Willis <snw@coherent-logic.com>
7: * Copyright (C) 1998 MUG Deutschland
8: * Copyright (C) 2020, 2025 Coherent Logic Development LLC
9: *
10: *
11: * This file is part of FreeM.
12: *
13: * FreeM is free software: you can redistribute it and/or modify
14: * it under the terms of the GNU Affero Public License as published by
15: * the Free Software Foundation, either version 3 of the License, or
16: * (at your option) any later version.
17: *
18: * FreeM is distributed in the hope that it will be useful,
19: * but WITHOUT ANY WARRANTY; without even the implied warranty of
20: * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21: * GNU Affero Public License for more details.
22: *
23: * You should have received a copy of the GNU Affero Public License
24: * along with FreeM. If not, see <https://www.gnu.org/licenses/>.
25: *
26: * $Log: errmsg.h,v $
27: * Revision 1.4 2025/05/20 16:20:42 snw
28: * Update ROUTINE SSVN after ZEDIT and ZSAVE
29: *
30: * Revision 1.3 2025/03/09 19:14:24 snw
31: * First phase of REUSE compliance and header reformat
32: *
33: *
34: * SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC
35: * SPDX-License-Identifier: AGPL-3.0-or-later
36: **/
37:
38: int SIflag[MAXDEV + 1] = {1, 1, 1, 1, 1}; /* SI/SO flag */
39:
40: char errmes[MAXERR][ERRLEN] = {
41: "\201", /* OK */
42: "interrupt\201", /* INRPT */
43: "BREAK point\201", /* BKERR */
44: "syntax illegal in current dialect mode\201", /* NOSTAND */
45: "variable not found\201", /* UNDEF */
46: "label not found\201", /* LBLUNDEF */
47: "missing operand\201", /* MISSOPD */
48: "missing operator\201", /* MISSOP */
49: "unrecognized operator\201", /* ILLOP */
50: "unmatched quotes\201", /* QUOTER */
51: "comma expected\201", /* COMMAER */
52: "equals '=' expected\201", /* ASSIGNER */
53: "argument not permitted\201", /* ARGER */
54: "blank ' ' expected\201", /* SPACER */
55: "unmatched parentheses\201", /* BRAER */
56: "level error\201", /* LVLERR */
57: "divide by zero\201", /* DIVER */
58: "function not found\201", /* ILLFUN */
59: "wrong number of function arguments\201", /* FUNARG */
60: "ZTRAP error\201", /* ZTERR */
61: "$NEXT/$ORDER error\201", /* NEXTER */
62: "$SELECT error\201", /* SELER */
63: "illegal command\201", /* CMMND */
64: "argument list incorrect\201", /* ARGLIST */
65: "invalid expression\201", /* INVEXPR */
66: "invalid reference\201", /* INVREF */
67: "string too long\201", /* MXSTR */
68: "too many parameters\201", /* TOOPARA */
69: "unit not open\201", /* NOPEN */
70: "unit does not exist\201", /* NODEVICE */
71: "file protection violation\201",/* PROTECT */
72: "global not permitted\201", /* GLOBER */
73: "file not found\201", /* FILERR */
74: "program overflow\201", /* PGMOV */
75: "stack overflow\201", /* STKOV */
76: "symbol table overflow\201", /* STORE */
77: "file won't read\201", /* NOREAD */
78: "file won't write\201", /* NOWRITE */
79: "routine not found\201", /* NOPGM */
80: "illegal naked reference\201", /* NAKED */
81: "illegal subscript\201", /* SBSCR */
82: "insert syntax\201", /* ISYNTX */
83: "database degradation\201", /* DBDGD */
84: "job kill signal\201", /* KILLER */
85: "hangup signal\201", /* HUPER */
86: "numeric overflow\201", /* MXNUM */
87: "function returns no value\201",/* NOVAL */
88: "type mismatch\201", /* TYPEMISMATCH */
89: "out of memory\201", /* MEMOV */
90: "error in name resolution\201", /* NAMERES */
91: "error creating socket\201", /* SCKCREAT */
92: "invalid address family (must be IPV4 or IPV6)\201", /* SCKIFAM */
93: "invalid connection type (must be TCP or UDP)\201", /* SCKITYP */
94: "invalid port number\201", /* SCKIPRT */
95: "connection error\201", /* SCKCERR */
96: "USE action invalid for connection type (possibly CONNECT on UDP socket?)\201", /* SCKAERR */
97: "attempted to CONNECT an already-connected socket\201", /* SCKACON */
98: "attempted to READ from a disconnected TCP socket\201", /* SCKNCON */
99: "error setting socket options\201", /* SCKEOPT */
100: "error in READ from socket\201", /* SCKERCV */
101: "error in WRITE to socket\201", /* SCKESND */
102: "^$ZRPI only supported on Raspberry Pi hardware\201", /* NORPI */
103: "cannot redefine ZCONST\201", /* CREDEF */
104: "cannot modify CONST\201", /* CMODIFY */
105: "cannot open existing file for WRITE\201", /* FILEXWR */
106: "initializing NEW with multiple setarguments not supported\201", /* INEWMULT */
107: "invalid $HOROLOG value\201", /* ZINVHORO */
108: "type mismatch\201", /* TYPMISMATCH */
109: "invalid type specification\201", /* INVTYPE */
110: "invalid library option\201", /* INVLIBOPT */
111: " \201",
112: " \201",
113: " \201",
114: " \201",
115: " \201",
116: " \201",
117: " \201",
118: " \201",
119: " \201",
120: " \201",
121: "invalid value for $ECODE\201", /* ECODEINV */
122: "programmer assertion failed\201", /* ASSERT */
123: "user-defined error\201", /* USERERR */
124: "illegal access to private object field\201", /* OBJFLDACCV */
125: "cannot overwrite local variable with object instance\201", /* OBJCONFLICT */
126: "exceeded maximum count of private object fields\201", /* OBJPRIVOVFL */
127: "invalid access class specifier\201", /* OBJACINVALID */
128: " \201",
129: " \201",
130: " \201",
131: " \201",
132: " \201",
133: " \201",
134: " \201",
135: " \201",
136: " \201",
137: " \201",
138: " \201",
139: " \201",
140: " \201",
141: " \201",
142: " \201",
143: " \201",
144: " \201",
145: " \201",
146: " \201",
147: " \201",
148: " \201",
149: " \201",
150: " \201",
151: " \201",
152: " \201",
153: " \201",
154: " \201",
155: " \201",
156: " \201",
157: " \201",
158: " \201",
159: " \201",
160: " \201",
161: " \201",
162: " \201",
163: " \201",
164: " \201",
165: " \201",
166: " \201",
167: " \201",
168: " \201",
169: "syntax error\201", /* 128 - ZSYNTERR */
170: " \201", /* 129 */
171: " \201", /* 130 */
172: " \201", /* 131 */
173: " \201",
174: " \201",
175: " \201",
176: " \201",
177: " \201",
178: " \201",
179: " \201",
180: " \201",
181: "naked indicator undefined\201", /* 140 - M1 */
182: "invalid combination with $FNUMBER code atom\201", /* M2 */
183: "$RANDOM seed less than 1\201", /* M3 */
184: "no true condition in $SELECT\201", /* M4 */
185: "line reference less than zero\201", /* M5 */
186: "undefined local variable\201", /* M6 */
187: "undefined global variable\201", /* M7 */
188: "undefined intrinsic special variable\201", /* M8 */
189: "divide by zero\201", /* M9 */
190: "invalid pattern match range\201", /* M10 */
191: "no parameters passed\201", /* 150 - M11 */
192: "invalid line reference (negative offset)\201", /* M12 */
193: "invalid line reference (line not found)\201", /* M13 */
194: "line level not 1\201", /* M14 */
195: "undefined index variable\201", /* M15 */
196: "argumented QUIT not allowed\201", /* M16 */
197: "argumented QUIT required\201", /* M17 */
198: "fixed length READ not greater than zero\201", /* M18 */
199: "cannot copy a tree or subtree into itself\201", /* M19 */
200: "line must have a formal parameter list\201", /* M20 */
201: "algorithm specification invalid\201", /* 160 - M21 */
202: "SET or KILL to ^$GLOBAL when data in global\201", /* M22 */
203: "SET or KILL to ^$JOB for non-existent job number\201", /* M23 */
204: "change to collation algorithm while subscripted local variables defined\201", /* M24 */
205: " \201", /* M25 */
206: "non-existent namespace\201", /* M26 */
207: "attempt to rollback a transaction that is not restartable\201", /* M27 */
208: "mathematical function, parameter out of range\201", /* M28 */
209: "SET or KILL on structured system variable not allowed by implementation\201", /* M29 */
210: "reference to global variable with different collating sequence within a collating algorithm\201", /* M30 */
211: "control mnemonic used for device without a mnemonic space selected\201", /* 170 - M31 */
212: "control mnemonic used in user-defined mnemonic space which has no associated line\201", /* M32 */
213: "SET or KILL to ^$ROUTINE when routine exists\201", /* M33 */
214: " \201", /* M34 */
215: "device does not support mnemonic space\201", /* M35 */
216: "incompatible mnemonic spaces\201", /* M36 */
217: "READ from device identified by the empty string\201", /* M37 */
218: "invalid structured system variable subscript\201", /* M38 */
219: "invalid $NAME argument\201", /* M39 */
220: "call-by-reference in JOB actual parameter\201", /* M40 */
221: "invalid LOCK argument within a transaction\201", /* 180 - M41 */
222: "invalid QUIT within a transaction\201", /* M42 */
223: "invalid range value ($X, $Y)\201", /* M43 */
224: "invalid command outside of a transaction\201", /* M44 */
225: "invalid GOTO reference\201", /* M45 */
226: " \201", /* M46 */
227: " \201", /* M47 */
228: " \201", /* M48 */
229: " \201", /* M49 */
230: " \201", /* M50 */
231: " \201", /* 190 - M51 */
232: " \201", /* M52 */
233: " \201", /* M53 */
234: " \201", /* M54 */
235: " \201", /* M55 */
236: "identifier exceeds maximum length\201", /* M56 */
237: "more than one defining occurrence of label in routine\201", /* M57 */
238: "too few formal parameters\201", /* M58 */
239: " \201", /* M59 */
240: "illegal attempt to use an undefined SSVN\201", /* M60 */
241: " \201", /* 200 - M61 */
242: " \201",
243: " \201",
244: " \201",
245: " \201",
246: " \201",
247: " \201",
248: " \201",
249: " \201",
250: " \201", /* M70 */
251: " \201", /* 210 - M71 */
252: " \201",
253: " \201",
254: " \201",
255: "string length exceeds implementation limits\201", /* 214 - M75 */
256: " \201",
257: " \201",
258: " \201",
259: " \201",
260: " \201", /* M80 */
261: " \201", /* 220 - M81 */
262: " \201",
263: " \201",
264: " \201",
265: " \201",
266: " \201",
267: " \201",
268: " \201",
269: " \201",
270: " \201", /* M90 */
271: " \201", /* 230 - M91 */
272: " \201",
273: " \201",
274: " \201",
275: " \201",
276: " \201",
277: " \201",
278: " \201",
279: " \201",
280: " \201", /* M100 */
281: "invalid value for $ECODE\201", /* 240 - M101 */
282: "synchronous and asynchronous event processing cannot be simultaneously enabled for the same event class\201", /* 241 - M102 */
283: "invalid event identifier\201", /* 242 - M103 */
284: "ETRIGGER event identifier for IPC event class does not match job process identifier\201", /* 243 - M104 */
285: " \201", /* 244 */
286: " \201", /* 245 */
287: " \201", /* 246 */
288: " \201", /* 247 */
289: " \201", /* 248 */
290: " \201", /* 249 */
291: " \201", /* 250 */
292: " \201", /* 251 */
293: " \201", /* 252 */
294: " \201", /* 253 */
295: "asynchronous interruption\201", /* 254 - ZASYNC (pseudo-error) */
296: "break\201" /* CTRLB - 255 */
297: };
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to errmsg.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [Coherent Logic Development] / freem / src