[armedbear-ticket] [armedbear] #290: Compiling (defvar *foo* '(quote . x)) throws an error

#290: Compiling (defvar *foo* '(quote . x)) throws an error -----------------------+---------------------------------------------------- Reporter: sboukarev | Owner: ehuelsmann Type: defect | Status: new Priority: major | Milestone: Component: compiler | Version: Keywords: | -----------------------+---------------------------------------------------- The value X is not of type LIST. The attached patch fixes it by using proper-list-of-length-p instead of length. -- Ticket URL: <http://trac.common-lisp.net/armedbear/ticket/290> armedbear <http://common-lisp.net/project/armedbear> armedbear