tools.deploy.shaker: don't strip out io-thread, since new thread implementation requires at least one thread to be runnable at any time
parent
1b271f8202
commit
587664efbf
|
@ -42,12 +42,8 @@ IN: tools.deploy.shaker
|
||||||
deploy-threads? get [
|
deploy-threads? get [
|
||||||
"threads" startup-hooks get delete-at
|
"threads" startup-hooks get delete-at
|
||||||
] unless
|
] unless
|
||||||
native-io? [
|
|
||||||
"io.thread" startup-hooks get delete-at
|
|
||||||
] unless
|
|
||||||
strip-io? [
|
strip-io? [
|
||||||
"io.backend" startup-hooks get delete-at
|
"io.backend" startup-hooks get delete-at
|
||||||
"io.thread" startup-hooks get delete-at
|
|
||||||
] when
|
] when
|
||||||
strip-dictionary? [
|
strip-dictionary? [
|
||||||
{
|
{
|
||||||
|
@ -402,9 +398,6 @@ IN: tools.deploy.shaker
|
||||||
[
|
[
|
||||||
c-io-backend forget
|
c-io-backend forget
|
||||||
"io.streams.c" forget-vocab
|
"io.streams.c" forget-vocab
|
||||||
"io-thread-running?" "io.thread" lookup [
|
|
||||||
global delete-at
|
|
||||||
] when*
|
|
||||||
] with-compilation-unit
|
] with-compilation-unit
|
||||||
] when ;
|
] when ;
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue