src/expander/main.rkt

3          "common/module-path.rkt"
4          "namespace/namespace.rkt"
15          "namespace/api.rkt"
16          "namespace/attach.rkt"
17          "namespace/api-module.rkt"
18          "namespace/core.rkt"
19          "namespace/primitive-module.rkt"
20          "expand/missing-module.rkt"
41          (only-in "eval/module-cache.rkt" module-cache-place-init!)
46 ;; All bindings provided by this module must correspond to variables
52 (provide boot ; installs handlers: eval, module name resolver, etc.
89          identifier-binding
93          make-namespace
94          current-namespace
95          namespace->instance
97          namespace-syntax-introduce
98          namespace-datum-introduce
99          namespace-require
101          module-declared?
102          module-predefined?
103          module->language-info
104          maybe-raise-missing-module
106          namespace-module-identifier
107          namespace-attach-module
108          namespace-attach-module-declaration
109          namespace-mapped-symbols
110          namespace-variable-value
112          module-path-index?
113          module-path-index-join
114          resolved-module-path?
115          module-path?
119          declare-primitive-module! ; to support "extensions"
131          identifier?
134          module-compiled-exports
135          module-compiled-indirect-exports
139          bound-identifier=?
150          "expand/module.rkt"
157 ;; Initial namespace
159 (define (namespace-init!)
160   (define ns (make-namespace))
163      (declare-core-module! ns)
164      (declare-hash-based-module! '#%read read-primitives #:namespace ns)
165      (declare-hash-based-module! '#%main main-primitives #:namespace ns
167      (declare-hash-based-module! '#%utils utils-primitives #:namespace ns)
168      (declare-hash-based-module! '#%place-struct place-struct-primitives #:namespace ns
173      (declare-hash-based-module! '#%boot boot-primitives #:namespace ns)
180        (declare-hash-based-module! '#%linklet-primitive linklet-primitives #:namespace ns
184        (declare-hash-based-module! '#%linklet-expander linklet-expander-primitives #:namespace ns
189        (declare-reexporting-module! '#%linklet (list '#%linklet-primitive
191                                     #:namespace ns))
192      (declare-hash-based-module! '#%expobs expobs-primitives #:namespace ns
194      (declare-kernel-module! ns
201        (copy-runtime-module! name
202                              #:namespace ns
206      (declare-reexporting-module! '#%builtin (list* '#%place-struct
212                                   #:namespace ns
214      (current-namespace ns)
218 (namespace-init!)
230   (module-path-place-init!)
231   (module-cache-place-init!)
235   (namespace-init!)