projects / mit-scheme.git / commitdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | patch | inline | side by side (parent: 352b509)
Add slot in fixed objects vector for interrupt masks.
authorChris Hanson <org/chris-hanson/cph>
Tue, 29 Jun 1993 21:37:05 +0000 (21:37 +0000)
committerChris Hanson <org/chris-hanson/cph>
Tue, 29 Jun 1993 21:37:05 +0000 (21:37 +0000)
v7/src/microcode/utabmd.scm patch | blob | history
v8/src/microcode/utabmd.scm patch | blob | history

diff --git a/v7/src/microcode/utabmd.scm b/v7/src/microcode/utabmd.scm
index a9e389db325e7d7be9b3f056f38da15f30f74c48..cab92716393fb8067d2e88e99432c11b8821f0ee 100644 (file)
--- a/v7/src/microcode/utabmd.scm
+++ b/v7/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: utabmd.scm,v 9.66 1993/02/23 02:38:17 gjr Exp $
+;;; $Id: utabmd.scm,v 9.67 1993/06/29 21:37:05 cph Exp $
 ;;;
 ;;;    Copyright (c) 1987-1993 Massachusetts Institute of Technology
 ;;;
@@ -63,7 +63,7 @@
               OBARRAY                                  ;03
               MICROCODE-TYPES-VECTOR                   ;04
               MICROCODE-RETURNS-VECTOR                 ;05
-              #F                                       ;06
+              INTERRUPT-MASK-VECTOR                    ;06
               MICROCODE-ERRORS-VECTOR                  ;07
               MICROCODE-IDENTIFICATION-VECTOR          ;08
               SYSTEM-CALL-NAMES                        ;09
@@ -702,4 +702,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Id: utabmd.scm,v 9.66 1993/02/23 02:38:17 gjr Exp $"
\ No newline at end of file
+"$Id: utabmd.scm,v 9.67 1993/06/29 21:37:05 cph Exp $"
\ No newline at end of file
diff --git a/v8/src/microcode/utabmd.scm b/v8/src/microcode/utabmd.scm
index a9e389db325e7d7be9b3f056f38da15f30f74c48..cab92716393fb8067d2e88e99432c11b8821f0ee 100644 (file)
--- a/v8/src/microcode/utabmd.scm
+++ b/v8/src/microcode/utabmd.scm
@@ -1,6 +1,6 @@
 ;;; -*-Scheme-*-
 ;;;
-;;; $Id: utabmd.scm,v 9.66 1993/02/23 02:38:17 gjr Exp $
+;;; $Id: utabmd.scm,v 9.67 1993/06/29 21:37:05 cph Exp $
 ;;;
 ;;;    Copyright (c) 1987-1993 Massachusetts Institute of Technology
 ;;;
@@ -63,7 +63,7 @@
               OBARRAY                                  ;03
               MICROCODE-TYPES-VECTOR                   ;04
               MICROCODE-RETURNS-VECTOR                 ;05
-              #F                                       ;06
+              INTERRUPT-MASK-VECTOR                    ;06
               MICROCODE-ERRORS-VECTOR                  ;07
               MICROCODE-IDENTIFICATION-VECTOR          ;08
               SYSTEM-CALL-NAMES                        ;09
@@ -702,4 +702,4 @@
 
 ;;; This identification string is saved by the system.
 
-"$Id: utabmd.scm,v 9.66 1993/02/23 02:38:17 gjr Exp $"
\ No newline at end of file
+"$Id: utabmd.scm,v 9.67 1993/06/29 21:37:05 cph Exp $"
\ No newline at end of file
MIT/GNU Scheme, Pucked