> (handler-case (fact n)
>   (excl::interrupt-signal (c) (format t "~a" c)) 
>   (condition (c) (format t "C ~a" c)))
> ...
> the second format statement is invoked when typing ^C when bar is running.
> 
> Note that for me ACL is the underlying system for Refine; is it possible that Refine is 
> modifying the signal handling?

Refine does not modify the signal handling, but Common Windows does.

If you try the same experiment in a plain ACL 4.3, the first format statement
happens.  If you then load Common Windows (or probably Composer, which uses
Common Windows) then the second format statement happens.

For Refine users, if you try the same experiment in Refine 4.1 without having
loaded Intervista, you get the 1st format statement.  When you load
Intervista (which causes Common Windows to be initialized) and retry the
experiment, you get the 2nd format statement.


~~~~~~~~~~~~~~~~~
Eric McCarthy
Reasoning, Inc.
<reasoning.com at help>