From: George H. <geo...@us...> - 2006-09-25 11:43:02
|
Update of /cvsroot/win32forth/win32forth/doc In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv5416/win32forth/doc Modified Files: Paths.htm p-index.htm Log Message: gah:Updated docs Index: p-index.htm =================================================================== RCS file: /cvsroot/win32forth/win32forth/doc/p-index.htm,v retrieving revision 1.17 retrieving revision 1.18 diff -C2 -d -r1.17 -r1.18 *** p-index.htm 21 Sep 2006 13:12:41 -0000 1.17 --- p-index.htm 25 Sep 2006 11:42:57 -0000 1.18 *************** *** 156,159 **** --- 156,160 ---- <li><a href="p-AcceleratorTables.htm">Accelerator tables</a></li> <li><a href="Paths.htm">Multiple search path support</a></li> + <li><a href="p-ansfile.htm">File and directory searching words</a></li> <li><a href="Unicode.htm">Unicode Strings (for use with FCOM)</a></li> <li><a href="p-relnotes.6.12.htm">Release Notes</a></li> Index: Paths.htm =================================================================== RCS file: /cvsroot/win32forth/win32forth/doc/Paths.htm,v retrieving revision 1.6 retrieving revision 1.7 diff -C2 -d -r1.6 -r1.7 *** Paths.htm 29 Aug 2006 10:31:46 -0000 1.6 --- Paths.htm 25 Sep 2006 11:42:57 -0000 1.7 *************** *** 1,6 **** ! <html> <head> ! <meta http-equiv="Content-Language" content="en-gb"> ! <meta name="GENERATOR" content="dexh00"> <meta name="ProgId" content="FrontPage.Editor.Document"> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> --- 1,8 ---- ! <?xml version="1.0"?> ! <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" ! "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd"> ! <html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en"> <head> ! <meta name="GENERATOR" content="dexh v03"> <meta name="ProgId" content="FrontPage.Editor.Document"> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252"> *************** *** 30,44 **** </p><pre><b><a name="5">: .dir ( -- ) </a></b></pre><p>Print the current directory. ! </p><pre><b><a name="6">: chdir ( -<optional_new_directory>- ) </a></b></pre><p>Set the current directory. ! </p><pre><b><a name="7">: path: ( - ) </a></b></pre><p>Defines a directory search path. <br /> The first 2 cells are used too handle a search path. <br /> The next 260 bytes are reserved for a counted string of a path. <br /> ! followed by 0. <br /> ! In runtime it returns adres of the counted string of a path ! </p><pre><b><a name="8">: path-source ( path - 2variable_path-source ) </a></b></pre><p>Path-source points to a substring in a path. <br /> ! Path-source returns this adress. </p><pre><b><a name="9">path: path-ptr deprecated </a></b></pre><p>The old functionality had the bad habbit to pass a pointer through a --- 32,46 ---- </p><pre><b><a name="5">: .dir ( -- ) </a></b></pre><p>Print the current directory. ! </p><pre><b><a name="6">: chdir ( -<optional_new_directory>- -- ) </a></b></pre><p>Set the current directory. ! </p><pre><b><a name="7">: path: ( -- ) </a></b></pre><p>Defines a directory search path. <br /> The first 2 cells are used too handle a search path. <br /> The next 260 bytes are reserved for a counted string of a path. <br /> ! followed by null. <br /> ! At runtime it returns address of the counted string of a path ! </p><pre><b><a name="8">: path-source ( path -- 2variable_path-source ) </a></b></pre><p>Path-source points to a substring in a path. <br /> ! Path-source returns this address. </p><pre><b><a name="9">path: path-ptr deprecated </a></b></pre><p>The old functionality had the bad habbit to pass a pointer through a *************** *** 66,71 **** </p><pre><b><a name="18">: .fpath ( -- ) </a></b></pre><p>Display the Forth directory search path list. ! </p><pre><b><a name="19">: volume-indication? ( adr - flag ) ! </a></b></pre><p>True when the counted string at adr starts with x: or \name </p><pre><b><a name="20">: full-path { a1 n1 path \ searchpath$ filename$ current$ -- a2 n2 f1 } </a></b></pre><p>Find file a1,n1 in a path and return the full path. <br /> --- 68,73 ---- </p><pre><b><a name="18">: .fpath ( -- ) </a></b></pre><p>Display the Forth directory search path list. ! </p><pre><b><a name="19">: volume-indication? ( addr -- flag ) ! </a></b></pre><p>True when the counted string at addr starts with x: or \name </p><pre><b><a name="20">: full-path { a1 n1 path \ searchpath$ filename$ current$ -- a2 n2 f1 } </a></b></pre><p>Find file a1,n1 in a path and return the full path. <br /> *************** *** 103,108 **** </p><pre><b><a name="34">synonym Require needs </a></b></pre><p>Forth 200X name for needs. ! </p><pre><b><a name="35">: "file-clip" { adr len limit \ temp$ pre -- 'adr 'len } ! </a></b></pre><p>Clip filename to limit. </p><hr><p>Document $Id$</p> </body></html> --- 105,113 ---- </p><pre><b><a name="34">synonym Require needs </a></b></pre><p>Forth 200X name for needs. ! </p><pre><b><a name="35">: "file-clip" { addr len limit | temp$ pre -- addr len2 } ! </a></b></pre><p>Clip filename to limit. If limit is less than 20 then the filename is clipped to ! 20. len2=len if len < limit or len < 20. len2 = 20 if limit < 20. len2 = limt ! otherwise. The string (if clipped) contains ... in the middle to indicate that# ! it has been clipped. </p><hr><p>Document $Id$</p> </body></html> |