[Chicken-janitors] #989: High CPU usage when calling signal handler multiple times

[Chicken Trac]

#989: High CPU usage when calling signal handler multiple times
-----------------------------+----------------------------------------------
 Reporter:  mario            |       Owner:       
     Type:  defect           |      Status:  new  
 Priority:  critical         |   Milestone:  4.9.0
Component:  core libraries   |     Version:  4.8.x
 Keywords:  signal handling  |  
-----------------------------+----------------------------------------------
 Here's an example to demonstrate the aforementioned behavior:

 {{{
 ;; Press C-c multiple times in an interval < 20s

 (use posix)

 (set-signal-handler!
  signal/int
  (lambda (signal)
    (print "caught signal" signal)
    (sleep 20)))


 (let loop ()
   (sleep 1)
   (loop))
 }}}

 I cannot reproduce that behavior on 4.7.0.  Peter mentioned on IRC that
 b7995839c0b481280bdeda117eb68bc0e78a40bf triggered it.

-- 
Ticket URL: <http://bugs.call-cc.org/ticket/989>
Chicken Scheme <http://www.call-with-current-continuation.org/>
Chicken Scheme is a compiler for the Scheme programming language.