Commit c611882f authored by pfdietz's avatar pfdietz

Use EQUALP in comparisons in def-printer-test

parent df396163
......@@ -7,7 +7,7 @@
(defmacro def-print-test (name form result &rest bindings)
`(deftest ,name
(equalt
(equalpt
(with-standard-io-syntax
(let ,bindings
(with-output-to-string (*standard-output*) (prin1 ,form))))
......
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