#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.
#290: Compiling (defvar *foo* '(quote . x)) throws an error -----------------------+---------------------------------------------------- Reporter: sboukarev | Owner: vvoutilainen Type: defect | Status: accepted Priority: major | Milestone: Component: compiler | Version: Keywords: | -----------------------+---------------------------------------------------- Changes (by vvoutilainen):
* owner: ehuelsmann => vvoutilainen * status: new => accepted
#290: Compiling (defvar *foo* '(quote . x)) throws an error ------------------------+--------------------------------------------------- Reporter: sboukarev | Owner: vvoutilainen Type: defect | Status: closed Priority: major | Milestone: Component: compiler | Version: Resolution: fixed | Keywords: ------------------------+--------------------------------------------------- Changes (by vvoutilainen):
* status: accepted => closed * resolution: => fixed
Comment:
(In [14352]) Fix ticket 290, a compilation error of a quoted list
#290: Compiling (defvar *foo* '(quote . x)) throws an error ------------------------+--------------------------------------------------- Reporter: sboukarev | Owner: vvoutilainen Type: defect | Status: closed Priority: major | Milestone: Component: compiler | Version: Resolution: fixed | Keywords: ------------------------+---------------------------------------------------
Comment(by mevenson):
(In [14354]) Backport r14352 | vvoutilainen | 2013-01-13 21:05:50 +0100 (Sun, 13 Jan 2013) | 1 line.
Fix ticket 290, a compilation error of a quoted list.
#290: Compiling (defvar *foo* '(quote . x)) throws an error ------------------------+--------------------------------------------------- Reporter: sboukarev | Owner: vvoutilainen Type: defect | Status: closed Priority: major | Milestone: 1.1.1 Component: compiler | Version: Resolution: fixed | Keywords: ------------------------+--------------------------------------------------- Changes (by mevenson):
* milestone: => 1.1.1
armedbear-ticket@common-lisp.net