[Win32forth-cvs] win32forth/demos taskdemo.f,1.5,1.6

[George H. <geo...@us...>]

Update of /cvsroot/win32forth/win32forth/demos
In directory 23jxhf1.ch3.sourceforge.com:/tmp/cvs-serv12791

Modified Files:
	taskdemo.f 
Log Message:
Replaced TASK-SLEEP with MS

Index: taskdemo.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/demos/taskdemo.f,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** taskdemo.f	25 Oct 2008 15:18:46 -0000	1.5
--- taskdemo.f	25 Oct 2008 23:24:27 -0000	1.6
***************
*** 26,30 ****
            c-unlock
            100 1 do
!           location @ 15 * task-sleep  \ sleep depends on line number, bigger=longer
            c-lock
              40 location @  gotoxy
--- 26,30 ----
            c-unlock
            100 1 do
!           location @ 15 * ms  \ sleep depends on line number, bigger=longer
            c-lock
              40 location @  gotoxy
***************
*** 124,128 ****
            pad swap type cr
            console-lock unlock
!           speed task-sleep
          repeat
          fhndl @ close-file ;
--- 124,128 ----
            pad swap type cr
            console-lock unlock
!           speed ms
          repeat
          fhndl @ close-file ;