|
|
| version 1.1, 2025/01/19 02:04:04 | version 1.6, 2025/04/02 03:02:42 |
|---|---|
| Line 1 | Line 1 |
| /* | /* |
| * * | * $Id$ |
| * * * | |
| * * * | |
| * *************** | |
| * * * * * | |
| * * MUMPS * | |
| * * * * * | |
| * *************** | |
| * * * | |
| * * * | |
| * * | |
| * | |
| * mpsdef.h | |
| * common external definitions for all mumps modules | * common external definitions for all mumps modules |
| * | * |
| * | * |
| * Author: Serena Willis <jpw@coherent-logic.com> | * Author: Serena Willis <snw@coherent-logic.com> |
| * Copyright (C) 1998 MUG Deutschland | * Copyright (C) 1998 MUG Deutschland |
| * Copyright (C) 2020, 2023 Coherent Logic Development LLC | * Copyright (C) 2020, 2023, 2025 Coherent Logic Development LLC |
| * | * |
| * | * |
| * This file is part of FreeM. | * This file is part of FreeM. |
| Line 35 | Line 23 |
| * You should have received a copy of the GNU Affero Public License | * You should have received a copy of the GNU Affero Public License |
| * along with FreeM. If not, see <https://www.gnu.org/licenses/>. | * along with FreeM. If not, see <https://www.gnu.org/licenses/>. |
| * | * |
| * $Log$ | |
| * Revision 1.6 2025/04/02 03:02:42 snw | |
| * Stop requiring users to pass -e to fmadm when -u or -g are passed | |
| * | |
| * Revision 1.5 2025/03/24 04:05:36 snw | |
| * Replace crlf with frm_crlf to avoid symbol conflict with readline on OS/2 | |
| * | |
| * Revision 1.4 2025/03/09 19:50:47 snw | |
| * Second phase of REUSE compliance and header reformat | |
| * | |
| * | |
| * SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC | |
| * SPDX-License-Identifier: AGPL-3.0-or-later | |
| **/ | **/ |
| #include <stdio.h> | #include <stdio.h> |
| Line 167 extern short nakoffs; /* offset to nak | Line 168 extern short nakoffs; /* offset to nak |
| extern char zfunkey[44][FUNLEN]; /* $ZF function key */ | extern char zfunkey[44][FUNLEN]; /* $ZF function key */ |
| extern short xpos[MAXDEV + 1]; /* $X-vector */ | extern short xpos[MAXDEV + 1]; /* $X-vector */ |
| extern short ypos[MAXDEV + 1]; /* $Y-vector */ | extern short ypos[MAXDEV + 1]; /* $Y-vector */ |
| extern short crlf[MAXDEV + 1]; /* CR/LF flag vector */ | extern short frm_crlf[MAXDEV + 1]; /* CR/LF flag vector */ |
| extern short fm_nodelay[MAXDEV + 1]; /* nodelay flag vector */ | extern short fm_nodelay[MAXDEV + 1]; /* nodelay flag vector */ |
| extern int SIflag[MAXDEV + 1]; /* SI/SO flag */ | extern int SIflag[MAXDEV + 1]; /* SI/SO flag */ |
| extern int ESCflag[MAXDEV + 1]; /* ESC flag */ | extern int ESCflag[MAXDEV + 1]; /* ESC flag */ |
| Line 325 extern char oucpath[PATHLEN]; /* OPEN/U | Line 326 extern char oucpath[PATHLEN]; /* OPEN/U |
| extern char rgafile[PATHLEN]; /* routine/global access protocol file */ | extern char rgafile[PATHLEN]; /* routine/global access protocol file */ |
| extern char zargdefname[PATHLEN]; /* default varname for Zcommands */ | extern char zargdefname[PATHLEN]; /* default varname for Zcommands */ |
| extern FILE *rgaccess; /* dto. filedes */ | extern FILE *rgaccess; /* dto. filedes */ |
| extern char locktab[PATHLEN]; /* file with LOCKs */ | |
| extern char zallotab[PATHLEN]; /* file with ZALLOCATE */ | |
| extern char hcpyfile[PATHLEN]; /* hardcopy file */ | |
| extern char jourfile[PATHLEN]; /* journal file */ | |
| extern FILE *jouraccess; /* dto. filedes */ | extern FILE *jouraccess; /* dto. filedes */ |
| extern char curdir[PATHLEN]; /* current directory */ | extern char curdir[PATHLEN]; /* current directory */ |
| Line 403 extern short timeoutms; | Line 400 extern short timeoutms; |
| extern char tmp4[80]; | extern char tmp4[80]; |
| extern short param; /* parameter count */ | extern short param; /* parameter count */ |
| extern short paramx; /* current parameter */ | extern short paramx; /* current parameter */ |
| extern char *ttyname (); | |
| //extern char *calloc (); | //extern char *calloc (); |
| extern short level; /* level count */ | extern short level; /* level count */ |
| extern short nestlt[NESTLEVLS + 1]; /* stack $T / stack levelcount */ | extern short nestlt[NESTLEVLS + 1]; /* stack $T / stack levelcount */ |