From c3a57b9548a5e69b3a4b4b311d6e4cdb3406c1aa Mon Sep 17 00:00:00 2001
From: Nathan Froyd <froydnj@gmail.com>
Subject: [PATCH 24/39] delete unneeded RESULTS variable in RUN-SOLVER-FROM-STDIN

---
 src/lisp/solver.lisp |    5 -----
 1 files changed, 0 insertions(+), 5 deletions(-)

diff --git a/src/lisp/solver.lisp b/src/lisp/solver.lisp
index 8f63727..94529e4 100755
--- a/src/lisp/solver.lisp
+++ b/src/lisp/solver.lisp
@@ -115,11 +115,6 @@
   (let* ((the-board
           (create-board
            (board-from-stream *standard-input*)))
-         (results (make-array 0
-                              :element-type '(simple-array string)
-                              :fill-pointer 0
-                              :adjustable t)))
-        
     ;; Print out the board config
     (print-board-config-text (board-config the-board))
     (format t "~%")
-- 
1.6.2