fix `place-break' on terminated place
Merge to 5.2
(cherry picked from commit 0993408c19
)
This commit is contained in:
parent
c760197bd0
commit
a24c809202
|
@ -515,7 +515,7 @@ static int do_place_break(Scheme_Place *place)
|
|||
Scheme_Place_Object *place_obj;
|
||||
place_obj = place->place_obj;
|
||||
|
||||
{
|
||||
if (place_obj) {
|
||||
mzrt_mutex_lock(place_obj->lock);
|
||||
|
||||
place_obj->pbreak = 1;
|
||||
|
|
Loading…
Reference in New Issue
Block a user