mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-04-19 00:20:19 -07:00
Code Issues Projects Releases Packages Wiki Activity

Fixed typo in proclaim (J. James).

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2011-01-24 22:21:47 +01:00
parent daf5ecc82c
commit 87d159a45d
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/cmp/cmpenv-proclaim.lsp
View file

@ -76,7 +76,7 @@
;; FIXME! IGNORED!
(dolist (var (cdr decl))
(unless (si::valid-function-name-p var)
(error "Not a valid function name ~s in ~s proclamation" fun decl-name))))
(error "Not a valid function name ~s in ~s proclamation" var decl-name))))
(DECLARATION
(validate-alien-declaration (rest decl) #'error)
(setf si::*alien-declarations*