From 2fdec49c6906e5cf640ee1b587421da5e6f615b1 Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@users.sourceforge.net>
Date: Sun, 6 Feb 2011 20:00:57 +0100
Subject: [PATCH] Remove slightly annoying compiler note about optimized away
 constant values.

---
 src/cmp/cmpwt.lsp | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/cmp/cmpwt.lsp b/src/cmp/cmpwt.lsp
index e316dbdd4..2a5e66ceb 100644
--- a/src/cmp/cmpwt.lsp
+++ b/src/cmp/cmpwt.lsp
@@ -53,8 +53,7 @@
                             ((vv-used-p vv-record)
                              object)
                             (t
-                             (cmpnote "Constant value optimized away or not used~%~A"
-                                      object)
+                             ;; Value optimized away or not used
                              0))))
   #+(or)
   (loop for i in (nconc (map 'list #'first *permanent-objects*)