From c025e8081d16d46182b0669adb46fe553b78a6a7 Mon Sep 17 00:00:00 2001
From: Nathan Froyd <froydnj@gmail.com>
Subject: [PATCH 14/39] silence warning in PRINT-LETTER

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

diff --git a/src/lisp/structs.lisp b/src/lisp/structs.lisp
index ed54ca4..7bd1805 100755
--- a/src/lisp/structs.lisp
+++ b/src/lisp/structs.lisp
@@ -44,6 +44,7 @@
 ;; struct functions
 
 (defun print-letter (l stream level)
+  (declare (ignore level))
   (format 
    stream
    "#S(LETTER :value ~A :used ~A :neighbors '~A)"
-- 
1.6.2