[parenscript-devel] A COND clause with unspecified consequent produces a syntax error

31 May 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.

[parenscript-devel] A COND clause with unspecified consequent produces a syntax error

Daniel Gackle