From 7aadf2bbca30301d2479a21edbcdcb6e12da5cd0 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Thu, 4 Jan 2007 18:23:18 +0000 Subject: [PATCH] r11448: counter is not used on all platforms --- parse-rrf.lisp | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) 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))) -- 2.34.1