--- freem/src/ssvn_job.c 2025/01/19 02:04:04 1.1 +++ freem/src/ssvn_job.c 2025/03/24 04:13:11 1.5 @@ -1,23 +1,11 @@ /* - * * - * * * - * * * - * *************** - * * * * * - * * MUMPS * - * * * * * - * *************** - * * * - * * * - * * - * - * ssvn_job.c - * ^$JOB ssv + * $Id: ssvn_job.c,v 1.5 2025/03/24 04:13:11 snw Exp $ + * ^$JOB ssvn * * - * 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,16 @@ * You should have received a copy of the GNU Affero Public License * along with FreeM. If not, see . * + * $Log: ssvn_job.c,v $ + * Revision 1.5 2025/03/24 04:13:11 snw + * Replace action macro dat with fra_dat to avoid symbol conflict 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 @@ -159,7 +157,7 @@ void ssvn_job_update(void) symtab_shm (set_sym, k_buf, d_buf); snprintf (k_buf, 512 - 1, "^$JOB\202%d\202ROUTINE_BUFFER_COUNT\201", pid); - snprintf (d_buf, 512 - 1, "%d\201", NO_OF_RBUF); + snprintf (d_buf, 512 - 1, "%ld\201", NO_OF_RBUF); symtab_shm (set_sym, k_buf, d_buf); snprintf (k_buf, 512 - 1, "^$JOB\202%d\202ROUTINE_BUFFER_AUTO_ADJUST\201", pid); @@ -730,7 +728,7 @@ void ssvn_job(short action, char *key, c tzoffset = tzo; - snprintf (data, 512 - 1, "%d\201", tzoffset); + snprintf (data, 512 - 1, "%ld\201", tzoffset); symtab_shm (action, key, data); goto done; @@ -981,7 +979,7 @@ void ssvn_job(short action, char *key, c stcpy (data, g_o_val); goto done; } - case dat: + case fra_dat: case fra_order: case fra_query: if (strcmp (mref_get_subscript (r, 1), "LVNQOVAL") == 0) { @@ -1125,7 +1123,7 @@ void frm_process_alias (char *key) name[i] = '\0'; subprt = key + i; - snprintf (k_buf, STRLEN - 1, "^$JOB\202%ld\202ALIASES\202%s\201", pid, name); + snprintf (k_buf, STRLEN - 1, "^$JOB\202%ld\202ALIASES\202%s\201", (long) pid, name); symtab_shm (get_sym, k_buf, d_buf); stcnv_m2c (d_buf);