From d3c2c25debcbeb1a7f3a5f60dd57a63d7cdc79a1 Mon Sep 17 00:00:00 2001
From: dtc <dtc>
Date: Mon, 22 Feb 1999 11:41:10 +0000
Subject: [PATCH] Remove an unnecessary cast.

---
 lisp/monitor.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/monitor.c b/lisp/monitor.c
index 3d569448c..479d1a47e 100644
--- a/lisp/monitor.c
+++ b/lisp/monitor.c
@@ -1,4 +1,4 @@
-/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/monitor.c,v 1.10 1999/02/20 15:54:44 pw Exp $ */
+/* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/monitor.c,v 1.11 1999/02/22 11:41:10 dtc Exp $ */
 
 #include <stdio.h>
 #include <sys/types.h>
@@ -413,7 +413,7 @@ static void catchers_cmd(char **ptr)
 		   catch->entry_pc);
 #endif
             brief_print((lispobj)catch->tag);
-            catch = (struct catch_block *) catch->previous_catch;
+            catch = catch->previous_catch;
         }
     }
 }
-- 
GitLab