From 7970c255c0671443ffe5176d7e4be1d5d12becab Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Daniel=20Kochma=C5=84ski?= <daniel@turtleware.eu>
Date: Thu, 17 Sep 2015 11:42:09 +0200
Subject: [PATCH] pathnames: fix array size
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Signed-off-by: Daniel Kochmański <daniel@turtleware.eu>
---
 pathnames/pathname.lsp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pathnames/pathname.lsp b/pathnames/pathname.lsp
index fa7ae8f0..8d97238a 100644
--- a/pathnames/pathname.lsp
+++ b/pathnames/pathname.lsp
@@ -81,7 +81,7 @@
                                         :initial-contents
                                         "XXpathname.txtX"
                                         :element-type etype)))
-                    (make-array 8
+                    (make-array 12
                                 :element-type etype
                                 :displaced-to s
                                 :displaced-index-offset 2)))))
-- 
GitLab