[BACK]Return to %SYSINIT.m CVS log [TXT] [DIR] Up to [Coherent Logic Development] / freem / mlib

Diff for /freem/mlib/%SYSINIT.m between versions 1.5 and 1.6

version 1.5, 2025/05/01 17:02:30 version 1.6, 2025/05/02 12:44:48
Line 26 Line 26
     ;   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.      ;   along with FreeM.  If not, see <https://www.gnu.org/licenses/>.
     ;      ;
     ;   $Log$      ;   $Log$
       ;   Revision 1.6  2025/05/02 12:44:48  snw
       ;   Documentation updates
       ;
     ;   Revision 1.5  2025/05/01 17:02:30  snw      ;   Revision 1.5  2025/05/01 17:02:30  snw
     ;   Further debugging improvements      ;   Further debugging improvements
     ;      ;
Line 40 Line 43
     ; SPDX-License-Identifier: AGPL-3.0-or-later          ; SPDX-License-Identifier: AGPL-3.0-or-later    
     S %DIA=$DIALECT      S %DIA=$DIALECT
     S $DIALECT="FREEM"      S $DIALECT="FREEM"
     CONST %MATHPI=3.141592653589793238462      CONST %MATH("PI")==3.141592653589793238462
     CONST %MATHE=2.71828182845904523536      CONST %MATH("E")=2.71828182845904523536
     CONST %MATHGAMMA=0.57721566490153286060      CONST %MATH("GAMMA")=0.57721566490153286060
     CONST %MATHDEGPERRAD=57.29577951308232087680      CONST %MATH("DEGPERRAD")=57.29577951308232087680
     CONST %MATHPHI=1.61803398874989484820      CONST %MATH("PHI")=1.61803398874989484820
     CONST %IOCRLF=$C(13,10)      CONST %IO("CRLF")=$C(13,10)
     CONST %SYSSIGNALHUP=1      CONST %SYS("SIGNAL","HUP")=1
     CONST %SYSSIGNALINT=2      CONST %SYS("SIGNAL","INIT")=2
     CONST %SYSSIGNALKILL=9      CONST %SYS("SIGNAL","KILL")=9
     CONST %SYSSIGNALTERM=15      CONST %SYS("SIGNAL","TERM")=15
     ASTART "TRIGGER"      ASTART "TRIGGER"
     S $ZTRAP="NOLS^%SYSINIT"      S $ZTRAP="NOLS^%SYSINIT"
     D ^LCLINIT      D ^LCLINIT
Line 66  COPYRIGHT ; Line 69  COPYRIGHT ;
     S %DIA=$DIALECT      S %DIA=$DIALECT
     S $DIALECT="FREEM"      S $DIALECT="FREEM"
     W "Coherent Logic Development ",$ZVERSION,!      W "Coherent Logic Development ",$ZVERSION,!
     W "Copyright (C) 2014, 2020, 2021 Coherent Logic Development LLC",!,!      W "Copyright (C) 2014, 2025 Coherent Logic Development LLC",!,!
     W "License AGPLv3+: GNU AGPL version 3 or later <https://gnu.org/license/agpl-3.0.html>",!      W "License AGPLv3+: GNU AGPL version 3 or later <https://gnu.org/license/agpl-3.0.html>",!
     W "This is free software: you are free to change and redistribute it.",!      W "This is free software: you are free to change and redistribute it.",!
     W "There is NO WARRANTY, to the extent permitted by law.",!,!      W "There is NO WARRANTY, to the extent permitted by law.",!,!
Removed from v.1.5  
changed lines
  Added in v.1.6

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