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

fix `place-break' on a terminated place

Browse Source
This commit is contained in:
Matthew Flatt 2011-08-19 09:49:57 -06:00
parent 0c7b1925a5
commit 6073ef5ff5
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/racket/src/place.c
View File

@ -317,6 +317,7 @@ static int do_place_break(Scheme_Place *place) {
place_obj->pbreak = 1; place_obj->pbreak = 1;
if (place_obj->signal_handle)
scheme_signal_received_at(place_obj->signal_handle); scheme_signal_received_at(place_obj->signal_handle);
mzrt_mutex_unlock(place_obj->lock); mzrt_mutex_unlock(place_obj->lock);