/dports/lang/racket/racket-8.3/src/expander/compile/ |
H A D | form.rkt | 33 (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 D | module.rkt | 104 (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 D | recompile.rkt | 5 "../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 D | form.rkt | 33 (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 D | module.rkt | 104 (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 D | recompile.rkt | 5 "../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 D | linklet-info.rkt | 3 (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 D | linklet-info.rkt | 3 (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 D | main.rkt | 29 "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 D | run.rkt | 18 "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 D | main.rkt | 29 "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 D | run.rkt | 18 "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 D | module.rkt | 25 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 D | core.rkt | 12 "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 D | module.rkt | 25 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 D | core.rkt | 12 "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 D | module.rkt | 53 [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 D | module.rkt | 53 [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 D | linklet.rkt | 23 ;; 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 D | linklet.rkt | 23 ;; 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 D | startup.inc | 13841 "(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 D | startup.inc | 13841 "(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 D | r6rs-lang.rkt | 43 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 D | r6rs-lang.rkt | 43 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 D | interpret.rkt | 29 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 …]
|