In SBCL, PS generates "funcall(bar)" below instead of "bar()". In CCL, it's fine.
Daniel
(ps (defun foo () (flet ((blah () (return-from foo (bar)))))))
=>
function foo() { try { var blah = function () { throw { 'ps-block-tag' : 'foo', 'ps-return-value' : funcall(bar) }; }; return null; } catch (err) { if (err && 'foo' === err['ps-block-tag']) { return err['ps-return-value']; } else { throw err; }; }; };
I can't reproduce this bug. Can you try this in a fresh image? You might have bar defined as a macro that does that.
Vladimir
On Thu, Dec 22, 2011 at 2:41 PM, Daniel Gackle danielgackle@gmail.com wrote:
In SBCL, PS generates "funcall(bar)" below instead of "bar()". In CCL, it's fine.
Daniel
(ps (defun foo () (flet ((blah () (return-from foo (bar)))))))
=>
function foo() { try { var blah = function () { throw { 'ps-block-tag' : 'foo', 'ps-return-value' : funcall(bar) }; }; return null; } catch (err) { if (err && 'foo' === err['ps-block-tag']) { return err['ps-return-value']; } else { throw err; }; }; };
parenscript-devel mailing list parenscript-devel@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
This appears to be fixed in the latest PS version.
Scott
On Sat, Dec 24, 2011 at 8:47 AM, Vladimir Sedach vsedach@gmail.com wrote:
I can't reproduce this bug. Can you try this in a fresh image? You might have bar defined as a macro that does that.
Vladimir
On Thu, Dec 22, 2011 at 2:41 PM, Daniel Gackle danielgackle@gmail.com wrote:
In SBCL, PS generates "funcall(bar)" below instead of "bar()". In CCL,
it's
fine.
Daniel
(ps (defun foo () (flet ((blah () (return-from foo (bar)))))))
=>
function foo() { try { var blah = function () { throw { 'ps-block-tag' : 'foo', 'ps-return-value' :
funcall(bar) }; }; return null; } catch (err) { if (err && 'foo' === err['ps-block-tag']) { return err['ps-return-value']; } else { throw err; }; }; };
parenscript-devel mailing list parenscript-devel@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
parenscript-devel mailing list parenscript-devel@common-lisp.net http://lists.common-lisp.net/cgi-bin/mailman/listinfo/parenscript-devel
parenscript-devel@common-lisp.net