[Win32forth-cvs] win32forth/src Utils.f,1.8,1.9

[Rod O. <rod...@us...>]

Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv12606/src

Modified Files:
	Utils.f 
Log Message:
Rod: changed editor-wait to return after 10s rather than 1000s

Index: Utils.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/Utils.f,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -d -r1.8 -r1.9
*** Utils.f	20 Jun 2005 07:40:46 -0000	1.8
--- Utils.f	29 Jun 2005 18:32:42 -0000	1.9
***************
*** 178,182 ****
                  0 to ?deadlook     \ return's after 10 seconds even when the editor is not ready
  		begin 100 ms WINPAUSE
! 		      ?deadlook 1+ dup to ?deadlook 10000 =
  		      editor-present? or
  		until ;
--- 178,182 ----
                  0 to ?deadlook     \ return's after 10 seconds even when the editor is not ready
  		begin 100 ms WINPAUSE
! 		      ?deadlook 1+ dup to ?deadlook 100 =
  		      editor-present? or
  		until ;