From 6073ef5ff5c29c971ea73fabe93df44eed3343b7 Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Fri, 19 Aug 2011 09:49:57 -0600 Subject: [PATCH] fix `place-break' on a terminated place --- src/racket/src/place.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/racket/src/place.c b/src/racket/src/place.c index b3aa899a54..36576224bf 100644 --- a/src/racket/src/place.c +++ b/src/racket/src/place.c @@ -317,7 +317,8 @@ static int do_place_break(Scheme_Place *place) { place_obj->pbreak = 1; - scheme_signal_received_at(place_obj->signal_handle); + if (place_obj->signal_handle) + scheme_signal_received_at(place_obj->signal_handle); mzrt_mutex_unlock(place_obj->lock); }