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

vocabs: words-named should't f suffix.

locals-and-roots
John Benediktsson 2016-03-29 13:14:24 -07:00
parent a63492e9c0
commit 7dbe6c177e
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/vocabs.factor
View File

@ -104,7 +104,7 @@ ERROR: no-vocab name ;
[ values [ vocab-words-assoc at ] with map sift ] [ values [ vocab-words-assoc at ] with map sift ]
[ [
[ ":" split1 swap ] dip at [ ":" split1 swap ] dip at
[ vocab-words-assoc at suffix ] [ drop ] if* [ vocab-words-assoc at [ suffix ] when* ] [ drop ] if*
] 2bi ; ] 2bi ;
: child-vocab? ( prefix name -- ? ) : child-vocab? ( prefix name -- ? )