Update package constructor & loader file name conventions.

diff --git a/v7/src/wabbit/wabbit.sf b/v7/src/wabbit/wabbit.sf
index 668f1515f28e1da84827d5a1836b5b58c4502eb5..c7896843deca66072b8f7efead10cc2282aea3cb 100644 (file)
--- 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")