From: Kevin M. Rosenberg <kevin@rosenberg.net>
Date: Thu, 4 Jan 2007 18:23:18 +0000 (+0000)
Subject: r11448: counter is not used on all platforms
X-Git-Tag: v2006ac.2~31
X-Git-Url: http://git.kpe.io/?p=umlisp.git;a=commitdiff_plain;h=7aadf2bbca30301d2479a21edbcdcb6e12da5cd0

r11448: counter is not used on all platforms
---

diff --git a/parse-rrf.lisp b/parse-rrf.lisp
index 4076dc7..90ddc78 100644
--- a/parse-rrf.lisp
+++ b/parse-rrf.lisp
@@ -52,7 +52,8 @@
       (return-from ensure-preparse 'already-done))
     (make-preparse-hash-table)
     (let ((counter 0))
-      (declare (fixnum counter))
+      (declare (fixnum counter)
+               (ignorable counter))
       (with-umls-file (line "MRCONSO.RRF")
         (let ((cui (parse-ui (nth 0 line)))
               (lui (parse-ui (nth 3 line)))