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