mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-23 20:05:32 +02:00
Code Activity

(%thread-handler): Do not call unmask-signals, that should be

Browse source 
unnecessary now.
This commit is contained in:
Marius Vollmer 2002-10-21 12:03:30 +00:00
parent c2015a4f53
commit 29b6ae0748
1 changed files with 1 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

3
ice-9/threads.scm
View file

@ -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)