From john at synchromesh.com Fri Sep 12 04:13:12 2008 From: john at synchromesh.com (John Pallister) Date: Fri, 12 Sep 2008 16:13:12 +1200 Subject: [trivial-timeout-devel] LispWorks support for trivial-timeout Message-ID: <48C9EC58.3040005@synchromesh.com> Hi Gary, I've modified with-timeout.lisp to add LispWorks support. I've "tested" it (where "tested" == "debugged"). I have attached a unified diff and my modified source file. It seemed to me that your uses of PROGN and VALUES were redundant, and I'm curious as to why they were present (and/or whether I'm just wrong). I hope this is useful. I'd be interested in any comments or feedback you might have. Cheers, John :^P -- John Pallister john at synchromesh.com -------------- next part -------------- An embedded and charset-unspecified text was scrubbed... Name: lispworks-support.diff URL: -------------- next part -------------- An embedded and charset-unspecified text was scrubbed... Name: with-timeout.lisp URL: From gwking at metabang.com Tue Sep 16 12:57:43 2008 From: gwking at metabang.com (Gary King) Date: Tue, 16 Sep 2008 08:57:43 -0400 Subject: [trivial-timeout-devel] Re: LispWorks support for trivial-timeout In-Reply-To: <48C9EC58.3040005@synchromesh.com> References: <48C9EC58.3040005@synchromesh.com> Message-ID: <634B6DF1-2B86-4596-A986-5090CCAAB212@metabang.com> Hi John, Thanks very much for this contribution to trivial-timeout. You're absolutely right that doit needs to be protected with a gensym. Good catch for my miss! As for the progn and the values... go figure. I originally wrote this code a _long_ time ago and I was probably being, I don't know, overprotective. They certainly look redundant now. I've rearranged the code in a way that I think makes multiple platform support easier to implement and understand; I'll be posting version 0.1.3 later today. On Sep 12, 2008, at 12:13 AM, John Pallister wrote: > Hi Gary, > > I've modified with-timeout.lisp to add LispWorks support. I've > "tested" it (where "tested" == "debugged"). I have attached a > unified diff and my modified source file. > > It seemed to me that your uses of PROGN and VALUES were redundant, > and I'm curious as to why they were present (and/or whether I'm just > wrong). > > I hope this is useful. I'd be interested in any comments or feedback > you might have. > > Cheers, -- Gary Warren King, metabang.com Cell: (413) 559 8738 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM From gwking at metabang.com Wed Sep 17 00:42:23 2008 From: gwking at metabang.com (Gary King) Date: Tue, 16 Sep 2008 20:42:23 -0400 Subject: [trivial-timeout-devel] announce: 0.1.3 Message-ID: <507C6612-078C-4B09-9504-6F568094F9F9@metabang.com> Thanks to John Pallister for catching a variable (really an flet) capture in my macro _and_ for adding Lispworks support. Still needed: CLISP, testing for SBCL with threads and CMU (also ECL, etc)... Thanks! -- Gary Warren King, metabang.com Cell: (413) 559 8738 Fax: (206) 338-4052 gwkkwg on Skype * garethsan on AIM From denatus at gmail.com Thu Sep 18 23:03:55 2008 From: denatus at gmail.com (Denatus) Date: Fri, 19 Sep 2008 01:03:55 +0200 Subject: [trivial-timeout-devel] Small bug found in the Clozure Common Lisp Message-ID: 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 at gmail.com ------------------------------ -------------- next part -------------- An HTML attachment was scrubbed... URL: From gwking at metabang.com Fri Sep 19 16:26:58 2008 From: gwking at metabang.com (Gary King) Date: Fri, 19 Sep 2008 12:26:58 -0400 Subject: [trivial-timeout-devel] Small bug found in the Clozure Common Lisp In-Reply-To: References: Message-ID: 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 at gmail.com > ------------------------------ > _______________________________________________ > trivial-timeout-devel mailing list > trivial-timeout-devel at 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 -------------- next part -------------- An HTML attachment was scrubbed... URL: From gwking at metabang.com Sun Sep 21 00:02:37 2008 From: gwking at metabang.com (Gary King) Date: Sat, 20 Sep 2008 20:02:37 -0400 Subject: [trivial-timeout-devel] Small bug found in the Clozure Common Lisp In-Reply-To: References: Message-ID: <45C7FFF9-F96B-4D77-9FC5-A00559E59767@metabang.com> 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