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

---
 v7/src/compiler/base/make.scm | 9 +++------
 1 file changed, 3 insertions(+), 6 deletions(-)

diff --git a/v7/src/compiler/base/make.scm b/v7/src/compiler/base/make.scm
index 56a51a381..16b9cac9f 100644
--- a/v7/src/compiler/base/make.scm
+++ b/v7/src/compiler/base/make.scm
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: make.scm,v 4.107 1997/03/30 23:33:24 cph Exp $
+$Id: make.scm,v 4.108 1998/02/12 02:54:27 cph Exp $
 
-Copyright (c) 1988-97 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
@@ -52,7 +52,4 @@ MIT in each case. |#
 				'INITIALIZE-PACKAGE!)))))
     (initialize-package! '(COMPILER MACROS))
     (initialize-package! '(COMPILER DECLARATIONS)))
-  (add-system!
-   (make-system (string-append "Liar (" architecture-name ")")
-		4 107
-		'())))
\ No newline at end of file
+  (add-identification! (string-append "Liar (" architecture-name ")") 4 108))
\ No newline at end of file
-- 
2.25.1