Disabled a misbehaving test and added a missing DEFGENERIC
This commit is contained in:
parent
6fc2688b58
commit
dc99be9e18
@ -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")))
|
||||
|
||||
@ -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))
|
||||
|
||||
Loading…
Reference in New Issue
Block a user