<html><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; ">Thanks for catching that; I don't have CCL on my notebook and had not made the time to test it myself on my  desktop. I'll incorporate your patch shortly.<div><br><div><div>On Sep 18, 2008, at 7:03 PM, Denatus wrote:</div><br class="Apple-interchange-newline"><blockquote type="cite"><div dir="ltr">I found a small bug/typo in the CCL specific code in the with-timeout.lisp file, which makes the trivial-timeout library not to function properly on CCL.<br><br>File: with-timeout.lisp<br><br>Original code:(Line 87 and 88)<br>     (* ,gseconds #+(or openmcl ccl)<br>       ccl:*ticks-per-second* #+digitool 60)<br><br>Fix:(Line 87 and 88)<br>    (* ,seconds-symbol #+(or openmcl ccl)<br>       ccl:*ticks-per-second* #+digitool 60)<br clear="all"><br> -- <br> _________________<br> Kjeld K. B. Massali<br> <a href="mailto:denatus@gmail.com">denatus@gmail.com</a> <br> ------------------------------<br> </div> _______________________________________________<br>trivial-timeout-devel mailing list<br><a href="mailto:trivial-timeout-devel@common-lisp.net">trivial-timeout-devel@common-lisp.net</a><br>http://common-lisp.net/cgi-bin/mailman/listinfo/trivial-timeout-devel<br></blockquote></div><br><div> <span class="Apple-style-span" style="border-collapse: separate; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0; "><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><span class="Apple-style-span" style="border-collapse: separate; border-spacing: 0px 0px; color: rgb(0, 0, 0); font-family: Helvetica; font-size: 12px; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; text-align: auto; -khtml-text-decorations-in-effect: none; text-indent: 0px; -apple-text-size-adjust: auto; text-transform: none; orphans: 2; white-space: normal; widows: 2; word-spacing: 0px; "><div>--</div><div>Gary Warren King, metabang.com </div><div>Cell: (413) 559 8738</div><div>Fax: (206) 338-4052</div></span><div>gwkkwg on Skype * garethsan on AIM</div><div><br class="khtml-block-placeholder"></div><div><br class="khtml-block-placeholder"></div></span><br class="Apple-interchange-newline"></span></div></span> </div><br></div></body></html>