Commit 521c3dbc authored by pfdietz's avatar pfdietz
Browse files

Fixed bug in print-array.2

parent edf2d25e
......@@ -16,9 +16,9 @@
"#0A0")
(deftest print.array.2
(let ((a (make-array nil :initial-element '|A|))
(*package* (find-package "CL-TEST")))
(with-standard-io-syntax
(with-standard-io-syntax
(let ((a (make-array nil :initial-element '|A|))
(*package* (find-package "CL-TEST")))
(write-to-string a :readably nil :array t)))
"#0AA")
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment