From 301e99a7cc7a783e062bb1b91eb713bd7540fe49 Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Tue, 15 Jul 1997 18:32:04 +0000 Subject: [PATCH] Disregard working directory when file is loaded; use directory that file is loaded from instead. --- v8/src/sf/make.scm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/v8/src/sf/make.scm b/v8/src/sf/make.scm index 2a0bf98be..49636ff6d 100644 --- a/v8/src/sf/make.scm +++ b/v8/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 1997/07/15 18:32:04 adams Exp $ -Copyright (c) 1988-95 Massachusetts Institute of Technology +Copyright (c) 1988-1997 Massachusetts Institute of Technology This material was developed by the Scheme project at the Massachusetts Institute of Technology, Department of Electrical Engineering and @@ -45,6 +45,8 @@ MIT in each case. |# (pathname-as-directory "sf") (lambda () (package/system-loader "sf" '() 'QUERY))) + ((package/reference (find-package '(SCODE-OPTIMIZER EXPANSION)) + 'USUAL-INTEGRATIONS/INITIALIZE-EXPANDERS!)) ((package/reference (find-package '(SCODE-OPTIMIZER)) 'USUAL-INTEGRATIONS/CACHE!)))) -(add-system! (make-system "SF" 4 31 '())) \ No newline at end of file +(add-system! (make-system "SF" 4 32 '())) \ No newline at end of file -- 2.25.1