strip-startup-hooks ( -- )


Vocabulary
tools.deploy.shaker

Inputs
None

Outputs
None

Definition


: strip-startup-hooks ( -- )
"Stripping startup hooks" show
{ "alien.strings" "cpu.x86.features" "environment" }
[ startup-hooks get delete-at ] each deploy-threads? get
[ "threads" startup-hooks get delete-at ] unless strip-io?
[ "io.backend" startup-hooks get delete-at ] when
strip-dictionary? [
{
"compiler.units"
"source-files.errors"
"vocabs"
"vocabs.cache"
} [ startup-hooks get delete-at ] each
] when ;