From 3870d0bc46b3e06f968fd7d4c490b0ffbc806771 Mon Sep 17 00:00:00 2001 From: Stephen Adams Date: Fri, 4 Aug 1995 01:33:11 +0000 Subject: [PATCH] Update package constructor & loader file name conventions. --- v7/src/wabbit/wabbit.sf | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/v7/src/wabbit/wabbit.sf b/v7/src/wabbit/wabbit.sf index 668f1515f..c7896843d 100644 --- a/v7/src/wabbit/wabbit.sf +++ b/v7/src/wabbit/wabbit.sf @@ -1,6 +1,6 @@ #| -*-Scheme-*- -$Id: wabbit.sf,v 1.1 1994/03/28 07:06:40 ziggy Exp $ +$Id: wabbit.sf,v 1.2 1995/08/04 01:33:11 adams Exp $ Copyright (c) 1994 Massachusetts Institute of Technology @@ -35,9 +35,8 @@ MIT in each case. |# (fluid-let ((sf/default-syntax-table syntax-table/system-internal)) (sf-directory ".")) -(if (not (name->package '(CROSS-REFERENCE))) - (with-working-directory-pathname "../cref" (lambda () (load "make")))) +(load-option 'CREF) (cref/generate-constructors "wabbit") -(sf "wabbit.con" "wabbit.bcon") -(sf "wabbit.ldr" "wabbit.bldr") +(sf "wabbit.con" "wabbit.bco") +(sf "wabbit.ldr" "wabbit.bld") -- 2.25.1