From 7afc96c1583bbef6614e263d6965eea4af0d313b Mon Sep 17 00:00:00 2001
From: "Guillermo J. Rozas" <edu/mit/csail/zurich/gjr>
Date: Sat, 28 Aug 1993 21:17:23 +0000
Subject: [PATCH] Add pc-sample profiler slots to the fixed-objects vector.

---
 v7/src/microcode/utabmd.scm | 15 +++++++++++++--
 v8/src/microcode/utabmd.scm | 15 +++++++++++++--
 2 files changed, 26 insertions(+), 4 deletions(-)

diff --git a/v7/src/microcode/utabmd.scm b/v7/src/microcode/utabmd.scm
index 3b7fd5070..80f5c5b9a 100644
--- a/v7/src/microcode/utabmd.scm
+++ b/v7/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: utabmd.scm,v 9.69 1993/08/28 05:44:07 gjr Exp $
+;;; $Id: utabmd.scm,v 9.70 1993/08/28 21:17:23 gjr Exp $
 ;;;
 ;;;	Copyright (c) 1987-1993 Massachusetts Institute of Technology
 ;;;
@@ -109,6 +109,17 @@
 	       GENERIC-TRAMPOLINE-REMAINDER 		;31
 	       GENERIC-TRAMPOLINE-MODULO 		;32
 	       ARITY-DISPATCHER-TAG			;33
+	       PC-Sample/Builtin-Table			;34
+	       PC-Sample/Utility-Table			;35
+	       PC-Sample/Primitive-Table		;36
+	       PC-Sample/Code-Block-Table		;37
+	       PC-Sample/Purified-Code-Block-Block-Buffer  ;38
+	       PC-Sample/Purified-Code-Block-Offset-Buffer ;39
+	       PC-Sample/Heathen-Code-Block-Block-Buffer   ;3A
+	       PC-Sample/Heathen-Code-Block-Offset-Buffer  ;3B
+	       PC-Sample/Interp-Proc-Buffer		;3C
+	       PC-Sample/Prob-Comp-Table		;3D
+	       PC-Sample/UFO-Table			;3E
 	       ))
 
 ;;; [] Types
@@ -703,4 +714,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Id: utabmd.scm,v 9.69 1993/08/28 05:44:07 gjr Exp $"
\ No newline at end of file
+"$Id: utabmd.scm,v 9.70 1993/08/28 21:17:23 gjr Exp $"
\ No newline at end of file
diff --git a/v8/src/microcode/utabmd.scm b/v8/src/microcode/utabmd.scm
index 3b7fd5070..80f5c5b9a 100644
--- a/v8/src/microcode/utabmd.scm
+++ b/v8/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: utabmd.scm,v 9.69 1993/08/28 05:44:07 gjr Exp $
+;;; $Id: utabmd.scm,v 9.70 1993/08/28 21:17:23 gjr Exp $
 ;;;
 ;;;	Copyright (c) 1987-1993 Massachusetts Institute of Technology
 ;;;
@@ -109,6 +109,17 @@
 	       GENERIC-TRAMPOLINE-REMAINDER 		;31
 	       GENERIC-TRAMPOLINE-MODULO 		;32
 	       ARITY-DISPATCHER-TAG			;33
+	       PC-Sample/Builtin-Table			;34
+	       PC-Sample/Utility-Table			;35
+	       PC-Sample/Primitive-Table		;36
+	       PC-Sample/Code-Block-Table		;37
+	       PC-Sample/Purified-Code-Block-Block-Buffer  ;38
+	       PC-Sample/Purified-Code-Block-Offset-Buffer ;39
+	       PC-Sample/Heathen-Code-Block-Block-Buffer   ;3A
+	       PC-Sample/Heathen-Code-Block-Offset-Buffer  ;3B
+	       PC-Sample/Interp-Proc-Buffer		;3C
+	       PC-Sample/Prob-Comp-Table		;3D
+	       PC-Sample/UFO-Table			;3E
 	       ))
 
 ;;; [] Types
@@ -703,4 +714,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Id: utabmd.scm,v 9.69 1993/08/28 05:44:07 gjr Exp $"
\ No newline at end of file
+"$Id: utabmd.scm,v 9.70 1993/08/28 21:17:23 gjr Exp $"
\ No newline at end of file
-- 
2.25.1