Update of /cvsroot/win32forth/win32forth/apps/WinEd
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv24329/WinEd
Modified Files:
WinEd.f
Log Message:
Jos: To simplify console applications. Saving boring cut and past actions.
Index: WinEd.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/WinEd/WinEd.f,v
retrieving revision 1.19
retrieving revision 1.20
diff -C2 -d -r1.19 -r1.20
*** WinEd.f 2 Aug 2008 15:45:48 -0000 1.19
--- WinEd.f 16 Aug 2008 13:31:25 -0000 1.20
***************
*** 119,135 ****
[DEFINED] C_EMIT [IF] \ When the new console is used
! : New-default-hello ( -- ) \ startup stuff
! initialization-chain do-chain
! NewConsole
! init-console drop \ start console hidden
! \ init-screen \ start console visible
! exception@ if bye then
! unset-except set-except \ exception handling needs to be set after the console is started
! exception@ if bye then
! \ get-commandline \ commandline to SOURCE
! default-application
! ;
!
! ' New-default-hello is default-hello
[THEN]
--- 119,123 ----
[DEFINED] C_EMIT [IF] \ When the new console is used
! in-hidden-console
[THEN]
|
