From fdd4b321d9ddd632056e3b19816c3249b4d5c6fe Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sun, 7 Jun 1998 08:27:38 +0000 Subject: [PATCH] Add usual-integrations declaration to constructor/loader definitions to eliminate compiler warning. --- v7/src/cref/toplev.scm | 8 ++++++-- 1 file changed, 6 insertions(+), 2 deletions(-) diff --git a/v7/src/cref/toplev.scm b/v7/src/cref/toplev.scm index 52ebcce95..5e8e50b80 100644 --- a/v7/src/cref/toplev.scm +++ b/v7/src/cref/toplev.scm @@ -1,8 +1,8 @@ #| -*-Scheme-*- -$Id: toplev.scm,v 1.10 1996/04/23 21:16:46 cph Exp $ +$Id: toplev.scm,v 1.11 1998/06/07 08:27:38 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 @@ -84,6 +84,8 @@ MIT in each case. |# (write-string ";;; -*-Scheme-*-") (newline) (write-string ";;; program to make package structure") + (newline) + (write '(DECLARE (USUAL-INTEGRATIONS))) (for-each (lambda (expression) (pp expression (current-output-port) true)) constructor))))))) @@ -99,6 +101,8 @@ MIT in each case. |# (write-string ";;; -*-Scheme-*-") (newline) (write-string ";;; program to load package contents") + (newline) + (write '(DECLARE (USUAL-INTEGRATIONS))) (for-each (lambda (expression) (pp expression (current-output-port) true)) loader))))))) -- 2.25.1