[parenscript-devel] Bug: JS contains inappropriate "funcall" in SBCL
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
participants (3)
-
Daniel Gackle -
Scott Bell -
Vladimir Sedach