--- freem/mlib/%SYSINIT.m 2025/03/09 15:20:18 1.2 +++ freem/mlib/%SYSINIT.m 2025/04/10 14:37:20 1.4 @@ -1,23 +1,11 @@ %SYSINIT ;VCL/JPW-FREEM STARTUP ROUTINE; 10/23/2020 6:55 PM ;0.0;FreeM;****FREEM**;Serena Willis @2020 ; - ; * - ; * * - ; * * - ; *************** - ; * * * * - ; * MUMPS * - ; * * * * - ; *************** - ; * * - ; * * - ; * - ; - ; %SYSINIT.m + ; $Id: %SYSINIT.m,v 1.4 2025/04/10 14:37:20 snw Exp $ ; FreeM Startup Routine ; ; - ; Author: Serena Willis + ; Author: Serena Willis ; Copyright (C) 1998 MUG Deutschland ; Copyright (C) 2020, 2022 Coherent Logic Development LLC ; @@ -36,19 +24,29 @@ ; ; You should have received a copy of the GNU Affero Public License ; along with FreeM. If not, see . - ; + ; + ; $Log: %SYSINIT.m,v $ + ; Revision 1.4 2025/04/10 14:37:20 snw + ; Updates to manual + ; + ; Revision 1.3 2025/03/10 00:38:15 snw + ; Phase 3 of REUSE compliance and header reformatting + ; + ; + ; SPDX-FileCopyrightText: (C) 2025 Coherent Logic Development LLC + ; SPDX-License-Identifier: AGPL-3.0-or-later S %DIA=$DIALECT S $DIALECT="FREEM" - CONST %MATH.PI=3.141592653589793238462 - CONST %MATH.E=2.71828182845904523536 - CONST %MATH.GAMMA=0.57721566490153286060 - CONST %MATH.DEGPERRAD=57.29577951308232087680 - CONST %MATH.PHI=1.61803398874989484820 - CONST %IO.CRLF=$C(13,10) - CONST %SYS.SIGNAL.HUP=1 - CONST %SYS.SIGNAL.INT=2 - CONST %SYS.SIGNAL.KILL=9 - CONST %SYS.SIGNAL.TERM=15 + CONST %MATHPI=3.141592653589793238462 + CONST %MATHE=2.71828182845904523536 + CONST %MATHGAMMA=0.57721566490153286060 + CONST %MATHDEGPERRAD=57.29577951308232087680 + CONST %MATHPHI=1.61803398874989484820 + CONST %IOCRLF=$C(13,10) + CONST %SYSSIGNALHUP=1 + CONST %SYSSIGNALINT=2 + CONST %SYSSIGNALKILL=9 + CONST %SYSSIGNALTERM=15 ASTART "TRIGGER" S $ZTRAP="NOLS^%SYSINIT" D ^LCLINIT