From: Dirk B. <db...@us...> - 2005-08-12 16:36:21
|
Update of /cvsroot/win32forth/win32forth/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv3096/src Modified Files: Shell.f Log Message: Expanded TAB's into spaces. Index: Shell.f =================================================================== RCS file: /cvsroot/win32forth/win32forth/src/Shell.f,v retrieving revision 1.2 retrieving revision 1.3 diff -C2 -d -r1.2 -r1.3 *** Shell.f 2 Jun 2005 21:14:55 -0000 1.2 --- Shell.f 12 Aug 2005 16:36:13 -0000 1.3 *************** *** 50,54 **** 10 proc CreateProcess : (CreateProcess) ( a1 -- f1 ) \ pass to NT without any interpretation ! \ Note: a1 must point to a zString !!! ProcInfo 4 cells erase \ clear procinfo --- 50,54 ---- 10 proc CreateProcess : (CreateProcess) ( a1 -- f1 ) \ pass to NT without any interpretation ! \ Note: a1 must point to a zString !!! ProcInfo 4 cells erase \ clear procinfo *************** *** 316,321 **** bl word count conhndl "Web-Link ; ! : "file-link ( adr len hWnd -- ) \ open a local file in default browser ! s" file:" temp$ place \ build string ! >R Prepend<home>\ temp$ +place \ file:<absolute path>\<file name>.<ext> ! temp$ count r> "web-link ; --- 316,322 ---- bl word count conhndl "Web-Link ; ! : "file-link ( adr len hWnd -- ) \ open a local file in default browser ! s" file:" temp$ place \ build string ! >R Prepend<home>\ temp$ +place \ file:<absolute path>\<file name>.<ext> ! temp$ count r> "web-link ; ! |