From: George H. <geo...@us...> - 2006-08-05 12:28:52
|
Update of /cvsroot/win32forth/win32forth/doc In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv28590/win32forth/doc Modified Files: Paths.htm Log Message: gah:Minor correction to docs Index: Paths.htm =================================================================== RCS file: /cvsroot/win32forth/win32forth/doc/Paths.htm,v retrieving revision 1.3 retrieving revision 1.4 diff -C2 -d -r1.3 -r1.4 *** Paths.htm 4 Aug 2006 09:53:29 -0000 1.3 --- Paths.htm 5 Aug 2006 12:27:39 -0000 1.4 *************** *** 67,102 **** </p><pre><b><a name="20">: program-path-init ( -- ) </a></b></pre><p>Initialize the Forth directory search path list. Automatically done at program ! </p><pre><b><a name="21">\ *G Initialize the Forth directory search path list. Automatically done at program ! </a></b></pre><p>initialization and when Paths.f is loaded. ! </p><pre><b><a name="22">: "path-file { a1 n1 \ current$ -- a2 n2 f1 } </a></b></pre><p>Find file a1,n1 in the Forth path and return the full path. <br /> a2,n2 and f1=false, succeeded. ! </p><pre><b><a name="23">: n"open ( a1 n1 -- handle f1 ) </a></b></pre><p>Open file a1,n1 with a Forth path search. ! </p><pre><b><a name="24">: MakeAbsolutePath ( a1 n1 a2 n2 -- a3 ) </a></b></pre><p>Make path a1 n1 absolute to path a2 n2. ! </p><pre><b><a name="25">: IsPathRelativeTo? { a1 n1 a2 n2 -- f } </a></b></pre><p>Return true if path a1 n1 is relative to path a2 n2 ! </p><pre><b><a name="26">: MakePathRelativeTo ( a1 n1 a2 n2 -- a3 ) </a></b></pre><p>Make path a1 n1 relative to path a2 n2. ! </p><pre><b><a name="27">: FindRelativePath ( a1 n1 path-ptr - a2 n2 ) </a></b></pre><p>Returns a relative path for file a1 n1 in path-ptr ( first part ). <br /> n2=0 means not in search path. ! </p><pre><b><a name="28">: FindRelativeName ( a1 n1 path-ptr - a2 n2 f ) </a></b></pre><p>Returns a releative name for file a1 n1 in path-ptr ( last-part ). <br /> n2=0 means not in search path. ! </p><pre><b><a name="29">: "LOADED? ( addr len -- flag ) </a></b></pre><p>True if a file addr len is loaded. The filename must cointain a full path. ! </p><pre><b><a name="30">: LOADED? ( -<name>- -- flag ) { \ current$ } </a></b></pre><p>True if the following file is loaded. The filename may be relative. ! </p><pre><b><a name="31">: \LOADED- ( -<name>- ) </a></b></pre><p>If the following file IS NOT LOADED interpret line. ! </p><pre><b><a name="32">: \LOADED ( -<name>- ) </a></b></pre><p> If the following file IS LOADED interpret line. ! </p><pre><b><a name="33">: NEEDS ( -<name>- ) </a></b></pre><p>Conditionally load file "name" if not loaded. ! </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> --- 67,101 ---- </p><pre><b><a name="20">: program-path-init ( -- ) </a></b></pre><p>Initialize the Forth directory search path list. Automatically done at program ! initialization and when Paths.f is loaded. ! </p><pre><b><a name="21">: "path-file { a1 n1 \ current$ -- a2 n2 f1 } </a></b></pre><p>Find file a1,n1 in the Forth path and return the full path. <br /> a2,n2 and f1=false, succeeded. ! </p><pre><b><a name="22">: n"open ( a1 n1 -- handle f1 ) </a></b></pre><p>Open file a1,n1 with a Forth path search. ! </p><pre><b><a name="23">: MakeAbsolutePath ( a1 n1 a2 n2 -- a3 ) </a></b></pre><p>Make path a1 n1 absolute to path a2 n2. ! </p><pre><b><a name="24">: IsPathRelativeTo? { a1 n1 a2 n2 -- f } </a></b></pre><p>Return true if path a1 n1 is relative to path a2 n2 ! </p><pre><b><a name="25">: MakePathRelativeTo ( a1 n1 a2 n2 -- a3 ) </a></b></pre><p>Make path a1 n1 relative to path a2 n2. ! </p><pre><b><a name="26">: FindRelativePath ( a1 n1 path-ptr - a2 n2 ) </a></b></pre><p>Returns a relative path for file a1 n1 in path-ptr ( first part ). <br /> n2=0 means not in search path. ! </p><pre><b><a name="27">: FindRelativeName ( a1 n1 path-ptr - a2 n2 f ) </a></b></pre><p>Returns a releative name for file a1 n1 in path-ptr ( last-part ). <br /> n2=0 means not in search path. ! </p><pre><b><a name="28">: "LOADED? ( addr len -- flag ) </a></b></pre><p>True if a file addr len is loaded. The filename must cointain a full path. ! </p><pre><b><a name="29">: LOADED? ( -<name>- -- flag ) { \ current$ } </a></b></pre><p>True if the following file is loaded. The filename may be relative. ! </p><pre><b><a name="30">: \LOADED- ( -<name>- ) </a></b></pre><p>If the following file IS NOT LOADED interpret line. ! </p><pre><b><a name="31">: \LOADED ( -<name>- ) </a></b></pre><p> If the following file IS LOADED interpret line. ! </p><pre><b><a name="32">: NEEDS ( -<name>- ) </a></b></pre><p>Conditionally load file "name" if not loaded. ! </p><pre><b><a name="33">synonym Require needs </a></b></pre><p>Forth 200X name for needs. ! </p><pre><b><a name="34">: "file-clip" { adr len limit \ temp$ pre -- 'adr 'len } </a></b></pre><p>Clip filename to limit. </p><hr><p>Document $Id$</p> |