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

cs: unbreak async foreign callbacks

Browse Source 
Adds a changed missed in 1624193210.
This commit is contained in:
Matthew Flatt 2019-04-25 19:52:00 -06:00
parent 776996fe24
commit c59ba15522
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
racket/src/thread/schedule.rkt
View File

@ -185,7 +185,7 @@
(engine-block)) (engine-block))
(lambda args (lambda args
(internal-error "thread ended while it should run callbacks atomically")) (internal-error "thread ended while it should run callbacks atomically"))
(lambda (e) (lambda (e timeout?)
(start-implicit-atomic-mode) (start-implicit-atomic-mode)
(if done? (if done?
(k e) (k e)