Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs9.sourceforge.net:/tmp/cvs-serv11980/src
Modified Files:
paths.f
Log Message:
Jos: Removed a check point.
Index: paths.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/paths.f,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** paths.f 8 Jul 2006 17:50:36 -0000 1.9
--- paths.f 8 Jul 2006 17:58:07 -0000 1.10
***************
*** 272,276 ****
new$ >r /parse-s$ count r@ place \ store file name
r@ ?defext r> count \ add default ext if needed
! "path-file drop cr 2dup type \ extend to full path
"loaded? ;
--- 272,276 ----
new$ >r /parse-s$ count r@ place \ store file name
r@ ?defext r> count \ add default ext if needed
! "path-file drop \ extend to full path
"loaded? ;
|