Update of /cvsroot/win32forth/win32forth/src/kernel
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv14508/win32forth/src/kernel
Modified Files:
fkernel.f
Log Message:
gah: Modified MAIN to not evaluate commandline in turnkeyed applications
Index: fkernel.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/kernel/fkernel.f,v
retrieving revision 1.43
retrieving revision 1.44
diff -C2 -d -r1.43 -r1.44
*** fkernel.f 31 Oct 2007 18:51:39 -0000 1.43
--- fkernel.f 3 Apr 2008 19:38:33 -0000 1.44
***************
*** 5554,5558 ****
IF BYE ( fatal error, exit)
THEN
! &EXCEPT @ 0=
IF CMDLINE ['] EVALUATE CATCH DUP
IF DUP 1+ IF MESSAGE THEN
--- 5554,5558 ----
IF BYE ( fatal error, exit)
THEN
! &EXCEPT @ 0= sys-size and
IF CMDLINE ['] EVALUATE CATCH DUP
IF DUP 1+ IF MESSAGE THEN
|
