[parenscript-devel] A COND clause with unspecified consequent produces a syntax error - parenscript-devel - mailman3.common-lisp.net

1 Jun 2010


      (ps (setf x (cond ((foo) 123)
                  ((bar))
                  (t 456))))
=> "x = foo() ? 123 : (bar() ? () : 456);"
Similarly,
(ps (defun blah ()
                (cond ((foo) 123)
                      ((bar))
                      (t 456))))
=>
"function blah() {
    if (foo()) {
        return 123;
    } else if (return bar()) {
    } else {
        return 456;
    };
};"
No doubt the (bar) form should produce NIL instead, as in CL.