Changeset 11785

Timestamp:

04/26/09 06:58:46 (14 years ago)

Author:

ehuelsmann

Message:

Add ignore declaration on unused argument.

File:

• trunk/abcl/src/org/armedbear/lisp/restart.lisp (modified) (1 diff)

trunk/abcl/src/org/armedbear/lisp/restart.lisp

@@ -48 +48 @@
   report-function
   interactive-function
-  (test-function #'(lambda (c) t)))
+  (test-function #'(lambda (c) (declare (ignore c)) t)))
 
 (defmacro restart-bind (bindings &body forms)