On Mar 14, 2005, at 4:50 PM, Edi Weitz wrote:
Hi!
On Mon, 14 Mar 2005 08:22:00 -0500, Bob Hutchison hutch@recursive.ca wrote:
I've attached patches for both Araneida and TBNL to this message. Sorry for the cross-posting but there is some co-ordination required here and I thought this would be a good way to do it.
Thanks. I've released a new version of TBNL (0.4.0) which includes your patches and some initial documentation on how to use it - please check.
I've downloaded it and installed. Encountered a little problem. In araneida-test it seems that the setq of the *dispatch-table* has to be a top level form the way the path to the fz.jpg file is written. If you move it out of the setup code and onto the top level then compile and load (in Lispworks) it will work... at least for me.
It worked for me with LispWorks and AllegroCL but I get an error with CMUCL:
No matching method for the generic function #<STANDARD-GENERIC-FUNCTION ARANEIDA::HTTP-LISTENER-THREADS (1) {5964F471}>, when called with arguments (#<ARANEIDA:SERVE-EVENT-REVERSE-PROXY-LISTENER {593B3BC5}>). [Condition of type PCL::NO-APPLICABLE-METHOD-ERROR]
I think I might know what this is. I can't run CMUCL but I'll have a look.
Unfortunately there is a really *nasty* bug with the browser->tbnl connection -- it consumes about 250k of memory for every access. I cannot see the problem, and I'm looking for help :-)
How does one test the browser->tbnl part?
Hit port 3000 from your browser, for example http://localhost:3000/tbnl-araneida in my setup. You have to apply the patches to Araneida 0.9 of course, and *make* *sure* you recompile and use ASDF to load it.
I don't know how the tbnl-araneida package with the example should be distributed.
I've modified it and added it to the TBNL distribution. It'll now basically show the same pages the Apache/mod_lisp demo shows. Hope that's OK for you.
Fine by me. Thanks for doing this so quickly.
Cheers, Bob
Thanks again, Edi.
---- Bob Hutchison -- blogs at http://www.recursive.ca/hutch/ Recursive Design Inc. -- http://www.recursive.ca/