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

cmp: c1body: do not error when unknown declaration is encountered

Browse source 
it is hinted in the spec, that compiler issues a warning on unknown
declarations:

http://www.lispworks.com/documentation/HyperSpec/Body/d_declar.htm#declaration

also in other parts of compiler code we warn as well.
This commit is contained in:
Daniel Kochmański 2019-05-22 11:49:17 +02:00
parent f7ffa893a6
commit fcdb1b0657
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -113,9 +113,9 @@ and a possible documentation string (only accepted when DOC-P is true)."
(if (machine-c-type-p decl-name)
(values t decl-name)
(valid-type-specifier decl-name))
(cmpassert ok "Unknown declaration specifier ~s"
decl-name)
(setf types (collect-declared type decl-args types))))))
(if (null ok)
(cmpwarn "Unknown declaration specifier ~s." decl-name)
(setf types (collect-declared type decl-args types))) ))))
finally (return (values body specials types ignored
(nreverse others) doc all-declarations)))))