<div dir="ltr">Hello,<div><br></div><div>The session value / recursive lock stuff all seems to work as of rev #3712.</div><div><br></div><div>thanks for the quick response, keep up the good work!</div><div><br></div><div>Nick<br>
<br><div class="gmail_quote">On Thu, Jul 31, 2008 at 6:03 PM, Hans Hübner <span dir="ltr"><<a href="mailto:hans@huebner.org">hans@huebner.org</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex;">
Hi Nick,<br>
<br>
thank you for your detailed report.  I think I have fixed the problem,<br>
can you svn up and let me know if it works better?  If not, I'll hack<br>
on it more so that things get back to a good state tonight.  Sorry for<br>
the glitch.<br>
<br>
Thanks,<br>
<font color="#888888">Hans<br>
</font><div><div></div><div class="Wj3C7c"><br>
On Thu, Jul 31, 2008 at 17:43, Nick Allen <<a href="mailto:rflug05@gmail.com">rflug05@gmail.com</a>> wrote:<br>
> Hello Hans,<br>
> The specific problem I ran into was a recursive lock error thrown when<br>
> setting a session value in the same request that starts a session. I'm using<br>
> rev 3591. here's an example:<br>
>  (defun test-dispatcher (hunchentoot:*request*)<br>
>    (lambda ()<br>
>    ;; set the session value FOO to the value of<br>
>    ;; the HTTP get parameter "set-foo", if it<br>
>    ;; exists<br>
>    (let ((set-foo (hunchentoot:get-parameter "set-foo")))<br>
>      (when set-foo<br>
>        (setf (hunchentoot:session-value 'foo) set-foo)))<br>
>    ;; then return a page that shows the session<br>
>    ;; value FOO<br>
>    (format nil "The foo is ~A" (hunchentoot:session-value 'foo))))<br>
><br>
> ;; start the server<br>
> (pushnew 'test-dispatcher hunchentoot:*dispatch-table*)<br>
> (defvar *test-server* (hunchentoot:start-server :port 2001))<br>
> ;; now go to:<br>
> ;;<br>
> ;;    <a href="http://localhost:2001?set-foo=bar" target="_blank">http://localhost:2001?set-foo=bar</a><br>
> ;;<br>
> ;; it should look like:<br>
> ;;<br>
> ;;    The Foo is bar<br>
> ;;<br>
> ;; but it throws a recursive lock error<br>
> On Thu, Jul 31, 2008 at 7:09 AM, Hans Hübner <<a href="mailto:hans@huebner.org">hans@huebner.org</a>> wrote:<br>
>><br>
>> Hi Nick,<br>
>><br>
>> thank you for reporting a problem - Can you provide me with details on<br>
>> how the removal of WITH-RECURSIVE-LOCK breaks Hunchentoot for<br>
>> Lispworks?  I have removed it because I believed that there is no code<br>
>> path that could be to recursive locking, but I could have been missing<br>
>> something.<br>
>><br>
>> In general, the Subversion repository is less stable than Edi's<br>
>> releases and we are planning to make a proper release, yet I can't<br>
>> make any promises.<br>
>><br>
>> Thanks,<br>
>> Hans<br>
>><br>
>> On Thu, Jul 31, 2008 at 03:58, Nick Allen <<a href="mailto:rflug05@gmail.com">rflug05@gmail.com</a>> wrote:<br>
>> > Hello!<br>
>> > Is the "ediware" location of the hunchentoot source the recommended<br>
>> > version<br>
>> > for deployment? or should we be using the tarball linked off the<br>
>> > documentation or the "hans" version?  I'm wondering because<br>
>> > WITH-RECURSIVE-LOCK-HELD seems to have disappeared out of<br>
>> > "lispworks.lisp",<br>
>> > which seems to have introducing some bugs, which seems to me to suggests<br>
>> > to<br>
>> > me that the "ediware" repo is either out of date or too bleeding edge...<br>
>> > take care<br>
>> > Nick<br>
>> > _______________________________________________<br>
>> > tbnl-devel site list<br>
>> > <a href="mailto:tbnl-devel@common-lisp.net">tbnl-devel@common-lisp.net</a><br>
>> > <a href="http://common-lisp.net/mailman/listinfo/tbnl-devel" target="_blank">http://common-lisp.net/mailman/listinfo/tbnl-devel</a><br>
>> ><br>
>> _______________________________________________<br>
>> tbnl-devel site list<br>
>> <a href="mailto:tbnl-devel@common-lisp.net">tbnl-devel@common-lisp.net</a><br>
>> <a href="http://common-lisp.net/mailman/listinfo/tbnl-devel" target="_blank">http://common-lisp.net/mailman/listinfo/tbnl-devel</a><br>
><br>
><br>
> _______________________________________________<br>
> tbnl-devel site list<br>
> <a href="mailto:tbnl-devel@common-lisp.net">tbnl-devel@common-lisp.net</a><br>
> <a href="http://common-lisp.net/mailman/listinfo/tbnl-devel" target="_blank">http://common-lisp.net/mailman/listinfo/tbnl-devel</a><br>
><br>
_______________________________________________<br>
tbnl-devel site list<br>
<a href="mailto:tbnl-devel@common-lisp.net">tbnl-devel@common-lisp.net</a><br>
<a href="http://common-lisp.net/mailman/listinfo/tbnl-devel" target="_blank">http://common-lisp.net/mailman/listinfo/tbnl-devel</a><br>
</div></div></blockquote></div><br></div></div>