Update of /cvsroot/win32forth/win32forth/apps/Win32ForthIDE
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv24329/Win32ForthIDE
Modified Files:
Main.f
Log Message:
Jos: To simplify console applications. Saving boring cut and past actions.
Index: Main.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/apps/Win32ForthIDE/Main.f,v
retrieving revision 1.52
retrieving revision 1.53
diff -C2 -d -r1.52 -r1.53
*** Main.f 27 Jul 2008 07:21:51 -0000 1.52
--- Main.f 16 Aug 2008 13:31:24 -0000 1.53
***************
*** 1229,1244 ****
[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
! unset-except set-except \ exception handling needs to be set after the console is started
! exception@ if bye then
! \ get-commandline \ commandline to SOURCE
! StopLaunching not \ if instance allowed to run
! if default-application then \ then run it
! ;
! ' New_default-hello is default-hello
[THEN]
--- 1229,1233 ----
[DEFINED] C_EMIT [IF] \ When the new console is used
! in-hidden-console
[THEN]
|
