Add "floppy" to the list of files that need compilation.

diff --git a/v7/src/6001/6001.sf b/v7/src/6001/6001.sf
index bd335b325e093184c1b851f4b143699096ac09ba..0033fc8dac33019d7a40b6d910d2882cad57a05e 100644 (file)
--- a/v7/src/6001/6001.sf
+++ b/v7/src/6001/6001.sf
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/6001/6001.sf,v 1.6 1992/09/01 20:55:54 cph Exp $
+$Id: 6001.sf,v 1.7 1992/09/10 07:33:15 cph Exp $
 
 Copyright (c) 1991-92 Massachusetts Institute of Technology
 
@@ -39,7 +39,8 @@ MIT in each case. |#
 
 (fluid-let ((sf/default-syntax-table
             (access edwin-syntax-table (->environment '(edwin)))))
-  (sf-conditionally "edextra"))
+  (sf-conditionally "edextra")
+  (sf-conditionally "floppy"))
 
 ;; Guarantee that the package modeller is loaded.
 (if (not (name->package '(CROSS-REFERENCE)))