From e09278649d9477f448bcc9443d7efc88ccc95a19 Mon Sep 17 00:00:00 2001
From: Chris Hanson <org/chris-hanson/cph>
Date: Thu, 12 Feb 1998 04:28:25 +0000
Subject: [PATCH] Change to use ADD-IDENTIFICATION! rather than ADD-SYSTEM!.

---
 v7/src/cref/make.scm  | 6 +++---
 v7/src/edwin/make.scm | 6 +++---
 v7/src/sf/make.scm    | 6 +++---
 3 files changed, 9 insertions(+), 9 deletions(-)

diff --git a/v7/src/cref/make.scm b/v7/src/cref/make.scm
index 9e66ed5be..d37b83d7f 100644
--- a/v7/src/cref/make.scm
+++ b/v7/src/cref/make.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: make.scm,v 1.15 1996/04/23 21:17:01 cph Exp $
+$Id: make.scm,v 1.16 1998/02/12 04:27:50 cph Exp $
 
-Copyright (c) 1988-96 Massachusetts Institute of Technology
+Copyright (c) 1988-98 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -46,4 +46,4 @@ MIT in each case. |#
      (lambda ()
        (load-option 'RB-TREE)
        (package/system-loader "cref" '() false)))))
-(add-system! (make-system "CREF" 1 15 '()))
\ No newline at end of file
+(add-identification! "CREF" 1 16)
\ No newline at end of file
diff --git a/v7/src/edwin/make.scm b/v7/src/edwin/make.scm
index 1190db7cf..a280973d9 100644
--- a/v7/src/edwin/make.scm
+++ b/v7/src/edwin/make.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: make.scm,v 3.92 1997/10/22 05:11:11 cph Exp $
+$Id: make.scm,v 3.93 1998/02/12 04:28:25 cph Exp $
 
-Copyright (c) 1989-96 Massachusetts Institute of Technology
+Copyright (c) 1989-98 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -58,4 +58,4 @@ MIT in each case. |#
 				     ((UNIX) "edwinunx")
 				     (else "edwinunk"))))))
 	'QUERY)))))
-(add-system! (make-system "Edwin" 3 92 '()))
\ No newline at end of file
+(add-identification! "Edwin" 3 93)
\ No newline at end of file
diff --git a/v7/src/sf/make.scm b/v7/src/sf/make.scm
index 2a0bf98be..749b2c184 100644
--- a/v7/src/sf/make.scm
+++ b/v7/src/sf/make.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: make.scm,v 4.31 1995/01/06 18:36:17 cph Exp $
+$Id: make.scm,v 4.32 1998/02/12 04:27:00 cph Exp $
 
-Copyright (c) 1988-95 Massachusetts Institute of Technology
+Copyright (c) 1988-98 Massachusetts Institute of Technology
 
 This material was developed by the Scheme project at the Massachusetts
 Institute of Technology, Department of Electrical Engineering and
@@ -47,4 +47,4 @@ MIT in each case. |#
        (package/system-loader "sf" '() 'QUERY)))
     ((package/reference (find-package '(SCODE-OPTIMIZER))
 			'USUAL-INTEGRATIONS/CACHE!))))
-(add-system! (make-system "SF" 4 31 '()))
\ No newline at end of file
+(add-identification! "SF" 4 32)
\ No newline at end of file
-- 
2.25.1