Commit ad53c44a authored by pfdietz's avatar pfdietz

Removed pprint-dispatch.10, which is killed by CLHS 1.4.1.5

parent 87240c0a
...@@ -207,6 +207,7 @@ ...@@ -207,6 +207,7 @@
(write-to-string '|X|)))) (write-to-string '|X|))))
"X" (nil) "ABC" (nil) "DEF") "X" (nil) "ABC" (nil) "DEF")
#|
(deftest pprint-dispatch.10 (deftest pprint-dispatch.10
(my-with-standard-io-syntax (my-with-standard-io-syntax
(let ((*print-pprint-dispatch* (copy-pprint-dispatch nil)) (let ((*print-pprint-dispatch* (copy-pprint-dispatch nil))
...@@ -229,6 +230,7 @@ ...@@ -229,6 +230,7 @@
(setf (symbol-function sym) g) (setf (symbol-function sym) g)
(write-to-string '|X|)))))) (write-to-string '|X|))))))
"X" nil "ABC" "DEF") "X" nil "ABC" "DEF")
|#
;;; Error tests ;;; Error tests
......
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