projects / mit-scheme.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 9d087bd) | patch
edwin/intmod.scm: Call suspend-current-thread with events blocked.
authorMatt Birkholz <puck@birchwood-abbey.net>
Fri, 29 Jul 2016 06:49:29 +0000 (23:49 -0700)
committerMatt Birkholz <puck@birchwood-abbey.net>
Fri, 29 Jul 2016 07:08:47 +0000 (00:08 -0700)
commit3123f25f39597d863817062922f426e6a7bbc392
tree0e89733dd25b9e62779ce62320d8233743f51cf7tree | snapshot
parent9d087bd97afca21c9d2a44a3887d19205a83466fcommit | diff
edwin/intmod.scm: Call suspend-current-thread with events blocked.

Blocking thread events around these wait loops closes an interrupt
hole between testing and suspending.
src/edwin/intmod.scm diff | blob | history
MIT/GNU Scheme, Pucked