Update of /project/movitz/cvsroot/movitz/losp/x86-pc In directory common-lisp.net:/tmp/cvs-serv26317 Modified Files: debugger.lisp Log Message: sync Date: Thu Sep 1 00:34:58 2005 Author: ffjeld Index: movitz/losp/x86-pc/debugger.lisp diff -u movitz/losp/x86-pc/debugger.lisp:1.40 movitz/losp/x86-pc/debugger.lisp:1.41 --- movitz/losp/x86-pc/debugger.lisp:1.40 Thu May 5 22:52:45 2005 +++ movitz/losp/x86-pc/debugger.lisp Thu Sep 1 00:34:58 2005 @@ -10,7 +10,7 @@ ;;;; Author: Frode Vatvedt Fjeld <frodef@acm.org> ;;;; Created at: Fri Nov 22 10:09:18 2002 ;;;; -;;;; $Id: debugger.lisp,v 1.40 2005/05/05 20:52:45 ffjeld Exp $ +;;;; $Id: debugger.lisp,v 1.41 2005/08/31 22:34:58 ffjeld Exp $ ;;;; ;;;;------------------------------------------------------------------ @@ -636,6 +636,7 @@ (do () (nil) (multiple-value-bind (morep setf-name symbol) (hashis) + (declare (ignore setf-name)) (cond ((not morep) (return nil))