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

FUEL: Fix word completion in contexts where no context is provided (e.g., the listener)

db4
Jose A. Ortega Ruiz 2009-07-31 17:46:52 +02:00
parent e006b5f844
commit 7d7a85e69a
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
extra/fuel/xref/xref.factor
View File

@ -36,8 +36,8 @@ MEMO: (vocab-words) ( name -- seq )
: current-words ( -- seq )
manifest get
[ search-vocabs>> ] [ qualified-vocabs>> ] bi [ words>> ] bi@
assoc-union keys ;
[ search-vocabs>> ] [ qualified-vocabs>> ] bi [ [ words>> ] map ] bi@
append H{ } [ assoc-union ] reduce keys ;
: vocabs-words ( names -- seq )
prune [ (vocab-words) ] map concat ;