From ee331c35835d50145e2611a095f7efebb6727144 Mon Sep 17 00:00:00 2001
From: jjgarcia <jjgarcia>
Date: Mon, 13 May 2002 07:13:48 +0000
Subject: [PATCH] Fix typo.

---
 src/ansi-tests/section3.lisp | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/src/ansi-tests/section3.lisp b/src/ansi-tests/section3.lisp
index 8d0245586..d3519aa88 100644
--- a/src/ansi-tests/section3.lisp
+++ b/src/ansi-tests/section3.lisp
@@ -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))