The RSLTS slot of a morphism instancet be of type SIMPLE-VECTOR.
It was initialized with NIL under strategy :cmbn. This also fixes issue #21.
This commit is contained in:
parent
c1b81d4321
commit
e9bd143f71
@ -219,7 +219,7 @@
|
|||||||
:adjustable t
|
:adjustable t
|
||||||
:fill-pointer 0))
|
:fill-pointer 0))
|
||||||
(make-list +maximal-dimension+)))
|
(make-list +maximal-dimension+)))
|
||||||
(:cmbn nil)))
|
(:cmbn (make-array 0))))
|
||||||
(push mrph *mrph-list*)
|
(push mrph *mrph-list*)
|
||||||
mrph))))
|
mrph))))
|
||||||
|
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user