mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

Fix "non-revealed port is closed" ports.test

Browse source 
Don't close the test port's file descriptor because the port still has a
reference to it, and could still close it at any time when finally
garbage collected.  This did soemetimes break subsequent tests.

Bug: https://debbugs.gnu.org/43521
This commit is contained in:
Rob Browning 2020-09-19 14:09:04 -05:00
parent f18f670223
commit 6e82a4516a
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

7
test-suite/tests/ports.test
View file

@ -623,9 +623,10 @@
(seek fdes 0 SEEK_CUR)
;; If we get here, it might be because PORT was not GC'd, we
;; don't know (and we can't use a guardian because it would keep
;; PORT alive.)
(close-fdes fdes)
;; don't know, and we can't use a guardian because it would keep
;; PORT alive, and we can't close the descriptor because
;; subseuqent opens may re-use it, and then if this port is
;; garbage collected, it'll close the descriptor unexpectedly.
(throw 'unresolved))
(lambda args
(system-error-errno args)))))