remove 'flush' in cont-responder
The call to flush was causing 'cant write to closed output stream' errors.darcs
parent
faba122522
commit
20ddf87fca
|
@ -291,7 +291,7 @@ SYMBOL: root-continuation
|
||||||
] [
|
] [
|
||||||
expired-page-handler
|
expired-page-handler
|
||||||
] if*
|
] if*
|
||||||
] with-exit-continuation [ drop flush ] when* ;
|
] with-exit-continuation drop ;
|
||||||
|
|
||||||
: callback-quot ( quot -- quot )
|
: callback-quot ( quot -- quot )
|
||||||
#! Convert the given quotation so it works as a callback
|
#! Convert the given quotation so it works as a callback
|
||||||
|
|
Loading…
Reference in New Issue