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

Fix typo.

Browse source
This commit is contained in:
jjgarcia 2002-05-13 07:13:48 +00:00
parent 50564327b0
commit ee331c3583
1 changed files with 5 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/ansi-tests/section3.lisp
View file

@ -5,6 +5,11 @@
(if (boundp 'x2q) (makunbound 'x2q) 'ok)
(if (boundp 'a) (makunbound 'a) 'ok)
(defvar a)
(if (boundp 'b) (makunbound 'b) 'ok)
(defvar b)
(my-assert
(let ((x2q 1)) ;Binds a special variable X
(declare (special x2q))