steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

vocabs.loader: make vocab-dir+ use path-separator too

Joe Groff 2010-02-16 19:29:42 -08:00
parent f344c00629
commit 2dcc720629
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
core/vocabs/loader/loader.factor
View File

@ -42,7 +42,7 @@ PRIVATE>
: vocab-dir+ ( vocab str/f -- path ) : vocab-dir+ ( vocab str/f -- path )
[ vocab-name "." split ] dip [ vocab-name "." split ] dip
[ [ dup last ] dip append suffix ] when* [ [ dup last ] dip append suffix ] when*
"/" join ; path-separator join ;
: find-vocab-root ( vocab -- path/f ) : find-vocab-root ( vocab -- path/f )
vocab-name dup root-cache get at vocab-name dup root-cache get at