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

Merge branch 'master' of git://factorcode.org/git/factor

db4
Slava Pestov 2008-04-04 10:14:32 -05:00
parent 8f8d78d73d f6030fb3a4
commit d36c8620de
1 changed files with 9 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
extra/tools/deploy/shaker/shaker.factor
View File

@ -6,6 +6,7 @@ memory kernel.private continuations io prettyprint
vocabs.loader debugger system strings ; vocabs.loader debugger system strings ;
QUALIFIED: bootstrap.stage2 QUALIFIED: bootstrap.stage2
QUALIFIED: classes QUALIFIED: classes
QUALIFIED: command-line
QUALIFIED: compiler.errors.private QUALIFIED: compiler.errors.private
QUALIFIED: compiler.units QUALIFIED: compiler.units
QUALIFIED: continuations QUALIFIED: continuations
@ -139,14 +140,17 @@ IN: tools.deploy.shaker
{ } { "cpu" } strip-vocab-globals % { } { "cpu" } strip-vocab-globals %
{ {
gensym
classes:class-and-cache classes:class-and-cache
classes:class-not-cache classes:class-not-cache
classes:class-or-cache classes:class-or-cache
classes:class<-cache classes:class<-cache
classes:classes-intersect-cache classes:classes-intersect-cache
classes:update-map classes:update-map
command-line:main-vocab-hook
compiled-crossref compiled-crossref
compiler.units:recompile-hook compiler.units:recompile-hook
compiler.units:update-tuples-hook
definitions:crossref definitions:crossref
interactive-vocabs interactive-vocabs
layouts:num-tags layouts:num-tags
@ -186,6 +190,11 @@ IN: tools.deploy.shaker
deploy-ui? get [ deploy-ui? get [
"ui-error-hook" "ui.gadgets.worlds" lookup , "ui-error-hook" "ui.gadgets.worlds" lookup ,
] when ] when
"<computer>" "inference.dataflow" lookup [ , ] when*
"windows-messages" "windows.messages" lookup [ , ] when*
] { } make ; ] { } make ;
: strip-globals ( stripped-globals -- ) : strip-globals ( stripped-globals -- )