From e9bd143f71b6a0d98f766d96e5c3027692ec9a8d Mon Sep 17 00:00:00 2001
From: Gerd Heber <gheber@hdfgroup.org>
Date: Thu, 2 Jul 2015 13:01:22 -0500
Subject: [PATCH] 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.

---
 src/chain-complexes.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/chain-complexes.lisp b/src/chain-complexes.lisp
index c61421e..da70a8a 100644
--- a/src/chain-complexes.lisp
+++ b/src/chain-complexes.lisp
@@ -219,7 +219,7 @@
 					       :adjustable t
 					       :fill-pointer 0))
                                (make-list +maximal-dimension+)))
-		   (:cmbn nil)))
+		   (:cmbn (make-array 0))))
 	   (push mrph *mrph-list*)
 	   mrph))))