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.
File: with-timeout.lisp
Original code:(Line 87 and 88) (* ,gseconds #+(or openmcl ccl) ccl:*ticks-per-second* #+digitool 60)
Fix:(Line 87 and 88) (* ,seconds-symbol #+(or openmcl ccl) ccl:*ticks-per-second* #+digitool 60)
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.
On Sep 18, 2008, at 7:03 PM, Denatus wrote:
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.
File: with-timeout.lisp
Original code:(Line 87 and 88) (* ,gseconds #+(or openmcl ccl) ccl:*ticks-per-second* #+digitool 60)
Fix:(Line 87 and 88) (* ,seconds-symbol #+(or openmcl ccl) ccl:*ticks-per-second* #+digitool 60)
-- _________________ Kjeld K. B. Massali denatus@gmail.com
trivial-timeout-devel mailing list trivial-timeout-devel@common-lisp.net http://common-lisp.net/cgi-bin/mailman/listinfo/trivial-timeout-devel
-- Gary Warren King, metabang.com Cell: (413) 559 8738 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM
I've just pushed this fix. Thanks
File: with-timeout.lisp
Original code:(Line 87 and 88) (* ,gseconds #+(or openmcl ccl) ccl:*ticks-per-second* #+digitool 60)
Fix:(Line 87 and 88) (* ,seconds-symbol #+(or openmcl ccl) ccl:*ticks-per-second* #+digitool 60)
-- Gary Warren King, metabang.com Cell: (413) 559 8738 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM
trivial-timeout-devel@common-lisp.net
-
Denatus -
Gary King