From e51bc95e24489e6490400d6651186da2ffc6e865 Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@users.sourceforge.net>
Date: Sat, 10 Nov 2012 23:32:43 +0100
Subject: [PATCH] Remove debug statements from compiled and optimized
 setf-forms.

---
 src/cmp/cmptop.lsp | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/cmp/cmptop.lsp b/src/cmp/cmptop.lsp
index 6bb4ea0db..a9d845b7e 100644
--- a/src/cmp/cmptop.lsp
+++ b/src/cmp/cmptop.lsp
@@ -235,9 +235,6 @@
 cl_object f1 = ecl_fdefinition(setf_form);
 cl_object f2 = ECL_CONS_CAR(setf_vv);
 if (f1 != f2) {
-cl_print(1,f1);
-cl_print(1,f2);
-cl_print(1,setf_form);
 FEundefined_function(setf_form);
 }
 return f2;