--- freem/src/errmsg.h 2025/01/19 02:04:04 1.1 +++ freem/src/errmsg.h 2026/03/14 21:04:51 1.5 @@ -1,23 +1,11 @@ /* - * * - * * * - * * * - * *************** - * * * * * - * * MUMPS * - * * * * * - * *************** - * * * - * * * - * * - * - * errmsg.h + * $Id: errmsg.h,v 1.5 2026/03/14 21:04:51 snw Exp $ * error message definitions * * - * Author: Serena Willis + * Author: Serena Willis * Copyright (C) 1998 MUG Deutschland - * Copyright (C) 2020 Coherent Logic Development LLC + * Copyright (C) 2020, 2025 Coherent Logic Development LLC * * * This file is part of FreeM. @@ -35,6 +23,19 @@ * You should have received a copy of the GNU Affero Public License * along with FreeM. If not, see . * + * $Log: errmsg.h,v $ + * Revision 1.5 2026/03/14 21:04:51 snw + * Fix segfault in OPEN command with I/O channel specified but no file + * + * Revision 1.4 2025/05/20 16:20:42 snw + * Update ROUTINE SSVN after ZEDIT and ZSAVE + * + * Revision 1.3 2025/03/09 19:14:24 snw + * First phase of REUSE compliance and header reformat + * + * + * SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC + * SPDX-License-Identifier: AGPL-3.0-or-later **/ int SIflag[MAXDEV + 1] = {1, 1, 1, 1, 1}; /* SI/SO flag */ @@ -70,7 +71,7 @@ char errmes[MAXERR][ERRLEN] = { "too many parameters\201", /* TOOPARA */ "unit not open\201", /* NOPEN */ "unit does not exist\201", /* NODEVICE */ - "file protection violation\201",/* PROTECT */ + "current user lacks sufficient rank and station to access this file\201",/* PROTECT */ "global not permitted\201", /* GLOBER */ "file not found\201", /* FILERR */ "program overflow\201", /* PGMOV */ @@ -180,17 +181,17 @@ char errmes[MAXERR][ERRLEN] = { " \201", " \201", " \201", - "naked indicator undefined\201", /* 140 - M1 */ + "the naked indicator is, at the present moment, undefined\201", /* 140 - M1 */ "invalid combination with $FNUMBER code atom\201", /* M2 */ "$RANDOM seed less than 1\201", /* M3 */ - "no true condition in $SELECT\201", /* M4 */ + "the use of $SELECT without a true condition is quite illegal\201", /* M4 */ "line reference less than zero\201", /* M5 */ - "undefined local variable\201", /* M6 */ - "undefined global variable\201", /* M7 */ - "undefined intrinsic special variable\201", /* M8 */ - "divide by zero\201", /* M9 */ - "invalid pattern match range\201", /* M10 */ - "no parameters passed\201", /* 150 - M11 */ + "the local with which you have attempted to engage is not defined\201", /* M6 */ + "the global with which you have attempted to engage is not defined\201", /* M7 */ + "the intrinsic special variable with which you have attempted to engage is not defined\201", /* M8 */ + "one cannot divide by zero and expect a reasonable result\201", /* M9 */ + "the pattern match range herein atttempted is not valid\201", /* M10 */ + "no parameters have been passed\201", /* 150 - M11 */ "invalid line reference (negative offset)\201", /* M12 */ "invalid line reference (line not found)\201", /* M13 */ "line level not 1\201", /* M14 */