version 1.3, 2025/03/10 00:38:15
|
version 1.5, 2025/05/01 17:02:30
|
Line 1
|
Line 1
|
%SYSINIT ;VCL/JPW-FREEM STARTUP ROUTINE; 10/23/2020 6:55 PM |
%SYSINIT ;VCL/SNW-FREEM STARTUP ROUTINE; 5/1/2025 11:00 AM |
;0.0;FreeM;****FREEM**;Serena Willis @2020 |
;0.0;FreeM;****FREEM**;Serena Willis @2020 |
; |
; |
; $Id$ |
; $Id$ |
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.5 2025/05/01 17:02:30 snw |
|
; Further debugging improvements |
|
; |
|
; Revision 1.4 2025/04/10 14:37:20 snw |
|
; Updates to manual |
|
; |
; Revision 1.3 2025/03/10 00:38:15 snw |
; Revision 1.3 2025/03/10 00:38:15 snw |
; Phase 3 of REUSE compliance and header reformatting |
; Phase 3 of REUSE compliance and header reformatting |
; |
; |
Line 34
|
Line 40
|
; 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 %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 |