Remove most uses of mzscheme in the core.

Remaining are:
 - parts of unit200 that Matthew plans to remove.
 - the `mzscheme` implementation itself.

The implementation of `mzscheme` has been moved
to the `mzscheme` collection (from the `racket` and
`scheme` collections). The `scheme/mzscheme`
language, which was undocumented, has been removed.

This is slightly backwards-incompatible, because
the `xform` handling of precompiled headers now
evaluates code in a `racket/base`-like namespace,
instead of in a `mzscheme`-like namespace.

original commit: d54c1e4e49
This commit is contained in:
Sam Tobin-Hochstadt 2013-06-30 10:04:34 -04:00
parent 3ef406b5c6
commit 1c93e0f023
4 changed files with 7 additions and 9 deletions

View File

@ -1,7 +1,7 @@
(module bundle-dist mzscheme
(module bundle-dist racket/base
(require racket/file
(only racket/base lambda)
(only-in racket/base lambda)
racket/path
racket/system
file/zip
@ -80,8 +80,8 @@
"-mode" "555"
"-volname" (path->string
(path-replace-suffix (file-name-from-path target) #""))
"-srcfolder" (path->string (expand-path (path->complete-path dir)))
(path->string (expand-path (path->complete-path target))))])
"-srcfolder" (path->string (cleanse-path (path->complete-path dir)))
(path->string (cleanse-path (path->complete-path target))))])
((list-ref p 4) 'wait)
(unless (eq? ((list-ref p 4) 'status) 'done-ok)
(error 'bundle-directory

View File

@ -1,5 +1,5 @@
(module embed-sig mzscheme
(module embed-sig racket/base
(require racket/unit)
(provide compiler:embed^)

View File

@ -1,5 +1,4 @@
#lang mzscheme
#lang racket/base
(require racket/unit)

View File

@ -1,5 +1,4 @@
(module option-sig mzscheme
(module option-sig scheme/base
(require racket/unit)
(provide setup-option^)