|
|
| version 1.1, 2025/01/19 02:04:04 | version 1.4, 2025/03/24 04:13:11 |
|---|---|
| Line 1 | Line 1 |
| /* | /* |
| * * | * $Id$ |
| * * * | |
| * * * | |
| * *************** | |
| * * * * * | |
| * * MUMPS * | |
| * * * * * | |
| * *************** | |
| * * * | |
| * * * | |
| * * | |
| * | |
| * mlib.h | |
| * Function prototypes, structs, and macros for FreeM | * Function prototypes, structs, and macros for FreeM |
| * binding library | * binding library |
| * | * |
| * | * |
| * 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 Coherent Logic Development LLC | * Copyright (C) 2020, 2025 Coherent Logic Development LLC |
| * | * |
| * | * |
| * This file is part of FreeM. | * This file is part of FreeM. |
| Line 36 | Line 24 |
| * 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.4 2025/03/24 04:13:11 snw | |
| * Replace action macro dat with fra_dat to avoid symbol conflict on OS/2 | |
| * | |
| * Revision 1.3 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 <stdlib.h> | #include <stdlib.h> |
| Line 271 short freem_data(freem_ref_t *ref) | Line 269 short freem_data(freem_ref_t *ref) |
| case MREF_RT_LOCAL: | case MREF_RT_LOCAL: |
| // call into the symbol table | // call into the symbol table |
| symtab (dat, key, result); | symtab (fra_dat, key, result); |
| ref->status = merr (); | ref->status = merr (); |
| break; | break; |
| case MREF_RT_GLOBAL: | case MREF_RT_GLOBAL: |
| // call into the FreeM global handler; result in &result | // call into the FreeM global handler; result in &result |
| global (dat, key, result); | global (fra_dat, key, result); |
| ref->status = merr (); | ref->status = merr (); |
| break; | break; |
| case MREF_RT_SSVN: | case MREF_RT_SSVN: |
| // call into the SSVN code | // call into the SSVN code |
| ssvn (dat, key, result); | ssvn (fra_dat, key, result); |
| ref->status = merr (); | ref->status = merr (); |
| break; | break; |