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

vocabs.hierarchy: load word now tries to load the vocab named by the prefix itself

db4
Slava Pestov 2009-08-05 23:04:34 -05:00
parent 370f4c081d
commit b4f97dc632
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/vocabs/hierarchy/hierarchy.factor
View File

@ -107,8 +107,9 @@ MEMO: all-vocabs-recursive ( -- assoc )
PRIVATE> PRIVATE>
: (load) ( prefix -- failures ) : (load) ( prefix -- failures )
child-vocabs-recursive no-roots no-prefixes [ child-vocabs-recursive no-roots no-prefixes ]
filter-unportable [ dup find-vocab-root [ >vocab-link ] [ drop f ] if ] bi
prefix filter-unportable
require-all ; require-all ;
: load ( prefix -- ) : load ( prefix -- )