mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-02 23:50:56 -08:00
Code Issues Projects Releases Packages Wiki Activity

(THE (VALUES ...) ...) now works

Browse source
This commit is contained in:
jgarcia 2006-05-16 16:51:17 +00:00
parent ee50a03ea4
commit e3cd7d5899
2 changed files with 4 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/CHANGELOG
View file

@ -201,6 +201,9 @@ ECL 0.9i
(faa))))
A form (FOO 3) produced 4 before the bug was fixed.
- The compiler now admits THE forms with type (VALUES ...), though they are
ignored.
* Documentation:
- The HTML manuals now use CSS for a more appealing look.

2
src/cmp/cmpspecial.lsp
View file

@ -23,7 +23,7 @@
(defun c1the (args)
(check-args-number 'THE args 2 2)
(let* ((form (c1expr (second args)))
(the-type (type-filter (first args)))
(the-type (type-filter (first args) t))
type)
(cond ((and (consp the-type) (eq (first the-type) 'VALUES))
(cmpwarn "Ignoring THE form with type ~A" the-type))