Add pc-sample profiler slots to the fixed-objects vector.

diff --git a/v7/src/microcode/utabmd.scm b/v7/src/microcode/utabmd.scm
index 3b7fd5070465ee7f47513d4f62a833bef2f36621..80f5c5b9a48aab2292d220089209f435b2aadd42 100644 (file)
--- 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
               ))
 \f
 ;;; [] 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 3b7fd5070465ee7f47513d4f62a833bef2f36621..80f5c5b9a48aab2292d220089209f435b2aadd42 100644 (file)
--- 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
               ))
 \f
 ;;; [] 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