Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv23491/win32forth/src
Modified Files:
EXCEPTIO.F Shell.f
Log Message:
gah: Improved multi-tasing performance
Index: Shell.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/Shell.f,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** Shell.f 12 Aug 2005 16:36:13 -0000 1.3
--- Shell.f 20 Oct 2007 20:58:56 -0000 1.4
***************
*** 5,9 ****
\ Moved here from UTILS.F and partly rewritten by Dirk Busch
\ Dienstag, März 29 2005
!
cr .( Loading Shell Words...)
--- 5,9 ----
\ Moved here from UTILS.F and partly rewritten by Dirk Busch
\ Dienstag, März 29 2005
!
cr .( Loading Shell Words...)
***************
*** 82,86 ****
INFINITE hProcess call WaitForInputIdle WAIT_FAILED <>
if begin
! KEY? drop \ keep the Win32Forth message loop alive
1 hProcess call WaitForSingleObject WAIT_OBJECT_0 =
until
--- 82,86 ----
INFINITE hProcess call WaitForInputIdle WAIT_FAILED <>
if begin
! winpause \ keep the Win32Forth message loop alive
1 hProcess call WaitForSingleObject WAIT_OBJECT_0 =
until
***************
*** 320,322 ****
>R Prepend<home>\ temp$ +place \ file:<absolute path>\<file name>.<ext>
temp$ count r> "web-link ;
- |
