[armedbear-devel] Compilation bug in LET/LET* init-form

There seems to be a bug around the compilation of illegal LET/LET* init forms with an extra set of parentheses.

The form

(defun f () (let ((x ((1))))) 42)

when placed in a file, and compiled gives a error on loading the file that it can't find the '.cls' associated with this function. Looking at the FASL shows that the '.cls' is zero length.

The compiler should signal an error when compiling the form rather than writing the malformed FASL. Presumably this is a failure to recognize that the compilation of the the LET init form has failed somewhere in the compiler.