Disabled a misbehaving test and added a missing DEFGENERIC

This commit is contained in:
gheber 2015-07-11 18:12:32 -05:00
parent 6fc2688b58
commit dc99be9e18
2 changed files with 5 additions and 3 deletions

View File

@ -9,7 +9,6 @@
:pathname #P"test/"
:components ((:file "package")
(:file "common")
#|
(:file "combinations-test")
(:file "various-test")
(:file "chain-complexes-test")
@ -25,6 +24,5 @@
(:file "bar-test")
(:file "cartesian-products-test")
(:file "cones-test")
(:file "cl-space-efhm-test")
|#
;;(:file "cl-space-efhm-test")
(:file "tensor-products-test")))

View File

@ -6,6 +6,10 @@
(PROVIDE "delta")
(DEFGENERIC PRINT-KEYCONS (car cdr stream))
(DEFMETHOD PRINT-KEYCONS ((car (eql :delt)) cdr stream)
(format stream "~A" (hyphenize-list (dlop-int-ext cdr)))
(cons car cdr))