From 4482288c5742b4ab470501564c325c6f79eb7dc4 Mon Sep 17 00:00:00 2001 From: Joe Marshall Date: Mon, 9 Aug 2010 12:55:47 -0700 Subject: [PATCH] Declare IGNORABLE NB to silence warning. --- src/runtime/cpress.scm | 1 + 1 file changed, 1 insertion(+) diff --git a/src/runtime/cpress.scm b/src/runtime/cpress.scm index ce5d98c22..a7a97bcbd 100644 --- a/src/runtime/cpress.scm +++ b/src/runtime/cpress.scm @@ -553,6 +553,7 @@ USA. ;; If necessary, invalidate old commands until this is true. If the ;; buffer size is optimal, this is never necessary, because the ;; buffer is big enough to hold all of the commands in the window. + (declare (ignorable nb)) (if (and (not buffer-size-optimal?) oldest-node) (let ((end (bb-end byte-buffer))) -- 2.25.1