mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-11-02 16:43:02 +00:00
Code Issues 1 Releases Wiki Activity

Merge pull request #823 from llmII/fix-kqueue-hang

Browse Source 
Fix #822 - kqueue hang in suite 9.
This commit is contained in:
Calvin Rose
2021-09-30 10:50:04 -05:00
committed by GitHub
parent 1bf22288ee 6b3037106a
commit 186afa9651
1 changed files with 4 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
src/core/ev.c
View File

@@ -1709,7 +1709,8 @@ void janet_loop1_impl(int has_timeout, JanetTimestamp timeout) {
} else {
JanetStream *stream = p;
JanetListenerState *state = stream->state;
if (NULL != state) {
while (NULL != state) {
JanetListenerState *next_state = state->_next;
state->event = events + i;
JanetAsyncStatus statuses[4];
for (int i = 0; i < 4; i++)
@@ -1730,6 +1731,8 @@ void janet_loop1_impl(int has_timeout, JanetTimestamp timeout) {
statuses[2] == JANET_ASYNC_STATUS_DONE ||
statuses[3] == JANET_ASYNC_STATUS_DONE)
janet_unlisten(state, 0);
state = next_state;
}
}
}