From e020a278f4f400424c9f242155dd89be419d0853 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Mon, 18 Feb 1991 13:03:58 +0000
Subject: [PATCH] Fixed the fix to call %proclaim rather than doing nothing.

---
 compiler/ir1tran.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/ir1tran.lisp b/compiler/ir1tran.lisp
index 7815a361e..e397097a3 100644
--- a/compiler/ir1tran.lisp
+++ b/compiler/ir1tran.lisp
@@ -2490,7 +2490,7 @@
 	  (if ignore
 	      (ir1-convert start cont nil)
 	      (ir1-convert start cont `(%proclaim ,what)))))
-      (ir1-convert start cont nil)))
+      (ir1-convert start cont `(%proclaim ,what))))
 
 
 ;;; %Compiler-Defstruct IR1 Convert  --  Internal
-- 
GitLab