From 11fa2359dd9dc3fbb84a9b80b255617e4792bd0e Mon Sep 17 00:00:00 2001 From: Juho Snellman Date: Sun, 4 Mar 2007 23:52:39 +0000 Subject: [PATCH] 1.0.3.29: kill a bogus "variable defined but not used" warning in FORMATTER --- src/code/late-format.lisp | 2 ++ version.lisp-expr | 2 +- 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/src/code/late-format.lisp b/src/code/late-format.lisp index 6369024..7ed479b 100644 --- a/src/code/late-format.lisp +++ b/src/code/late-format.lisp @@ -237,11 +237,13 @@ :offset ,(cdr arg))) args)) (return `(lambda (stream &optional ,@args &rest args) + (declare (ignorable stream)) ,guts args)))) (let ((*orig-args-available* t) (*only-simple-args* nil)) `(lambda (stream &rest orig-args) + (declare (ignorable stream)) (let ((args orig-args)) ,(expand-control-string control-string) args))))) diff --git a/version.lisp-expr b/version.lisp-expr index 4baac58..8c34311 100644 --- a/version.lisp-expr +++ b/version.lisp-expr @@ -17,4 +17,4 @@ ;;; checkins which aren't released. (And occasionally for internal ;;; versions, especially for internal versions off the main CVS ;;; branch, it gets hairier, e.g. "0.pre7.14.flaky4.13".) -"1.0.3.28" +"1.0.3.29" -- 1.7.10.4