suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix channel/semaphore sync bug

Browse Source
This commit is contained in:
Matthew Flatt 2011-11-02 15:54:50 -06:00
parent 40f3388051
commit a495c9f349
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
src/racket/src/sema.c
View File

@ -673,7 +673,12 @@ int scheme_wait_semas_chs(int n, Scheme_Object **o, int just_try, Syncing *synci
break; break;
} else { } else {
/* there may have been some action on one of the waitables; /* there may have been some action on one of the waitables;
try again */ try again, if no result, yet */
if (syncing && syncing->result) {
i = syncing->result - 1;
ii = 0;
break;
}
} }
} else } else
break; break;