Tree shaker now strips out some more PEG stuff
parent
d60c79c9bf
commit
4102857694
|
@ -109,6 +109,7 @@ IN: tools.deploy.shaker
|
||||||
"default-method"
|
"default-method"
|
||||||
"default-output-classes"
|
"default-output-classes"
|
||||||
"derived-from"
|
"derived-from"
|
||||||
|
"ebnf-parser"
|
||||||
"engines"
|
"engines"
|
||||||
"forgotten"
|
"forgotten"
|
||||||
"identities"
|
"identities"
|
||||||
|
@ -269,8 +270,8 @@ IN: tools.deploy.shaker
|
||||||
} %
|
} %
|
||||||
|
|
||||||
{ } { "math.partial-dispatch" } strip-vocab-globals %
|
{ } { "math.partial-dispatch" } strip-vocab-globals %
|
||||||
|
|
||||||
"peg-cache" "peg" lookup ,
|
{ } { "peg" } strip-vocab-globals %
|
||||||
] when
|
] when
|
||||||
|
|
||||||
strip-prettyprint? [
|
strip-prettyprint? [
|
||||||
|
@ -346,7 +347,7 @@ IN: tools.deploy.shaker
|
||||||
|
|
||||||
: finish-deploy ( final-image -- )
|
: finish-deploy ( final-image -- )
|
||||||
"Finishing up" show
|
"Finishing up" show
|
||||||
>r { } set-datastack r>
|
[ { } set-datastack ] dip
|
||||||
{ } set-retainstack
|
{ } set-retainstack
|
||||||
V{ } set-namestack
|
V{ } set-namestack
|
||||||
V{ } set-catchstack
|
V{ } set-catchstack
|
||||||
|
@ -387,9 +388,9 @@ SYMBOL: deploy-vocab
|
||||||
strip-c-io
|
strip-c-io
|
||||||
f 5 setenv ! we can't use the Factor debugger or Factor I/O anymore
|
f 5 setenv ! we can't use the Factor debugger or Factor I/O anymore
|
||||||
deploy-vocab get vocab-main set-boot-quot*
|
deploy-vocab get vocab-main set-boot-quot*
|
||||||
stripped-word-props >r
|
stripped-word-props
|
||||||
stripped-globals strip-globals
|
stripped-globals strip-globals
|
||||||
r> strip-words
|
strip-words
|
||||||
compress-byte-arrays
|
compress-byte-arrays
|
||||||
compress-quotations
|
compress-quotations
|
||||||
compress-strings
|
compress-strings
|
||||||
|
|
Loading…
Reference in New Issue