Diff for /freem/mlib/%SYSINIT.m between versions 1.1.1.1 and 1.4

version 1.1.1.1, 2025/01/19 02:04:04 version 1.4, 2025/04/10 14:37:20
Line 1 Line 1
 %SYSINIT ;VCL/JPW-FREEM STARTUP ROUTINE; 10/23/2020 6:55 PM  %SYSINIT ;VCL/JPW-FREEM STARTUP ROUTINE; 10/23/2020 6:55 PM
     ;0.0;FreeM;****FREEM**;John P Willis @2020      ;0.0;FreeM;****FREEM**;Serena Willis @2020
     ;      ;
     ;                            *      ;   $Id$
     ;                           * *  
     ;                          *   *  
     ;                     ***************  
     ;                      * *       * *  
     ;                       *  MUMPS  *  
     ;                      * *       * *  
     ;                     ***************  
     ;                          *   *  
     ;                           * *  
     ;                            *  
     ;  
     ;   %SYSINIT.m  
     ;    FreeM Startup Routine      ;    FreeM Startup Routine
     ;      ;
     ;        ;  
     ;   Author: John P. 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, 2022 Coherent Logic Development LLC      ;    Copyright (C) 2020, 2022 Coherent Logic Development LLC
     ;      ;
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/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 %DIA=$DIALECT
     S $DIALECT="FREEM"      S $DIALECT="FREEM"
     CONST %MATH.PI=3.141592653589793238462      CONST %MATHPI=3.141592653589793238462
     CONST %MATH.E=2.71828182845904523536      CONST %MATHE=2.71828182845904523536
     CONST %MATH.GAMMA=0.57721566490153286060      CONST %MATHGAMMA=0.57721566490153286060
     CONST %MATH.DEGPERRAD=57.29577951308232087680      CONST %MATHDEGPERRAD=57.29577951308232087680
     CONST %MATH.PHI=1.61803398874989484820      CONST %MATHPHI=1.61803398874989484820
     CONST %IO.CRLF=$C(13,10)      CONST %IOCRLF=$C(13,10)
     CONST %SYS.SIGNAL.HUP=1      CONST %SYSSIGNALHUP=1
     CONST %SYS.SIGNAL.INT=2      CONST %SYSSIGNALINT=2
     CONST %SYS.SIGNAL.KILL=9      CONST %SYSSIGNALKILL=9
     CONST %SYS.SIGNAL.TERM=15      CONST %SYSSIGNALTERM=15
     ASTART "TRIGGER"      ASTART "TRIGGER"
     S $ZTRAP="NOLS^%SYSINIT"      S $ZTRAP="NOLS^%SYSINIT"
     D ^LCLINIT      D ^LCLINIT

Removed from v.1.1.1.1  
changed lines
  Added in v.1.4


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>