mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-15 05:43:19 -08:00
Code Issues Projects Releases Packages Wiki Activity

(INTEGER *) and other type names made of lists are now allowed as declaration names.

Browse source
This commit is contained in:
Juanjo Garcia-Ripoll 2013-10-29 22:25:42 +01:00
parent c14c0918a3
commit c8a4d98da6
1 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/cmp/cmpenv-declare.lsp
View file

@ -72,7 +72,10 @@ and a possible documentation string (only accepted when DOC-P is true)."
for decl in all-declarations
for decl-name = (first decl)
for decl-args = (rest decl)
do (cmpassert (and (valid-form-p decl-args) (symbolp decl-name))
do (cmpassert (and (valid-form-p decl-args)
(or (symbolp decl-name)
(and (consp decl-name)
(valid-type-specifier decl-name))))
"Syntax error in declaration ~s" decl)
do (case decl-name
(SPECIAL)