| /dports/lang/racket/racket-8.3/src/expander/syntax/ |
| H A D | bulk-binding.rkt | 20 deserialize-bulk-binding+provides)
90 (or (bulk-binding-provides b)
103 (define provides (hash-ref (bulk-provide-provides bulk-provide)
115 (set-bulk-binding-provides! b adjusted-provides)
140 (ser-push! 'tag '#:bulk-binding+provides)
141 (ser-push! (bulk-binding-provides b))
155 (define (deserialize-bulk-binding+provides provides self prefix excepts mpi provide-phase+space pha…
156 …(bulk-binding provides prefix excepts self mpi (intern-phase+space provide-phase+space) phase-leve…
158 (define (bulk-provides-add-prefix-remove-exceptions provides prefix excepts)
178 (struct bulk-provide (self provides))
[all …]
|
| H A D | serialize.rkt | 18 [provides-namespace (current-namespace)])
24 (check who namespace? #:or-false provides-namespace)
33 #:keep-provides?
34 (if provides-namespace
36 (not (namespace->module provides-namespace modname)))
42 (and provides-namespace #t)))
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)))
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/syntax/ |
| H A D | bulk-binding.rkt | 20 deserialize-bulk-binding+provides)
90 (or (bulk-binding-provides b)
103 (define provides (hash-ref (bulk-provide-provides bulk-provide)
115 (set-bulk-binding-provides! b adjusted-provides)
140 (ser-push! 'tag '#:bulk-binding+provides)
141 (ser-push! (bulk-binding-provides b))
155 (define (deserialize-bulk-binding+provides provides self prefix excepts mpi provide-phase+space pha…
156 …(bulk-binding provides prefix excepts self mpi (intern-phase+space provide-phase+space) phase-leve…
158 (define (bulk-provides-add-prefix-remove-exceptions provides prefix excepts)
178 (struct bulk-provide (self provides))
[all …]
|
| H A D | serialize.rkt | 18 [provides-namespace (current-namespace)])
24 (check who namespace? #:or-false provides-namespace)
33 #:keep-provides?
34 (if provides-namespace
36 (not (namespace->module provides-namespace modname)))
42 (and provides-namespace #t)))
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)))
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/expand/ |
| H A D | require.rkt | 19 "../syntax/bulk-binding.rkt")
335 (add-bulk-required-ids! requires+provides
467 (bulk-callback provides provide-phase+space)))
471 (define binding/p (hash-ref provides sym #f))
480 (not can-bulk?)) ;; bulk binding added later
483 ;; Add bulk binding after all filtering
485 (define bulk-binding-registry (namespace-bulk-binding-registry ns))
486 (add-bulk-binding! (add-space-scope in-stx space)
487 (bulk-binding (or (and (not bulk-prefix)
497 provides bulk-prefix bulk-excepts)))
[all …]
|
| H A D | require+provide.rkt | 11 "../syntax/bulk-binding.rkt"
32 add-bulk-required-ids!
56 provides ; phase+space -> sym -> binding or protected
69 (struct bulk-required (provides ; extract binding info based on the sym
169 (define (add-bulk-required-ids! r+p s self nominal-module phase-level provides provide-phase+space
188 (define prefix-len (if bulk-prefix (string-length (symbol->string bulk-prefix)) 0))
189 (define br (bulk-required provides prefix-len s provide-phase+space can-be-shadowed?))
190 (for/fold ([any-already-defined? #f]) ([(out-sym binding/p) (in-hash provides)]
235 (define binding/p (hash-ref (bulk-required-provides br) out-sym))
244 (if (bulk-required? r)
[all …]
|
| /dports/lang/racket/racket-8.3/src/expander/expand/ |
| H A D | require.rkt | 19 "../syntax/bulk-binding.rkt")
335 (add-bulk-required-ids! requires+provides
467 (bulk-callback provides provide-phase+space)))
471 (define binding/p (hash-ref provides sym #f))
480 (not can-bulk?)) ;; bulk binding added later
483 ;; Add bulk binding after all filtering
485 (define bulk-binding-registry (namespace-bulk-binding-registry ns))
486 (add-bulk-binding! (add-space-scope in-stx space)
487 (bulk-binding (or (and (not bulk-prefix)
497 provides bulk-prefix bulk-excepts)))
[all …]
|
| H A D | require+provide.rkt | 11 "../syntax/bulk-binding.rkt"
32 add-bulk-required-ids!
56 provides ; phase+space -> sym -> binding or protected
69 (struct bulk-required (provides ; extract binding info based on the sym
169 (define (add-bulk-required-ids! r+p s self nominal-module phase-level provides provide-phase+space
188 (define prefix-len (if bulk-prefix (string-length (symbol->string bulk-prefix)) 0))
189 (define br (bulk-required provides prefix-len s provide-phase+space can-be-shadowed?))
190 (for/fold ([any-already-defined? #f]) ([(out-sym binding/p) (in-hash provides)]
235 (define binding/p (hash-ref (bulk-required-provides br) out-sym))
244 (if (bulk-required? r)
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/compile/ |
| H A D | serialize.rkt | 13 "../syntax/bulk-binding.rkt"
239 provides
284 (define bulk-shifts (and keep-provides? (list (make-hasheq))))
770 [(#:bulk-binding-registry) (values bulk-binding-registry (add1 pos))]
855 [(#:bulk-binding-at)
856 (decode* (deserialize-bulk-binding-at scopes bulk))]
873 [(#:bulk-binding)
874 …(decode* (deserialize-bulk-binding prefix excepts mpi provide-phase-level phase-shift bulk-binding…
877 [(#:bulk-binding+provides)
878 …(decode* (deserialize-bulk-binding+provides provides self prefix excepts mpi provide-phase-level p…
[all …]
|
| H A D | serialize-state.rkt | 21 bindings-intern ; to record pruned binding tables
22 bulk-bindings-intern ; to record pruned bulk-binding lists
33 keep-provides?) ; non-#f => predicate for when to keep bulk provides
38 keep-provides?)
42 (make-hasheq) ; bulk-bindings-intern
53 keep-provides?))
|
| /dports/lang/racket/racket-8.3/src/expander/compile/ |
| H A D | serialize.rkt | 13 "../syntax/bulk-binding.rkt"
239 provides
284 (define bulk-shifts (and keep-provides? (list (make-hasheq))))
770 [(#:bulk-binding-registry) (values bulk-binding-registry (add1 pos))]
855 [(#:bulk-binding-at)
856 (decode* (deserialize-bulk-binding-at scopes bulk))]
873 [(#:bulk-binding)
874 …(decode* (deserialize-bulk-binding prefix excepts mpi provide-phase-level phase-shift bulk-binding…
877 [(#:bulk-binding+provides)
878 …(decode* (deserialize-bulk-binding+provides provides self prefix excepts mpi provide-phase-level p…
[all …]
|
| H A D | serialize-state.rkt | 21 bindings-intern ; to record pruned binding tables
22 bulk-bindings-intern ; to record pruned bulk-binding lists
33 keep-provides?) ; non-#f => predicate for when to keep bulk provides
38 keep-provides?)
42 (make-hasheq) ; bulk-bindings-intern
53 keep-provides?))
|
| /dports/lang/racket/racket-8.3/share/pkgs/racket-doc/scribblings/reference/ |
| H A D | stx-serialize.scrbl | 10 … [#:provides-namespace provides-namespace (or/c namespace? #f) (current-namespace)]
17 then writing the compiled form, @racket[syntax-serialize] provides
31 the serialized syntax object can rely on @deftech{bulk
32 bindings}, which are shared binding tables provided by
33 exporting modules. If @racket[provides-namespace] is
34 @racket[#f], then complete binding information is recorded in
35 the syntax object's serialized form, and no bulk bindings will
37 bulk bindings will be used only for modules declared in
38 @racket[provides-namespace] (i.e., the deserialize-time
45 @tech{module path index} to which binding information in
[all …]
|
| /dports/lang/racket/racket-8.3/src/expander/namespace/ |
| H A D | module.rkt | 5 "../syntax/bulk-binding.rkt"
23 module-force-bulk-binding!
64 … provides ; phase-level -> sym -> binding or (provided binding bool bool); see [*] below
70 force-bulk-binding ; bulk-binding-registry -> any
107 #:force-bulk-binding-callback [force-bulk-binding void]
127 force-bulk-binding
210 (register-bulk-provide! (namespace-bulk-binding-registry ns)
374 ;; bulk-binding regsitry
375 (define (module-force-bulk-binding! m ns)
376 ((module-force-bulk-binding m) (namespace-bulk-binding-registry ns)))
[all …]
|
| H A D | primitive-module.rkt | 3 "../syntax/module-binding.rkt"
22 #:provides
24 (define binding (make-module-binding mpi 0 sym))
27 (provided binding #t #f)
28 binding))))
30 (lambda (data-box ns phase-shift phase-level self bulk-binding-registry insp)
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/namespace/ |
| H A D | module.rkt | 5 "../syntax/bulk-binding.rkt"
23 module-force-bulk-binding!
64 … provides ; phase-level -> sym -> binding or (provided binding bool bool); see [*] below
70 force-bulk-binding ; bulk-binding-registry -> any
107 #:force-bulk-binding-callback [force-bulk-binding void]
127 force-bulk-binding
210 (register-bulk-provide! (namespace-bulk-binding-registry ns)
374 ;; bulk-binding regsitry
375 (define (module-force-bulk-binding! m ns)
376 ((module-force-bulk-binding m) (namespace-bulk-binding-registry ns)))
[all …]
|
| H A D | primitive-module.rkt | 3 "../syntax/module-binding.rkt"
22 #:provides
24 (define binding (make-module-binding mpi 0 sym))
27 (provided binding #t #f)
28 binding))))
30 (lambda (data-box ns phase-shift phase-level self bulk-binding-registry insp)
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/eval/ |
| H A D | module.rkt | 99 (define provides (decl 'provides))
152 #:force-bulk-binding-callback
153 (lambda (bulk-binding-registry)
154 ;; Avoids a leak of some namespace's bulk-binding registry into the
156 ;; a namespace's bulk-binding registry to get saved by the module's
160 (lambda (data-box ns phase-shift self bulk-binding-registry insp)
263 phase-shift original-self self bulk-binding-registry insp
266 (force-syntax-deserialize syntax-literals-data-instance bulk-binding-registry))
274 #:bulk-binding-registry bulk-binding-registry
311 (define (force-syntax-deserialize syntax-literals-data-instance bulk-binding-registry)
[all …]
|
| /dports/lang/racket/racket-8.3/src/expander/eval/ |
| H A D | module.rkt | 99 (define provides (decl 'provides))
152 #:force-bulk-binding-callback
153 (lambda (bulk-binding-registry)
154 ;; Avoids a leak of some namespace's bulk-binding registry into the
156 ;; a namespace's bulk-binding registry to get saved by the module's
160 (lambda (data-box ns phase-shift self bulk-binding-registry insp)
263 phase-shift original-self self bulk-binding-registry insp
266 (force-syntax-deserialize syntax-literals-data-instance bulk-binding-registry))
274 #:bulk-binding-registry bulk-binding-registry
311 (define (force-syntax-deserialize syntax-literals-data-instance bulk-binding-registry)
[all …]
|
| /dports/databases/soci/soci-4.0.1/docs/backends/ |
| H A D | odbc.md | 52 (See the [connection](../connections.md) and [data binding](../binding.md) documentation for genera…
72 (See the [dynamic resultset binding](../types.md#dynamic-binding) documentation for general informa…
76 …n addition to [binding by position](../binding.md#binding-by-position), the ODBC backend supports …
93 …ckend has support for SOCI's [bulk operations](../binding.md#bulk-operations) interface. Not all …
124 SOCI provides access to underlying datbabase APIs via several getBackEnd() functions, as described …
126 The ODBC backend provides the following concrete classes for navite API access:
163 The `odbc_session_backend` class provides `std::string get_connection_string() const` method
|
| H A D | postgresql.md | 66 * bulk queries are not supported, and
81 (See the [connection](../connections.md) and [data binding](../binding.md) documentation for genera…
100 (See the [dynamic resultset binding](../types.md#dynamic-binding) documentation for general informa…
104 …ddition to [binding by position](../binding.md#binding-by-position), the PostgreSQL backend suppor…
113 The PostgreSQL backend has full support for SOCI's [bulk operations](../binding.md#bulk-operations)…
137 SOCI provides access to underlying datbabase APIs via several `get_backend()` functions, as describ…
139 The PostgreSQL backend provides the following concrete classes for navite API access:
|
| H A D | firebird.md | 63 (See the [connection](../connections.md) and [data binding](../binding.md) documentation
88 (See the [dynamic resultset binding](../types.md#dynamic-binding) documentation for general informa…
93 In addition to [binding by position](../binding.md#binding-by-position), the Firebird backend suppo…
94 [binding by name](../binding.md#binding-by-name), via an overload of the `use()` function:
101 It should be noted that parameter binding by name is supported only by means of emulation,
106 The Firebird backend has full support for SOCI [bulk operations](../binding.md#bulk-operations) int…
140 SOCI provides access to underlying datbabase APIs via several `get_backend()` functions,
143 The Firebird backend provides the following concrete classes for navite API access:
|
| /dports/lang/racket/racket-8.3/share/pkgs/compiler-lib/compiler/ |
| H A D | decompile.rkt | 112 (deserialize-requires-and-provides l))
128 (for/list ([(phase ht) (in-hash provides)])
521 (define (decompile-deserialize mpis inspector bulk-binding-registry
573 (decode result-vec 0 mpis inspector bulk-binding-registry shared))
593 (define (decode vec pos mpis inspector bulk-binding-registry shared)
614 [(#:bulk-binding-registry) (values bulk-binding-registry (add1 pos))]
691 [(#:bulk-binding-at)
692 (decode* (deserialize-bulk-binding-at scopes bulk))]
709 [(#:bulk-binding)
710 …(decode* (deserialize-bulk-binding prefix excepts mpi provide-phase-level phase-shift bulk-binding…
[all …]
|
| /dports/lang/racket/racket-8.3/src/expander/boot/ |
| H A D | kernel.rkt | 8 "../syntax/binding.rkt"
74 #:provides
78 (define binding (make-module-binding mpi 0 sym))
82 (provided binding #t #f)
83 binding))))
85 (lambda (data-box ns phase-shift phase-level self bulk-binding-registry insp)
103 #:provides
110 [(sym binding) (in-hash
112 (shift-provides-module-path-index
113 (module-provides m)
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/boot/ |
| H A D | kernel.rkt | 8 "../syntax/binding.rkt"
74 #:provides
78 (define binding (make-module-binding mpi 0 sym))
82 (provided binding #t #f)
83 binding))))
85 (lambda (data-box ns phase-shift phase-level self bulk-binding-registry insp)
103 #:provides
110 [(sym binding) (in-hash
112 (shift-provides-module-path-index
113 (module-provides m)
[all …]
|