#| -*-Scheme-*-
-$Id: compiler.pkg,v 1.7 1993/12/09 03:23:53 gjr Exp $
+$Id: compiler.pkg,v 1.8 1994/01/08 21:06:17 gjr Exp $
Copyright (c) 1992-1993 Massachusetts Institute of Technology
;;;; Compiler Packaging
\f
-(global-definitions "../runtime/runtim")
+(global-definitions "../runtime/runtime")
(define-package (compiler)
(files "base/switch"
#| -*-Scheme-*-
-$Id: cref.pkg,v 1.5 1993/10/11 23:31:40 cph Exp $
+$Id: cref.pkg,v 1.6 1994/01/08 21:04:30 gjr Exp $
-Copyright (c) 1988-93 Massachusetts Institute of Technology
+Copyright (c) 1988-1994 Massachusetts Institute of Technology
This material was developed by the Scheme project at the Massachusetts
Institute of Technology, Department of Electrical Engineering and
;;;; CREF Packaging
\f
-(global-definitions "../runtime/runtim")
+(global-definitions "../runtime/runtime")
(define-package (cross-reference)
(files "mset"
#| -*-Scheme-*-
-$Id: edwin.pkg,v 1.141 1993/10/26 21:23:00 cph Exp $
+$Id: edwin.pkg,v 1.142 1994/01/08 21:04:48 gjr Exp $
-Copyright (c) 1989-1993 Massachusetts Institute of Technology
+Copyright (c) 1989-1994 Massachusetts Institute of Technology
This material was developed by the Scheme project at the Massachusetts
Institute of Technology, Department of Electrical Engineering and
;;;; Edwin Packaging
\f
-(global-definitions "../runtime/runtim")
+(global-definitions "../runtime/runtime")
(define-package (edwin)
(file-case os-type
#| -*-Scheme-*-
-$Id: make.scm,v 14.50 1993/11/18 00:47:19 cph Exp $
+$Id: make.scm,v 14.51 1994/01/08 21:02:52 gjr Exp $
-Copyright (c) 1988-93 Massachusetts Institute of Technology
+Copyright (c) 1988-1994 Massachusetts Institute of Technology
This material was developed by the Scheme project at the Massachusetts
Institute of Technology, Department of Electrical Engineering and
(car names))
(loop (cdr names)))))
(package/add-child! system-global-package 'PACKAGE environment-for-package)
-(eval (fasload "runtim.bcon" #f) system-global-environment)
+(eval (fasload "runtime.bcon" #f) system-global-environment)
;;; Global databases. Load, then initialize.
(let ((files1
;; Note: The following code needs MAP* and MEMBER-PROCEDURE
;; from runtime/list. Fortunately that file has already been loaded.
- ((eval (fasload "runtim.bldr" #f) system-global-environment)
+ ((eval (fasload "runtime.bldr" #f) system-global-environment)
(let ((to-avoid
(cons "packag"
- (map* (if (file-exists? "runtim.bad")
- (fasload "runtim.bad" #f)
+ (map* (if (file-exists? "runtime.bad")
+ (fasload "runtime.bad" #f)
'())
car
(append files1 files2))))
#| -*-Scheme-*-
-$Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/runtime/runtime.sf,v 14.8 1992/05/12 13:43:47 mhwu Exp $
+$Id: runtime.sf,v 14.9 1994/01/08 21:03:38 gjr Exp $
-Copyright (c) 1988-92 Massachusetts Institute of Technology
+Copyright (c) 1988-1994 Massachusetts Institute of Technology
This material was developed by the Scheme project at the Massachusetts
Institute of Technology, Department of Electrical Engineering and
(if (not (name->package '(CROSS-REFERENCE)))
(with-working-directory-pathname "../cref" (lambda () (load "make"))))
-(cref/generate-constructors "runtim")
-(sf "runtim.con" "runtim.bcon")
-(sf "runtim.ldr" "runtim.bldr")
-(if (file-exists? "runtim.avd")
- (fasdump (read-file "runtim.avd") "runtim.bad"))
\ No newline at end of file
+(cref/generate-constructors "runtime")
+(sf "runtime.con" "runtime.bcon")
+(sf "runtime.ldr" "runtime.bldr")
+(if (file-exists? "runtime.avd")
+ (fasdump (read-file "runtime.avd") "runtime.bad"))
\ No newline at end of file
#| -*-Scheme-*-
-$Id: sf.pkg,v 4.9 1993/08/03 03:09:48 gjr Exp $
+$Id: sf.pkg,v 4.10 1994/01/08 21:04:09 gjr Exp $
-Copyright (c) 1987-1993 Massachusetts Institute of Technology
+Copyright (c) 1987-1994 Massachusetts Institute of Technology
This material was developed by the Scheme project at the Massachusetts
Institute of Technology, Department of Electrical Engineering and
;;;; SF Packaging
\f
-(global-definitions "../runtime/runtim")
+(global-definitions "../runtime/runtime")
(define-package (scode-optimizer)
(files "lsets"
#| -*-Scheme-*-
-$Id: make.scm,v 14.50 1993/11/18 00:47:19 cph Exp $
+$Id: make.scm,v 14.51 1994/01/08 21:02:52 gjr Exp $
-Copyright (c) 1988-93 Massachusetts Institute of Technology
+Copyright (c) 1988-1994 Massachusetts Institute of Technology
This material was developed by the Scheme project at the Massachusetts
Institute of Technology, Department of Electrical Engineering and
(car names))
(loop (cdr names)))))
(package/add-child! system-global-package 'PACKAGE environment-for-package)
-(eval (fasload "runtim.bcon" #f) system-global-environment)
+(eval (fasload "runtime.bcon" #f) system-global-environment)
;;; Global databases. Load, then initialize.
(let ((files1
;; Note: The following code needs MAP* and MEMBER-PROCEDURE
;; from runtime/list. Fortunately that file has already been loaded.
- ((eval (fasload "runtim.bldr" #f) system-global-environment)
+ ((eval (fasload "runtime.bldr" #f) system-global-environment)
(let ((to-avoid
(cons "packag"
- (map* (if (file-exists? "runtim.bad")
- (fasload "runtim.bad" #f)
+ (map* (if (file-exists? "runtime.bad")
+ (fasload "runtime.bad" #f)
'())
car
(append files1 files2))))