From 39c246129881b43be8214737f9cf779e16ebbc9e Mon Sep 17 00:00:00 2001
From: Raymond Toy <toy.raymond@gmail.com>
Date: Sat, 13 Jun 2015 23:22:58 -0700
Subject: [PATCH] Increase *ERROR-PRINT-LINES* to a 10.

Five is a bit small, especially when printing out the message from
issue #5.
---
 src/compiler/ir1util.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/compiler/ir1util.lisp b/src/compiler/ir1util.lisp
index 199536072..13533e9da 100644
--- a/src/compiler/ir1util.lisp
+++ b/src/compiler/ir1util.lisp
@@ -1665,7 +1665,7 @@
   "The value for *Print-Level* when printing compiler error messages.")
 (defvar *error-print-length* 5
   "The value for *Print-Length* when printing compiler error messages.")
-(defvar *error-print-lines* 5
+(defvar *error-print-lines* 10
   "The value for *Print-Lines* when printing compiler error messages.")
 
 (defvar *enclosing-source-cutoff* 1
-- 
GitLab