builder.test: Only extract the vocab names from the result of try-everything
parent
0f04e9714e
commit
04dc25f87a
|
@ -7,8 +7,10 @@ USING: kernel sequences assocs builder continuations vocabs vocabs.loader
|
||||||
|
|
||||||
IN: builder.test
|
IN: builder.test
|
||||||
|
|
||||||
|
: try-everything* ( -- vocabs ) try-everything [ first vocab-link-name ] map ;
|
||||||
|
|
||||||
: do-load ( -- )
|
: do-load ( -- )
|
||||||
[ try-everything ] "../load-everything-time" log-runtime
|
[ try-everything* ] "../load-everything-time" log-runtime
|
||||||
dup empty?
|
dup empty?
|
||||||
[ drop ]
|
[ drop ]
|
||||||
[ "../load-everything-log" log-object ]
|
[ "../load-everything-log" log-object ]
|
||||||
|
|
Loading…
Reference in New Issue