403aaac7d4
The libraries moved were: - mzlib/control => racket/control - mzlib/date => racket/date - mzlib/deflate => file/gzip - mzlib/inflate => file/gunzip - mzlib/port => racket/port - mzlib/process => racket/system - mzlib/runtime-path => racket/runtime-path - mzlib/shared => racket/shared - mzlib/unit => racket/unit - mzlib/unit-exptime => racket/unit-exptime - mzlib/zip => file/zip The old modules in mzlib are now pointers to the new modules. These are all modules that were already redirected in the documentation.
24 lines
632 B
Racket
24 lines
632 B
Racket
#lang scheme/base
|
|
|
|
(require syntax/stx
|
|
syntax/kerncase
|
|
syntax/struct
|
|
racket/struct-info
|
|
scheme/include)
|
|
|
|
(provide shared/proc)
|
|
|
|
(require (for-template
|
|
scheme/base
|
|
(only-in "teachprims.rkt" [advanced-cons the-cons])))
|
|
|
|
(define code-insp (variable-reference->module-declaration-inspector
|
|
(#%variable-reference)))
|
|
|
|
(define shared/proc
|
|
(lambda (stx make-check-cdr undefined-expr)
|
|
(with-syntax ([undefined undefined-expr])
|
|
;; Include the implementation.
|
|
;; See private/shared-body.rkt.
|
|
(include (lib "racket/private/shared-body.rkt")))))
|