From 29b6ae074808dfabac9159cf7beb3df018fc04b7 Mon Sep 17 00:00:00 2001 From: Marius Vollmer Date: Mon, 21 Oct 2002 12:03:30 +0000 Subject: [PATCH] (%thread-handler): Do not call unmask-signals, that should be unnecessary now. --- ice-9/threads.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/ice-9/threads.scm b/ice-9/threads.scm index 586bae368..42dc38d96 100644 --- a/ice-9/threads.scm +++ b/ice-9/threads.scm @@ -1,4 +1,4 @@ -;;;; Copyright (C) 1996, 1998, 2001 Free Software Foundation, Inc. +;;;; Copyright (C) 1996, 1998, 2001, 2002 Free Software Foundation, Inc. ;;;; ;;;; This program is free software; you can redistribute it and/or modify ;;;; it under the terms of the GNU General Public License as published by @@ -67,7 +67,6 @@ (define (%thread-handler tag . args) (fluid-set! the-last-stack #f) - (unmask-signals) (let ((n (length args)) (p (current-error-port))) (display "In thread:" p)