--- gforth/fflib.fs	2003/08/17 20:38:02	1.5
+++ gforth/fflib.fs	2005/08/21 22:09:14	1.6
@@ -71,7 +71,7 @@ DOES> ( x1 .. xn -- r )
 \G    linked list of library's procs
 \G    OS name of library as counted string
     Create  here libs @ A, dup libs !
-    0 , 0 A, bl sword string, @lib
+    0 , 0 A, parse-name string, @lib
 DOES> ( -- )  dup thislib ! proc: ;
 
 : init-shared-libs ( -- )
@@ -107,7 +107,7 @@ DOES> ( -- )  dup thislib ! proc: ;
     r> compile,  postpone EXIT ;
 
 : symbol, ( "c-symbol" -- )
-    here thisproc @ 2 cells + ! bl sword s,
+    here thisproc @ 2 cells + ! parse-name s,
     thislib @ thisproc @ @proc ;
 
 : rettype ( endxt startxt "name" -- )