1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
|
#lang racket/base
(require "private/namespace.rkt")
(define-syntax-rule (module-begin . forms)
(#%printing-module-begin
(module configure-runtime '#%kernel
(#%require scheme/runtime-config)
(configure #f))
. forms))
(provide (except-out (all-from-out racket/base)
struct
hash hasheq hasheqv
in-directory
local-require
#%module-begin)
(rename-out [module-begin #%module-begin])
make-base-empty-namespace
make-base-namespace)
(module reader syntax/module-reader
scheme/base)
(module configure-runtime '#%kernel
(#%require scheme/runtime-config)
(configure #f))
|
