From 78b10d89ad1e9e16672500ea09b2d31f1653af72 Mon Sep 17 00:00:00 2001
From: Juan Jose Garcia Ripoll <jjgarcia@users.sourceforge.net>
Date: Sun, 15 Jan 2012 11:18:04 +0100
Subject: [PATCH] *compiler-break-enable* was sset to T by
 FIX-READ-ONLY-VARIABLE-TYPE.

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

diff --git a/src/cmp/cmplet.lsp b/src/cmp/cmplet.lsp
index 8c3aecd27..dc706d9b4 100644
--- a/src/cmp/cmplet.lsp
+++ b/src/cmp/cmplet.lsp
@@ -139,9 +139,6 @@
   (and-form-type (var-type var) form (var-name var) :unsafe "In LET body")
   (let ((form-type (c1form-primary-type form)))
     (setf (var-type var) form-type)
-    (unless (var-type var)
-      (setf c::*compiler-break-enable* t)
-      (break))
     (update-variable-type var form-type)))
 
 (defun c1let-unused-variable-p (var form)