mirror of
https://github.com/ashinn/chibi-scheme.git
synced 2025-07-11 06:57:33 +02:00
typo in write-char opcode
This commit is contained in:
parent
f6c3d1d415
commit
eaf41d2ce8
1 changed files with 1 additions and 1 deletions
2
vm.c
2
vm.c
|
@ -1927,7 +1927,7 @@ sexp sexp_apply (sexp ctx, sexp proc, sexp args) {
|
|||
#if SEXP_USE_GREEN_THREADS
|
||||
if ((sexp_port_stream(_ARG2) ? ferror(sexp_port_stream(_ARG2)) : 1)
|
||||
&& (errno == EAGAIN)) {
|
||||
if (sexp_port_stream(_ARG1)) clearerr(sexp_port_stream(_ARG2));
|
||||
if (sexp_port_stream(_ARG2)) clearerr(sexp_port_stream(_ARG2));
|
||||
if (sexp_applicablep(sexp_global(ctx, SEXP_G_THREADS_BLOCKER)))
|
||||
sexp_apply1(ctx, sexp_global(ctx, SEXP_G_THREADS_BLOCKER), _ARG2);
|
||||
fuel = 0;
|
||||
|
|
Loading…
Add table
Reference in a new issue