|
|
| version 1.3, 2025/02/25 18:55:13 | version 1.7, 2025/03/09 19:50:47 |
|---|---|
| Line 1 | Line 1 |
| /* | /* |
| * * | * $Id$ |
| * * * | |
| * * * | |
| * *************** | |
| * * * * * | |
| * * MUMPS * | |
| * * * * * | |
| * *************** | |
| * * * | |
| * * * | |
| * * | |
| * | |
| * service.c | |
| * terminal and sequential I/O handling, | * terminal and sequential I/O handling, |
| * file and global locking | * file and global locking |
| * | * |
| * | * |
| * 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.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 | |
| **/ | **/ |
| #include <errno.h> | #include <errno.h> |
| Line 65 | Line 60 |
| #include "events.h" | #include "events.h" |
| long int tell (); | long int tell (); |
| unsigned alarm (); | void ris (struct vtstyp *scr); |
| void ris (); | |
| #ifdef SCO | #ifdef SCO |
| int scosgr (short att, short bwflag); | int scosgr (short att, short bwflag); |
| Line 3368 void write_t (short int col) | Line 3361 void write_t (short int col) |
| } /* end of write_t() */ | } /* end of write_t() */ |
| void ontimo () | void ontimo (void) |
| { /* handle timeout (for read) */ | { /* handle timeout (for read) */ |
| longjmp (sjbuf, 1); | longjmp (sjbuf, 1); |
| } /* end of ontimo() */ | } /* end of ontimo() */ |