From 4bf640f3f0d60406dedbcb191526273a06fbf0ef Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Tue, 21 Jun 1988 05:50:40 +0000
Subject: [PATCH] Add new procedures:

	condition-type/internal?
	condition-type/reporter
	condition/report-string
	condition/reporter
	condition/write-report

Change name of condition-type "dependencies" to "generalizations".
---
 v7/src/runtime/runtime.pkg | 14 +++++++++-----
 v8/src/runtime/runtime.pkg | 14 +++++++++-----
 2 files changed, 18 insertions(+), 10 deletions(-)

diff --git a/v7/src/runtime/runtime.pkg b/v7/src/runtime/runtime.pkg
index daaca7451..c6f560b9b 100644
--- a/v7/src/runtime/runtime.pkg
+++ b/v7/src/runtime/runtime.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.3 1988/06/16 06:37:44 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.pkg,v 14.4 1988/06/21 05:50:40 cph Exp $
 
 Copyright (c) 1988 Massachusetts Institute of Technology
 
@@ -286,6 +286,7 @@ MIT in each case. |#
 	  continuation/first-subproblem
 	  microcode-return/code->type
 	  stack-frame->continuation
+	  stack-frame-type/address
 	  stack-frame-type/code
 	  stack-frame-type/properties
 	  stack-frame-type/subproblem?
@@ -420,19 +421,22 @@ MIT in each case. |#
   (export ()
 	  bind-condition-handler
 	  cmdl-message/error
-	  condition-type/dependencies
+	  condition-type/generalizations
 	  condition-type/error?
-	  condition-type/message
+	  condition-type/internal?
 	  condition-type/properties
+	  condition-type/reporter
 	  condition-type:error
 	  condition-type?
 	  condition/continuation
-	  condition/dependencies
+	  condition/generalizations
 	  condition/error?
 	  condition/irritants
-	  condition/message
 	  condition/properties
+	  condition/report-string
+	  condition/reporter
 	  condition/type
+	  condition/write-report
 	  condition?
 	  error-condition
 	  error-continuation
diff --git a/v8/src/runtime/runtime.pkg b/v8/src/runtime/runtime.pkg
index 02ca59d6d..af91b43e3 100644
--- a/v8/src/runtime/runtime.pkg
+++ b/v8/src/runtime/runtime.pkg
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.3 1988/06/16 06:37:44 cph Exp $
+$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v8/src/runtime/runtime.pkg,v 14.4 1988/06/21 05:50:40 cph Exp $
 
 Copyright (c) 1988 Massachusetts Institute of Technology
 
@@ -286,6 +286,7 @@ MIT in each case. |#
 	  continuation/first-subproblem
 	  microcode-return/code->type
 	  stack-frame->continuation
+	  stack-frame-type/address
 	  stack-frame-type/code
 	  stack-frame-type/properties
 	  stack-frame-type/subproblem?
@@ -420,19 +421,22 @@ MIT in each case. |#
   (export ()
 	  bind-condition-handler
 	  cmdl-message/error
-	  condition-type/dependencies
+	  condition-type/generalizations
 	  condition-type/error?
-	  condition-type/message
+	  condition-type/internal?
 	  condition-type/properties
+	  condition-type/reporter
 	  condition-type:error
 	  condition-type?
 	  condition/continuation
-	  condition/dependencies
+	  condition/generalizations
 	  condition/error?
 	  condition/irritants
-	  condition/message
 	  condition/properties
+	  condition/report-string
+	  condition/reporter
 	  condition/type
+	  condition/write-report
 	  condition?
 	  error-condition
 	  error-continuation
-- 
2.25.1