<div class="gmail_quote">On Fri, Aug 20, 2010 at 10:23 PM, Pascal J. Bourguignon <span dir="ltr"><<a href="mailto:pjb@informatimago.com">pjb@informatimago.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">

When a unix signal is received, ecl cl:signals a simple-error with:<br>
<br>
unixint.d:370:                FEerror("Serious signal ~D caught.", 1, signal_code);<br>
<br>
In this it would be better if a specific condition was signaled<br>
instead, so that applications could more easily handle the signal.</blockquote></div><div><br></div>It's in CVS now. Slight change of names. Please report if it works for you!<div><br></div><div><div>(define-condition ext:unix-signal-received ()</div>

<div>  ((code :type fixnum</div><div>         :initform 0</div><div>         :initarg :signal-code</div><div>         :accessor ext:unix-signal-received-code))</div><div>  (:report (lambda (condition stream)</div><div>             (format stream "Serious signal ~D caught."</div>

<div>                     (ext:unix-signal-received-code condition)))))</div><div><br></div><div><br></div><div>Juanjo<br clear="all"><br>-- <br>Instituto de Física Fundamental, CSIC<br>c/ Serrano, 113b, Madrid 28006 (Spain) <br>

<a href="http://juanjose.garciaripoll.googlepages.com">http://juanjose.garciaripoll.googlepages.com</a><br>
</div></div>