Use new cref argument to generate for all OS types.
authorChris Hanson <org/chris-hanson/cph>
Tue, 11 Jan 2005 03:13:23 +0000 (03:13 +0000)
committerChris Hanson <org/chris-hanson/cph>
Tue, 11 Jan 2005 03:13:23 +0000 (03:13 +0000)
13 files changed:
v7/src/6001/6001.sf
v7/src/compiler/machines/i386/compiler.sf
v7/src/cref/cref.sf
v7/src/edwin/edwin.sf
v7/src/imail/compile.scm
v7/src/runtime/runtime.sf
v7/src/sf/sf.sf
v7/src/sos/compile.scm
v7/src/ssp/compile.scm
v7/src/star-parser/compile.scm
v7/src/win32/win32.sf
v7/src/xdoc/compile.scm
v7/src/xml/compile.scm

index d2a1641ddb11a783b4f580fd1cc8f56b5d56e937..45f94eb349906f2d413b5c613c6ffe7d7f9dfd3e 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: 6001.sf,v 1.15 2003/02/14 18:28:00 cph Exp $
+$Id: 6001.sf,v 1.16 2005/01/11 03:13:23 cph Exp $
 
-Copyright (c) 1991-1999, 2001 Massachusetts Institute of Technology
+Copyright 1991,1992,1993,1995,2001,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -39,4 +39,4 @@ USA.
   (sf-conditionally "floppy"))
 
 (load-option 'CREF)
-(cref/generate-constructors "6001")
\ No newline at end of file
+(cref/generate-constructors "6001" 'ALL)
\ No newline at end of file
index ee9e09d79b76abaddecb76f97d83ca8521f20868..3a71ad79ee892f0e46c8ef1936356fb48063a663 100644 (file)
@@ -1,8 +1,9 @@
 #| -*-Scheme-*-
 
-$Id: compiler.sf,v 1.20 2003/02/14 18:28:03 cph Exp $
+$Id: compiler.sf,v 1.21 2005/01/11 03:13:23 cph Exp $
 
-Copyright (c) 1992-2001 Massachusetts Institute of Technology
+Copyright 1992,1993,1994,1995,1996,2000 Massachusetts Institute of Technology
+Copyright 2001,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -76,4 +77,4 @@ USA.
 ((access syntax-files! (->environment '(COMPILER))))
 
 ;; Rebuild the package constructors and cref.
-(cref/generate-constructors "compiler")
\ No newline at end of file
+(cref/generate-constructors "compiler" 'ALL)
\ No newline at end of file
index 0f709d42ffea14b748dc72032f5c6a3164546a82..1d7b4dbf54372a81c73549bf9a8a85f83367c307 100644 (file)
@@ -1,8 +1,9 @@
 #| -*-Scheme-*-
 
-$Id: cref.sf,v 1.17 2003/02/14 18:28:10 cph Exp $
+$Id: cref.sf,v 1.18 2005/01/11 03:13:23 cph Exp $
 
-Copyright (c) 1988-2001 Massachusetts Institute of Technology
+Copyright 1988,1989,1991,1992,1993,1995 Massachusetts Institute of Technology
+Copyright 1996,2001,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -35,4 +36,4 @@ USA.
     (begin
       (if (not (name->package '(CROSS-REFERENCE)))
          (load "make"))
-      (cref/generate-constructors "cref")))
\ No newline at end of file
+      (cref/generate-constructors "cref" 'ALL)))
\ No newline at end of file
index 18d9d9c971c250f4bd340bd67d9d4927bd21786c..91b7b551158d03108c70d1f221599b37addf8cd3 100644 (file)
@@ -1,8 +1,9 @@
 #| -*-Scheme-*-
 
-$Id: edwin.sf,v 1.32 2003/02/14 18:28:12 cph Exp $
+$Id: edwin.sf,v 1.33 2005/01/11 03:13:23 cph Exp $
 
-Copyright 1991-2001 Massachusetts Institute of Technology
+Copyright 1989,1990,1991,1992,1995,1996 Massachusetts Institute of Technology
+Copyright 1999,2000,2001,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -67,5 +68,5 @@ USA.
 
 (load "decls")
 
-(cref/generate-constructors "edwin")
+(cref/generate-constructors "edwin" 'ALL)
 (sf-conditionally "edwin.ldr")
\ No newline at end of file
index 79166551abf8bbc8cce9a3abb1309ae0d320f54e..3f5bc5a4476db395748829fd0e060ae880117f7f 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: compile.scm,v 1.20 2003/02/14 18:28:14 cph Exp $
+$Id: compile.scm,v 1.21 2005/01/11 03:13:23 cph Exp $
 
-Copyright 2000,2001,2003 Massachusetts Institute of Technology
+Copyright 2000,2001,2003,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -43,4 +43,4 @@ USA.
                "imail-util"
                "imap-response"
                "imap-syntax"))
-    (cref/generate-constructors "imail")))
\ No newline at end of file
+    (cref/generate-constructors "imail" 'ALL)))
\ No newline at end of file
index 420aff46639614e627e5ae1993ae21bbb9aa1909..4ab69779c020e0c8d63857b116cc1d9360ffc6e0 100644 (file)
@@ -1,9 +1,9 @@
 #| -*-Scheme-*-
 
-$Id: runtime.sf,v 14.20 2003/02/14 18:28:33 cph Exp $
+$Id: runtime.sf,v 14.21 2005/01/11 03:13:23 cph Exp $
 
-Copyright (c) 1988,1989,1990,1991,1992 Massachusetts Institute of Technology
-Copyright (c) 1994,1995,1996,2001,2003 Massachusetts Institute of Technology
+Copyright 1988,1989,1990,1991,1992,1994 Massachusetts Institute of Technology
+Copyright 1995,1996,2001,2003,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -38,4 +38,4 @@ USA.
 ;; that when cross-syntaxing the cref `native' to the running system
 ;; is loaded.
 (load-option 'CREF)
-(cref/generate-constructors "runtime")
\ No newline at end of file
+(cref/generate-constructors "runtime" 'ALL)
\ No newline at end of file
index 243f048e84930e23eb1b2a25629e2f17a743517b..6115b54617bd5974b2e8c90c655c4972c9ed5cf2 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: sf.sf,v 4.13 2003/02/14 18:28:35 cph Exp $
+$Id: sf.sf,v 4.14 2005/01/11 03:13:23 cph Exp $
 
-Copyright (c) 1988-1999, 2001 Massachusetts Institute of Technology
+Copyright 1988,1989,1995,1996,2001,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -43,4 +43,4 @@ USA.
   (sf-directory "."))
 
 (load-option 'CREF)
-(cref/generate-constructors "sf")
\ No newline at end of file
+(cref/generate-constructors "sf" 'ALL)
\ No newline at end of file
index 1ea5a85a383d73405f8eccb98e215efbf05f4138..76cdaa03b48f7c47fae32f6a22141c310d1b3eea 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: compile.scm,v 1.8 2003/02/14 18:28:35 cph Exp $
+$Id: compile.scm,v 1.9 2005/01/11 03:13:23 cph Exp $
 
-Copyright 1995-1999, 2001 Massachusetts Institute of Technology
+Copyright 1997,2001,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -24,7 +24,6 @@ USA.
 |#
 
 (load-option 'CREF)
-
 (with-working-directory-pathname (directory-pathname (current-load-pathname))
   (lambda ()
     (compile-file "class")
@@ -33,4 +32,4 @@ USA.
     (compile-file "method")
     (compile-file "printer")
     (compile-file "slot")
-    (cref/generate-constructors "sos")))
\ No newline at end of file
+    (cref/generate-constructors "sos" 'ALL)))
\ No newline at end of file
index c8c2c7968ff800cdaacbb83dc35b0125553daefa..febfd6066bcae9d76e3cfe586f82845edaa872e4 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: compile.scm,v 1.6 2004/11/01 19:18:21 cph Exp $
+$Id: compile.scm,v 1.7 2005/01/11 03:13:23 cph Exp $
 
-Copyright 2003 Massachusetts Institute of Technology
+Copyright 2003,2004,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -33,4 +33,4 @@ USA.
                "mod-lisp"
                "xhtml-expander"
                "xmlrpc"))
-    (cref/generate-constructors "ssp")))
\ No newline at end of file
+    (cref/generate-constructors "ssp" 'ALL)))
\ No newline at end of file
index 37c55e283ab991632e065cd176c2470183297bbe..744a09aa5f97570927fe5188b6df80576b26b67a 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: compile.scm,v 1.8 2003/02/14 18:28:35 cph Exp $
+$Id: compile.scm,v 1.9 2005/01/11 03:13:23 cph Exp $
 
-Copyright 2001, 2002 Massachusetts Institute of Technology
+Copyright 2001,2002,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -32,4 +32,4 @@ USA.
              '("matcher"
                "parser"
                "shared"))
-    (cref/generate-constructors "parser")))
\ No newline at end of file
+    (cref/generate-constructors "parser" 'ALL)))
\ No newline at end of file
index a06f0a0303bf5549116bc51a38ca157b637ab555..3d00ed3e82486a0f888745e7a05a66cde54795be 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: win32.sf,v 1.11 2003/02/14 18:28:35 cph Exp $
+$Id: win32.sf,v 1.12 2005/01/11 03:13:23 cph Exp $
 
-Copyright (c) 1993-1999, 2001, 2002 Massachusetts Institute of Technology
+Copyright 1993,1995,2001,2002,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -53,4 +53,4 @@ USA.
     (sf-conditionally "dib"))
   (sf-directory "."))
 
-(cref/generate-constructors "win32")
\ No newline at end of file
+(cref/generate-constructors "win32" 'ALL)
\ No newline at end of file
index 5248dc76d802f835774fa9d36b1799bfa4cf213d..da45dec5fd33173d7cf4a3ab8179880c44ce4e37 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: compile.scm,v 1.1 2004/11/01 19:21:05 cph Exp $
+$Id: compile.scm,v 1.2 2005/01/11 03:13:23 cph Exp $
 
-Copyright 2004 Massachusetts Institute of Technology
+Copyright 2004,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -31,4 +31,4 @@ USA.
     (for-each compile-file
              '("db"
                "xdoc"))
-    (cref/generate-constructors "xdoc")))
\ No newline at end of file
+    (cref/generate-constructors "xdoc" 'ALL)))
\ No newline at end of file
index 24f9f80cb453bc197a2d8f005d1e46bcad802d8a..92c1af8051463adedf7982b96de650ae5ba44d32 100644 (file)
@@ -1,8 +1,8 @@
 #| -*-Scheme-*-
 
-$Id: compile.scm,v 1.14 2004/07/24 03:45:29 cph Exp $
+$Id: compile.scm,v 1.15 2005/01/11 03:13:23 cph Exp $
 
-Copyright 2001,2003,2004 Massachusetts Institute of Technology
+Copyright 2001,2003,2004,2005 Massachusetts Institute of Technology
 
 This file is part of MIT/GNU Scheme.
 
@@ -45,4 +45,4 @@ USA.
                    "xml-parser"
                    "xhtml"
                    "xhtml-entities"))))
-    (cref/generate-constructors "xml")))
\ No newline at end of file
+    (cref/generate-constructors "xml" 'ALL)))
\ No newline at end of file