Commit f0e79947 authored by pfdietz's avatar pfdietz

Add comment to remind the reader that *print-readably* is bound to t in the random printer test.

parent ebea1834
......@@ -56,6 +56,7 @@
(unless (funcall test obj obj2)
(list
(list obj str obj2
;; Note: (*print-readably* t) always holds
(list '*print-array* *print-array*)
(list '*print-base* *print-base*)
(list '*print-radix* *print-radix*)
......
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