From 4b73d53eca8b57b0043c87eb6515c40fb1261357 Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Mon, 26 Nov 1990 15:19:18 +0000
Subject: [PATCH] Took out temporary compatablilty code from internal error
 stuff.

---
 compiler/mips/macros.lisp | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/compiler/mips/macros.lisp b/compiler/mips/macros.lisp
index e40541277..2c324e6a2 100644
--- a/compiler/mips/macros.lisp
+++ b/compiler/mips/macros.lisp
@@ -7,7 +7,7 @@
 ;;; Scott Fahlman (FAHLMAN@CMUC). 
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/macros.lisp,v 1.41 1990/11/07 13:16:23 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/compiler/mips/macros.lisp,v 1.42 1990/11/26 15:19:18 wlott Exp $
 ;;;
 ;;;    This file contains various useful macros for generating MIPS code.
 ;;;
@@ -454,8 +454,6 @@
 	  (when vop
 	    (note-this-location vop :internal-error)))
 	(inst break ,kind)
-	;; ### Temporary compatibility marker.
-	(inst byte 255) 
 	(with-adjustable-vector (,vector)
 	  (write-var-integer (error-number-or-lose ',code) ,vector)
 	  ,@(mapcar #'(lambda (tn)
-- 
GitLab