|
|
| version 1.3, 2025/02/28 20:51:20 | version 1.11, 2025/03/24 01:47:38 |
|---|---|
| Line 1 | Line 1 |
| /* | /* |
| * * | * $Id$ |
| * * * | |
| * * * | |
| * *************** | |
| * * * * * | |
| * * MUMPS * | |
| * * * * * | |
| * *************** | |
| * * * | |
| * * * | |
| * * | |
| * | |
| * mpsdef0.h | |
| * common constants definitions for all mumps modules | * common constants 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.11 2025/03/24 01:47:38 snw | |
| * Make symtab action defines more portable | |
| * | |
| * Revision 1.10 2025/03/24 01:35:23 snw | |
| * Make symtab action defines more portable | |
| * | |
| * Revision 1.9 2025/03/22 22:52:24 snw | |
| * Add STRLEN_GBL macro to manage global string length | |
| * | |
| * Revision 1.8 2025/03/22 18:43:54 snw | |
| * Make STRLEN 255 chars and add BIGSTR macro for larger buffers | |
| * | |
| * Revision 1.7 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 | |
| **/ | **/ |
| /*#pragma GCC diagnostic ignored "-Wformat-contains-nul"*/ | |
| #ifdef HAVE_CONFIG_H | #ifdef HAVE_CONFIG_H |
| # include <config.h> | # include <config.h> |
| Line 149 | Line 157 |
| #define ARGS_IN_ESC 5 | #define ARGS_IN_ESC 5 |
| /* maximum length of a string, 0 <= $L() <= 255 */ | /* maximum length of a string, 0 <= $L() <= 255 */ |
| #define STRLEN 65535 | #define STRLEN 255 |
| #define STRLEN_GBL 252 | |
| #define BIGSTR 65535 | |
| /* length of $ZTRAP variable */ | /* length of $ZTRAP variable */ |
| #define ZTLEN 20 | #define ZTLEN 20 |
| Line 272 | Line 282 |
| #define kill_sym 2 | #define kill_sym 2 |
| #define kill_all 4 | #define kill_all 4 |
| #define killexcl 6 | #define killexcl 6 |
| #define new_sym 8 | #define new_sym 8 |
| #define new_all 10 | #define new_all 10 |
| #define newexcl 12 | #define newexcl 12 |
| #define killone 14 | #define killone 14 |
| Line 281 | Line 291 |
| #define lock_dec 26 | #define lock_dec 26 |
| #define lock_old 28 | #define lock_old 28 |
| #define get_sym 1 | #define get_sym 1 |
| #define dat 3 | #if !defined(__OS2--) |
| #define fra_order 5 | # define dat 3 |
| #define fra_query 7 | #else |
| const int dat = 3; | |
| #endif | |
| #define fra_order 5 | |
| #define fra_query 7 | |
| #define bigquery 9 | #define bigquery 9 |
| #define getinc 11 | #define getinc 11 |
| #define getnext 13 | #define getnext 13 |
| #define m_alias 15 | #define m_alias 15 |
| #define zdata 17 | #define zdata 17 |
| /* sets 8th bit in A */ | /* sets 8th bit in A */ |
| #define SETBIT(A) ((A)|0200) | #define SETBIT(A) ((A)|0200) |