Home
last modified time | relevance | path

Searched +refs:struct +refs:module +refs:linklet +refs:info (Results 1 – 25 of 41) sorted by relevance

12

/dports/lang/racket/racket-8.3/src/expander/compile/
H A Dform.rkt33 (struct link-info (link-module-uses imports extra-inspectorsss def-decls))
47 …#:get-module-linklet-info [get-module-linklet-info (lambda (mod-name p) #f)] ; to support submodul…
279 #:get-module-linklet-info get-module-linklet-info
400 #:get-module-linklet-info get-module-linklet-info
438 get-module-linklet-info
479 (define mli (or (get-module-linklet-info mod-name (module-use-phase mu*))
480 (namespace->module-linklet-info ns
486 (module-use*-declaration-inspector! mu* (module-linklet-info-inspector mli)))
489 (values (module-linklet-info-linklet-or-instance mli)
490 (and (module-linklet-info-module-uses mli) ; => linklet
[all …]
H A Dmodule.rkt104 (define language-info (filter-language-info (syntax-property (parsed-s p) 'module-language)))
111 (define body-cctx (struct-copy compile-context cctx
172 #:get-module-linklet-info (lambda (mod-name phase)
188 (module-linklet-info linklet
205 ['compile 'module 'linklet]
220 ['compile 'module 'linklet]
296 (generate-module-data-linklet mpis))))
323 [bundle (if language-info
324 (hash-set bundle 'language-info language-info)
400 (module-linklet-info linklet
[all …]
H A Drecompile.rkt5 "../compile/module.rkt"
92 (struct recompiled (bundle
164 (module-linklet-info linklet
178 (define-values (linklet new-module-use*s)
179 (compile-module-linklet (if (correlated-linklet? body-linklet)
189 #:get-module-linklet-info find-submodule
192 #:module-use*s module-use*s
197 (values phase (cons linklet new-module-use*s))))
208 (serialize-phase-to-link-module-uses phase-to-link-module-uses mpis))
211 (compile-linklet (generate-module-data-linklet mpis) 'data))
[all …]
/dports/lang/racket-minimal/racket-8.3/src/expander/compile/
H A Dform.rkt33 (struct link-info (link-module-uses imports extra-inspectorsss def-decls))
47 …#:get-module-linklet-info [get-module-linklet-info (lambda (mod-name p) #f)] ; to support submodul…
279 #:get-module-linklet-info get-module-linklet-info
400 #:get-module-linklet-info get-module-linklet-info
438 get-module-linklet-info
479 (define mli (or (get-module-linklet-info mod-name (module-use-phase mu*))
480 (namespace->module-linklet-info ns
486 (module-use*-declaration-inspector! mu* (module-linklet-info-inspector mli)))
489 (values (module-linklet-info-linklet-or-instance mli)
490 (and (module-linklet-info-module-uses mli) ; => linklet
[all …]
H A Dmodule.rkt104 (define language-info (filter-language-info (syntax-property (parsed-s p) 'module-language)))
111 (define body-cctx (struct-copy compile-context cctx
172 #:get-module-linklet-info (lambda (mod-name phase)
188 (module-linklet-info linklet
205 ['compile 'module 'linklet]
220 ['compile 'module 'linklet]
296 (generate-module-data-linklet mpis))))
323 [bundle (if language-info
324 (hash-set bundle 'language-info language-info)
400 (module-linklet-info linklet
[all …]
H A Drecompile.rkt5 "../compile/module.rkt"
92 (struct recompiled (bundle
164 (module-linklet-info linklet
178 (define-values (linklet new-module-use*s)
179 (compile-module-linklet (if (correlated-linklet? body-linklet)
189 #:get-module-linklet-info find-submodule
192 #:module-use*s module-use*s
197 (values phase (cons linklet new-module-use*s))))
208 (serialize-phase-to-link-module-uses phase-to-link-module-uses mpis))
211 (compile-linklet (generate-module-data-linklet mpis) 'data))
[all …]
/dports/lang/racket-minimal/racket-8.3/src/expander/extract/
H A Dlinklet-info.rkt3 (provide (struct-out linklet-info))
5 ;; A linklet-info is a phase-specific slice of a module --- mainly a
6 ;; linklet, but we group the linklet together with metadata from the
7 ;; module's declaration linklet
8 (struct linklet-info (linklet ; the implementation, or #f if the implementation is empty
/dports/lang/racket/racket-8.3/src/expander/extract/
H A Dlinklet-info.rkt3 (provide (struct-out linklet-info))
5 ;; A linklet-info is a phase-specific slice of a module --- mainly a
6 ;; linklet, but we group the linklet together with metadata from the
7 ;; module's declaration linklet
8 (struct linklet-info (linklet ; the implementation, or #f if the implementation is empty
/dports/lang/racket-minimal/racket-8.3/src/expander/
H A Dmain.rkt29 "boot/linklet-primitive.rkt"
103 module->language-info
133 syntax-debug-info
168 (declare-hash-based-module! '#%place-struct place-struct-primitives #:namespace ns
174 (let ([linklet-primitives
177 (hash-remove (hash-remove linklet-primitives
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
206 (declare-reexporting-module! '#%builtin (list* '#%place-struct
[all …]
H A Drun.rkt18 "compile/linklet-api.rkt"
24 (only-in "run/linklet.rkt"
25 linklet-as-s-expr?
26 linklet-as-s-expr)
29 (only-in "run/linklet.rkt" linklet-compile-to-s-expr))
219 ;; linklet compiler:
301 (define accomplice (make-log-receiver (current-logger) 'info 'cm-accomplice))
302 (struct file-dependency (path module?) #:prefab)
344 [(linklet-bundle? l)
347 [(linklet-directory? l)
[all …]
/dports/lang/racket/racket-8.3/src/expander/
H A Dmain.rkt29 "boot/linklet-primitive.rkt"
103 module->language-info
133 syntax-debug-info
168 (declare-hash-based-module! '#%place-struct place-struct-primitives #:namespace ns
174 (let ([linklet-primitives
177 (hash-remove (hash-remove linklet-primitives
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
206 (declare-reexporting-module! '#%builtin (list* '#%place-struct
[all …]
H A Drun.rkt18 "compile/linklet-api.rkt"
24 (only-in "run/linklet.rkt"
25 linklet-as-s-expr?
26 linklet-as-s-expr)
29 (only-in "run/linklet.rkt" linklet-compile-to-s-expr))
219 ;; linklet compiler:
301 (define accomplice (make-log-receiver (current-logger) 'info 'cm-accomplice))
302 (struct file-dependency (path module?) #:prefab)
344 [(linklet-bundle? l)
347 [(linklet-directory? l)
[all …]
/dports/lang/racket/racket-8.3/src/expander/namespace/
H A Dmodule.rkt25 namespace->module-linklet-info
26 (struct-out module-linklet-info)
57 (provide (struct-out module)))
61 (struct module (source-name ; #f, symbol, or complete path
69 … phase-level-linklet-info-callback ; phase-level namespace -> module-linklet-info-or-#f
91 (struct module-linklet-info (linklet-or-instance ; #f, linklet, or instance supplied for cross-link…
109 #:phase-level-linklet-info-callback [phase-level-linklet-info-callback
126 phase-level-linklet-info-callback
139 (struct module-instance (namespace
252 (define (namespace->module-linklet-info ns name phase-level)
[all …]
H A Dcore.rkt12 "module.rkt")
20 declare-core-module!
22 core-module-name
33 (define core-module-name (make-resolved-module-path '#%core))
66 (struct protected-core (val) #:authentic)
93 (declare-module!
109 #:phase-level-linklet-info-callback
112 (let ([ns (namespace->module-namespace ns core-module-name 0)])
114 (module-linklet-info (namespace->instance ns 0)
134 core-module-name))
[all …]
/dports/lang/racket-minimal/racket-8.3/src/expander/namespace/
H A Dmodule.rkt25 namespace->module-linklet-info
26 (struct-out module-linklet-info)
57 (provide (struct-out module)))
61 (struct module (source-name ; #f, symbol, or complete path
69 … phase-level-linklet-info-callback ; phase-level namespace -> module-linklet-info-or-#f
91 (struct module-linklet-info (linklet-or-instance ; #f, linklet, or instance supplied for cross-link…
109 #:phase-level-linklet-info-callback [phase-level-linklet-info-callback
126 phase-level-linklet-info-callback
139 (struct module-instance (namespace
252 (define (namespace->module-linklet-info ns name phase-level)
[all …]
H A Dcore.rkt12 "module.rkt")
20 declare-core-module!
22 core-module-name
33 (define core-module-name (make-resolved-module-path '#%core))
66 (struct protected-core (val) #:authentic)
93 (declare-module!
109 #:phase-level-linklet-info-callback
112 (let ([ns (namespace->module-namespace ns core-module-name 0)])
114 (module-linklet-info (namespace->instance ns 0)
134 core-module-name))
[all …]
/dports/lang/racket-minimal/racket-8.3/src/expander/eval/
H A Dmodule.rkt53 [l (instantiate-linklet (eval-linklet* l)
79 (define language-info (hash-ref h 'language-info #f))
83 ;; we don't retain other info --- especially the syntax-literals linklet.
136 #:language-info language-info
144 #:phase-level-linklet-info-callback
146 (module-linklet-info (hash-ref phases-h phase-level #f)
178 (namespace-module-use->module+linklet-instances
220 ;; to point back to the module's info:
259 (struct instance-data (syntax-literals-instance cache-key))
328 ;; h - hash from the module's linklet bundle
[all …]
/dports/lang/racket/racket-8.3/src/expander/eval/
H A Dmodule.rkt53 [l (instantiate-linklet (eval-linklet* l)
79 (define language-info (hash-ref h 'language-info #f))
83 ;; we don't retain other info --- especially the syntax-literals linklet.
136 #:language-info language-info
144 #:phase-level-linklet-info-callback
146 (module-linklet-info (hash-ref phases-h phase-level #f)
178 (namespace-module-use->module+linklet-instances
220 ;; to point back to the module's info:
259 (struct instance-data (syntax-literals-instance cache-key))
328 ;; h - hash from the module's linklet bundle
[all …]
/dports/lang/racket/racket-8.3/src/expander/run/
H A Dlinklet.rkt23 ;; module (which is a collection of linklets plus some static
51 (struct linklet () #:prefab)
53 (struct source-linklet linklet (src) #:prefab)
55 (struct compiled-linklet linklet (compiled-proc ; takes self instance plus instance arguments to r…
60 (struct instance (name ; for debugging, typically a module name + phase
128 (define-values (vars trans) (module->exports mod-name))
148 (variable-reference->module-declaration-inspector
265 ;; Preserve info about a local identifier:
426 (struct path-bytes (bstr) #:prefab)
427 (struct unreadable (str) #:prefab)
[all …]
/dports/lang/racket-minimal/racket-8.3/src/expander/run/
H A Dlinklet.rkt23 ;; module (which is a collection of linklets plus some static
51 (struct linklet () #:prefab)
53 (struct source-linklet linklet (src) #:prefab)
55 (struct compiled-linklet linklet (compiled-proc ; takes self instance plus instance arguments to r…
60 (struct instance (name ; for debugging, typically a module name + phase
128 (define-values (vars trans) (module->exports mod-name))
148 (variable-reference->module-declaration-inspector
265 ;; Preserve info about a local identifier:
426 (struct path-bytes (bstr) #:prefab)
427 (struct unreadable (str) #:prefab)
[all …]
/dports/lang/racket-minimal/racket-8.3/src/bc/src/
H A Dstartup.inc13841 "(struct:module-linklet-info"
13843 " module-linklet-info?"
13844 " module-linklet-info-linklet-or-instance"
13845 " module-linklet-info-module-uses"
13846 " module-linklet-info-self"
13847 " module-linklet-info-inspector"
13854 " 'module-linklet-info"
13864 " 'module-linklet-info)))))"
34781 "(namespace->module-linklet-info"
34844 "(module-linklet-info-self"
[all …]
/dports/lang/racket/racket-8.3/src/bc/src/
H A Dstartup.inc13841 "(struct:module-linklet-info"
13843 " module-linklet-info?"
13844 " module-linklet-info-linklet-or-instance"
13845 " module-linklet-info-module-uses"
13846 " module-linklet-info-self"
13847 " module-linklet-info-inspector"
13854 " 'module-linklet-info"
13864 " 'module-linklet-info)))))"
34781 "(namespace->module-linklet-info"
34844 "(module-linklet-info-self"
[all …]
/dports/lang/racket/racket-8.3/src/ChezScheme/rktboot/
H A Dr6rs-lang.rkt43 module
97 struct-name struct-ref
150 (module+ ikarus
162 (rename-out [s:module module])
166 (module+ hash-pair
174 (let ([p (resolved-module-path-name
175 (module-path-index-resolve
189 #'(module name here
772 (require racket/linklet)
773 (define chez-eval (instantiate-linklet
[all …]
/dports/lang/racket-minimal/racket-8.3/src/ChezScheme/rktboot/
H A Dr6rs-lang.rkt43 module
97 struct-name struct-ref
150 (module+ ikarus
162 (rename-out [s:module module])
166 (module+ hash-pair
174 (let ([p (resolved-module-path-name
175 (module-path-index-resolve
189 #'(module name here
772 (require racket/linklet)
773 (define chez-eval (instantiate-linklet
[all …]
/dports/lang/racket-minimal/racket-8.3/src/schemify/
H A Dinterpret.rkt29 interpret-linklet)
31 (struct indirect (pos element))
32 (struct boxed (pos))
33 (struct boxed/check boxed ())
59 (define (interpretable-jitified-linklet linklet-e serializable?)
60 ;; Return a compiled linklet as an expression for the linklet body.
87 (compile-linklet-body linklet-e '#hasheq() 0))
362 [`(call-with-module-prompt (lambda () . ,body))
915 ((hash-ref primitives 'call-with-module-prompt)
1055 (module+ main
[all …]

12