From a57cb9e32a71e23a1fff58a4fbc44fc7f220c932 Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Thu, 9 Jul 2009 10:35:27 +0200 Subject: [PATCH] Deactivate a debug statement in type-and --- src/cmp/cmptype.lsp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/cmp/cmptype.lsp b/src/cmp/cmptype.lsp index 68345b358..c9e65be24 100644 --- a/src/cmp/cmptype.lsp +++ b/src/cmp/cmptype.lsp @@ -152,12 +152,12 @@ t1) ((null tag1) (setf c::*compiler-break-enable* t) - (error "foo") + ;(error "foo") (cmpwarn "Unknown type ~S. Assuming it is T." t1) t2) (t (setf c::*compiler-break-enable* t) - (error "foo") + ;(error "foo") (cmpwarn "Unknown type ~S. Assuming it is T." t2) t1))))