Fcalva/chibi-scheme
1
0
Fork 0
mirror of https://github.com/ashinn/chibi-scheme.git synced 2025-07-06 20:56:38 +02:00
Code Issues Projects Releases Packages Wiki Activity Actions

If we lookup a fileno that was cached but closed we need to reopen it.

Browse source
This commit is contained in:
Alex Shinn 2014-06-03 08:50:46 +09:00
parent a2ffe5301b
commit 26716b1a2b
1 changed files with 1 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
sexp.c
View file

@ -1716,6 +1716,7 @@ sexp sexp_make_fileno_op (sexp ctx, sexp self, sexp_sint_t n, sexp fd, sexp no_c
res = sexp_lookup_fileno(ctx, sexp_unbox_fixnum(fd)); res = sexp_lookup_fileno(ctx, sexp_unbox_fixnum(fd));
if (sexp_filenop(res)) { if (sexp_filenop(res)) {
sexp_fileno_no_closep(res) = sexp_truep(no_closep); sexp_fileno_no_closep(res) = sexp_truep(no_closep);
sexp_fileno_openp(res) = 1; /* not necessarily */
return res; return res;
} }
#endif #endif