git » jacl.git » commit 3305575

diff --git a/jacl-tests.lisp b/jacl-tests.lisp
index f9831b9..df3b329 100644
--- a/jacl-tests.lisp
+++ b/jacl-tests.lisp
@@ -30,7 +30,9 @@
   (assert= (await (read1 "1. "))    1.   "number with trailing dot"))
 
 (deftest "Symbols"
-  (let ((sym (await (read1 @"somesym "))))
-    (assert= (\. sym |name|) @"SOMESYM" "simple symbol name")))
+  (let ((sym nil))
+    (setq sym (await (read1 @"somesym ")))
+    (assert= (\. sym |name|) @"SOMESYM" "simple symbol name")
+    (assert= (\. sym |packageName|) @"COMMON-LISP-USER" "simple symbol package")))
 
 (\. @|QUnit| (|start|))