| /dports/lang/racket/racket-8.3/src/expander/syntax/ |
| H A D | bulk-binding.rkt | 13 register-bulk-provide!
14 registered-bulk-provide?
77 (struct bulk-binding ([provides #:mutable] ; mutable so table can be found lazily on unmarshal
98 (unless bulk-provide
102 (set-bulk-binding-self! b (bulk-provide-self bulk-provide))
103 (define provides (hash-ref (bulk-provide-provides bulk-provide)
129 #:provide-phase+space (bulk-binding-provide-phase+space b)
178 (struct bulk-provide (self provides))
184 (struct bulk-binding-registry (table)) ; resolve-module-name -> bulk-provide
193 (bulk-provide self provides)))
[all …]
|
| H A D | binding-table.rkt | 24 (provide empty-binding-table
35 (struct-out bulk-binding-class)
46 (struct table-with-bulk-bindings (syms
61 (struct bulk-binding-at (scopes ; scope set
83 (make-struct-type-property 'bulk-binding))
86 (struct bulk-binding-class (get-symbols ; bulk-binding list-of-shift -> sym -> binding-info
126 ;; communicate to `provide`.
138 (struct-copy table-with-bulk-bindings bt
143 (make-struct-type-property 'implicitly-reachable))
347 (struct-copy bulk-binding-at bba
[all …]
|
| H A D | serialize.rkt | 9 (provide syntax-serialize
12 (struct serialized-syntax (version mpis base-mpi-pos data need-registry?)
66 (define bulk-binding-registry (and (serialized-syntax-need-registry? data)
67 (namespace-bulk-binding-registry (current-namespace))))
68 (deserialize-data shifted-mpis #f bulk-binding-registry (serialized-syntax-data data)))
|
| H A D | syntax.rkt | 15 (provide
16 (struct-out syntax) ; includes `syntax?`
23 (struct-out modified-content)
161 (lambda (s bulk-shifts reach)
170 bulk-shifts)
171 (define shifts (and bulk-shifts
172 (append bulk-shifts (syntax-mpi-shifts s))))
177 (reach (plain-property-value v) bulk-shifts))
178 (reach (syntax-srcloc s) bulk-shifts)))
209 (unsafe-struct*-cas! stx 0 old new))
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/syntax/ |
| H A D | bulk-binding.rkt | 13 register-bulk-provide!
14 registered-bulk-provide?
77 (struct bulk-binding ([provides #:mutable] ; mutable so table can be found lazily on unmarshal
98 (unless bulk-provide
102 (set-bulk-binding-self! b (bulk-provide-self bulk-provide))
103 (define provides (hash-ref (bulk-provide-provides bulk-provide)
129 #:provide-phase+space (bulk-binding-provide-phase+space b)
178 (struct bulk-provide (self provides))
184 (struct bulk-binding-registry (table)) ; resolve-module-name -> bulk-provide
193 (bulk-provide self provides)))
[all …]
|
| H A D | binding-table.rkt | 24 (provide empty-binding-table
35 (struct-out bulk-binding-class)
46 (struct table-with-bulk-bindings (syms
61 (struct bulk-binding-at (scopes ; scope set
83 (make-struct-type-property 'bulk-binding))
86 (struct bulk-binding-class (get-symbols ; bulk-binding list-of-shift -> sym -> binding-info
126 ;; communicate to `provide`.
138 (struct-copy table-with-bulk-bindings bt
143 (make-struct-type-property 'implicitly-reachable))
347 (struct-copy bulk-binding-at bba
[all …]
|
| H A D | serialize.rkt | 9 (provide syntax-serialize
12 (struct serialized-syntax (version mpis base-mpi-pos data need-registry?)
66 (define bulk-binding-registry (and (serialized-syntax-need-registry? data)
67 (namespace-bulk-binding-registry (current-namespace))))
68 (deserialize-data shifted-mpis #f bulk-binding-registry (serialized-syntax-data data)))
|
| H A D | syntax.rkt | 15 (provide
16 (struct-out syntax) ; includes `syntax?`
23 (struct-out modified-content)
161 (lambda (s bulk-shifts reach)
170 bulk-shifts)
171 (define shifts (and bulk-shifts
172 (append bulk-shifts (syntax-mpi-shifts s))))
177 (reach (plain-property-value v) bulk-shifts))
178 (reach (syntax-srcloc s) bulk-shifts)))
209 (unsafe-struct*-cas! stx 0 old new))
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/expand/ |
| H A D | require.rkt | 16 "require+provide.rkt"
21 (provide parse-and-perform-requires!
26 (struct adjust-only (syms))
27 (struct adjust-prefix (sym))
28 (struct adjust-all-except (prefix-sym syms))
29 (struct adjust-rename (to-id from-sym))
355 (define provide-phase (phase+space-phase provide-phase+space))
356 (define provide-space (phase+space-space provide-phase+space))
467 (bulk-callback provides provide-phase+space)))
476 #:provide-phase+space provide-phase+space
[all …]
|
| H A D | require+provide.rkt | 21 (provide make-requires+provides
28 (struct-out required)
44 add-provide!
52 (struct requires+provides (self ; module-path-index to recognize definitions among requires
65 (struct required (id phase+space can-be-shadowed? as-transformer?) #:authentic)
69 (struct bulk-required (provides ; extract binding info based on the sym
72 … provide-phase+space ; phase+space of `provide` in immediately providing module
169 (define (add-bulk-required-ids! r+p s self nominal-module phase-level provides provide-phase+space
189 (define br (bulk-required provides prefix-len s provide-phase+space can-be-shadowed?))
217 … #:provide-phase+space provide-phase+space
[all …]
|
| H A D | env.rkt | 20 (provide empty-env
24 (struct-out core-form)
29 (struct-out local-variable)
33 add-bulk-binding!
57 (struct local-variable (id) #:authentic)
89 (struct core-form (expander name) #:transparent #:authentic)
98 (define (add-bulk-binding! s binding phase
103 (add-bulk-binding-in-scopes! (syntax-scope-set s phase) binding
135 ;; chains to provide an inspector associated with the endpoint identifier; using
|
| /dports/lang/racket/racket-8.3/src/expander/expand/ |
| H A D | require.rkt | 16 "require+provide.rkt"
21 (provide parse-and-perform-requires!
26 (struct adjust-only (syms))
27 (struct adjust-prefix (sym))
28 (struct adjust-all-except (prefix-sym syms))
29 (struct adjust-rename (to-id from-sym))
355 (define provide-phase (phase+space-phase provide-phase+space))
356 (define provide-space (phase+space-space provide-phase+space))
467 (bulk-callback provides provide-phase+space)))
476 #:provide-phase+space provide-phase+space
[all …]
|
| H A D | require+provide.rkt | 21 (provide make-requires+provides
28 (struct-out required)
44 add-provide!
52 (struct requires+provides (self ; module-path-index to recognize definitions among requires
65 (struct required (id phase+space can-be-shadowed? as-transformer?) #:authentic)
69 (struct bulk-required (provides ; extract binding info based on the sym
72 … provide-phase+space ; phase+space of `provide` in immediately providing module
169 (define (add-bulk-required-ids! r+p s self nominal-module phase-level provides provide-phase+space
189 (define br (bulk-required provides prefix-len s provide-phase+space can-be-shadowed?))
217 … #:provide-phase+space provide-phase+space
[all …]
|
| H A D | env.rkt | 20 (provide empty-env
24 (struct-out core-form)
29 (struct-out local-variable)
33 add-bulk-binding!
57 (struct local-variable (id) #:authentic)
89 (struct core-form (expander name) #:transparent #:authentic)
98 (define (add-bulk-binding! s binding phase
103 (add-bulk-binding-in-scopes! (syntax-scope-set s phase) binding
135 ;; chains to provide an inspector associated with the endpoint identifier; using
|
| /dports/lang/racket/racket-8.3/share/pkgs/compiler-lib/compiler/ |
| H A D | decompile.rkt | 16 (provide decompile)
126 (provide ,@(apply
253 [(struct lam (_ _ _ _ _ _ _ _ _ (struct seq ((list vec-copy! _)))))
255 …[(struct application (_ (list _ _ (struct application (_ (list mpi-vector inspector bulk-binding-r…
614 [(#:bulk-binding-registry) (values bulk-binding-registry (add1 pos))]
689 [(#:table-with-bulk-bindings)
690 (decode* (deserialize-table-with-bulk-bindings syms bulk-bindings))]
691 [(#:bulk-binding-at)
692 (decode* (deserialize-bulk-binding-at scopes bulk))]
709 [(#:bulk-binding)
[all …]
|
| /dports/lang/racket/racket-8.3/src/expander/namespace/ |
| H A D | namespace.rkt | 5 "../syntax/bulk-binding.rkt"
11 (provide make-namespace
27 namespace-bulk-binding-registry
45 (provide (struct-out namespace)
46 (struct-out module-registry)
47 (struct-out definitions)
58 …bulk-binding-registry ; (resolved-module-path -> bulk-provide) for resolving bulk bindings on unma…
83 (struct definitions (variables ; linklet instance
109 (namespace-bulk-binding-registry share-from-ns)
110 (make-bulk-binding-registry))
[all …]
|
| H A D | module.rkt | 16 (provide make-module-namespace
26 (struct-out module-linklet-info)
57 (provide (struct-out module)))
61 (struct module (source-name ; #f, symbol, or complete path
70 force-bulk-binding ; bulk-binding-registry -> any
139 (struct module-instance (namespace
168 (struct-copy namespace (new-namespace ns
210 (register-bulk-provide! (namespace-bulk-binding-registry ns)
286 (define m-ns (struct-copy namespace ns
327 (define m-ns (struct-copy namespace ns
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/namespace/ |
| H A D | namespace.rkt | 5 "../syntax/bulk-binding.rkt"
11 (provide make-namespace
27 namespace-bulk-binding-registry
45 (provide (struct-out namespace)
46 (struct-out module-registry)
47 (struct-out definitions)
58 …bulk-binding-registry ; (resolved-module-path -> bulk-provide) for resolving bulk bindings on unma…
83 (struct definitions (variables ; linklet instance
109 (namespace-bulk-binding-registry share-from-ns)
110 (make-bulk-binding-registry))
[all …]
|
| H A D | module.rkt | 16 (provide make-module-namespace
26 (struct-out module-linklet-info)
57 (provide (struct-out module)))
61 (struct module (source-name ; #f, symbol, or complete path
70 force-bulk-binding ; bulk-binding-registry -> any
139 (struct module-instance (namespace
168 (struct-copy namespace (new-namespace ns
210 (register-bulk-provide! (namespace-bulk-binding-registry ns)
286 (define m-ns (struct-copy namespace ns
327 (define m-ns (struct-copy namespace ns
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/compile/ |
| H A D | serialize.rkt | 73 (provide make-module-path-index-table
95 (struct module-path-index-table (positions intern))
357 [(prefab-struct-key v)
358 (for ([e (in-vector (struct->vector v) 1)])
362 (for ([e (in-vector (struct->vector v) 1)])
530 [(prefab-struct-key v)
532 (define vec (struct->vector v))
874 …(decode* (deserialize-bulk-binding prefix excepts mpi provide-phase-level phase-shift bulk-binding…
878 …(decode* (deserialize-bulk-binding+provides provides self prefix excepts mpi provide-phase-level p…
988 [(prefab-struct-key v)
[all …]
|
| H A D | serialize-state.rkt | 4 (provide (struct-out serialize-state)
20 (struct serialize-state (reachable-scopes ; the set of all reachable scopes
22 bulk-bindings-intern ; to record pruned bulk-binding lists
33 keep-provides?) ; non-#f => predicate for when to keep bulk provides
42 (make-hasheq) ; bulk-bindings-intern
|
| /dports/lang/racket/racket-8.3/src/expander/compile/ |
| H A D | serialize.rkt | 73 (provide make-module-path-index-table
95 (struct module-path-index-table (positions intern))
357 [(prefab-struct-key v)
358 (for ([e (in-vector (struct->vector v) 1)])
362 (for ([e (in-vector (struct->vector v) 1)])
530 [(prefab-struct-key v)
532 (define vec (struct->vector v))
874 …(decode* (deserialize-bulk-binding prefix excepts mpi provide-phase-level phase-shift bulk-binding…
878 …(decode* (deserialize-bulk-binding+provides provides self prefix excepts mpi provide-phase-level p…
988 [(prefab-struct-key v)
[all …]
|
| H A D | serialize-state.rkt | 4 (provide (struct-out serialize-state)
20 (struct serialize-state (reachable-scopes ; the set of all reachable scopes
22 bulk-bindings-intern ; to record pruned bulk-binding lists
33 keep-provides?) ; non-#f => predicate for when to keep bulk provides
42 (make-hasheq) ; bulk-bindings-intern
|
| /dports/multimedia/scte35dump/scte35dump-0.1.6/cargo-crates/serdebug-1.0.5/ |
| H A D | README.md | 8 …nt for `#[derive(Debug)]` that uses `serde::Serialize` under the hood to provide advanced control …
25 pub struct CustomType(u32);
39 // so does bulk rename on containers
41 pub struct MyStruct {
|
| /dports/lang/racket/racket-8.3/share/pkgs/compiler-lib/compiler/private/ |
| H A D | deserialize.rkt | 10 (provide deserialize-instance
11 (struct-out module-use)
15 (struct-out faslable-correlated-linklet)
18 (struct module-use (module phase))
19 (struct provided (binding protected? syntax?))
38 (define (deserialize mpis inspector bulk-binding-registry
136 '.bulk-binding-registry #f
|