Home
last modified time | relevance | path

Searched +refs:struct +refs:liberal +refs:define +refs:context (Results 1 – 25 of 470) sorted by relevance

12345678910>>...19

/dports/lang/racket/racket-8.3/src/expander/expand/
H A Dliberal-def-ctx.rkt3 (provide prop:liberal-define-context
4 (rename-out [has-liberal-define-context-property? liberal-define-context?])
5 make-liberal-define-context)
7 (define-values (prop:liberal-define-context has-liberal-define-context-property? liberal-define-con…
8 (make-struct-type-property 'liberal-define-context))
10 (struct liberal-define-context ()
11 #:property prop:liberal-define-context #t
12 #:constructor-name make-liberal-define-context)
H A Dbody.rkt2 (require "../common/struct-star.rkt"
18 "liberal-def-ctx.rkt"
43 (define phase (expand-context-phase ctx))
49 (define body-ctx (struct*-copy expand-context ctx
50 [context (list (make-liberal-define-context))]
69 (define name (expand-context-name ctx))
101 (struct*-copy expand-context body-ctx
141 (loop (struct*-copy expand-context body-ctx
198 (loop (struct*-copy expand-context body-ctx
267 …(define finish-ctx (struct*-copy expand-context (accumulate-def-ctx-scopes body-ctx def-ctx-scopes)
[all …]
H A Dmain.rkt3 "../common/struct-star.rkt"
31 "liberal-def-ctx.rkt"
423 (define m-ctx (struct*-copy expand-context accum-ctx
494 (struct*-copy expand-context ctx
563 (define context (expand-context-context ctx))
576 (define capture-ctx (struct*-copy expand-context ctx
631 (define trans-ctx (context->transformer-context ctx context
639 (define (context->transformer-context ctx [context 'expression]
645 (struct*-copy expand-context ctx
798 (struct*-copy expand-context rhs-ctx
[all …]
/dports/lang/racket-minimal/racket-8.3/src/expander/expand/
H A Dliberal-def-ctx.rkt3 (provide prop:liberal-define-context
4 (rename-out [has-liberal-define-context-property? liberal-define-context?])
5 make-liberal-define-context)
7 (define-values (prop:liberal-define-context has-liberal-define-context-property? liberal-define-con…
8 (make-struct-type-property 'liberal-define-context))
10 (struct liberal-define-context ()
11 #:property prop:liberal-define-context #t
12 #:constructor-name make-liberal-define-context)
H A Dbody.rkt2 (require "../common/struct-star.rkt"
18 "liberal-def-ctx.rkt"
43 (define phase (expand-context-phase ctx))
49 (define body-ctx (struct*-copy expand-context ctx
50 [context (list (make-liberal-define-context))]
69 (define name (expand-context-name ctx))
101 (struct*-copy expand-context body-ctx
141 (loop (struct*-copy expand-context body-ctx
198 (loop (struct*-copy expand-context body-ctx
267 …(define finish-ctx (struct*-copy expand-context (accumulate-def-ctx-scopes body-ctx def-ctx-scopes)
[all …]
H A Dmain.rkt3 "../common/struct-star.rkt"
31 "liberal-def-ctx.rkt"
423 (define m-ctx (struct*-copy expand-context accum-ctx
494 (struct*-copy expand-context ctx
563 (define context (expand-context-context ctx))
576 (define capture-ctx (struct*-copy expand-context ctx
631 (define trans-ctx (context->transformer-context ctx context
639 (define (context->transformer-context ctx [context 'expression]
645 (struct*-copy expand-context ctx
798 (struct*-copy expand-context rhs-ctx
[all …]
/dports/lang/racket/racket-8.3/collects/syntax/
H A Dcontext.rkt3 (provide build-expand-context
4 generate-expand-context)
6 (define (build-expand-context v)
7 (let ([c (syntax-local-context)])
12 (struct in-liberal-define-context ()
13 #:property prop:liberal-define-context #t)
15 (define (generate-expand-context [liberal-definitions? #f])
16 (build-expand-context (if liberal-definitions?
17 (in-liberal-define-context)
18 (gensym 'internal-define))))
/dports/lang/racket-minimal/racket-8.3/collects/syntax/
H A Dcontext.rkt3 (provide build-expand-context
4 generate-expand-context)
6 (define (build-expand-context v)
7 (let ([c (syntax-local-context)])
12 (struct in-liberal-define-context ()
13 #:property prop:liberal-define-context #t)
15 (define (generate-expand-context [liberal-definitions? #f])
16 (build-expand-context (if liberal-definitions?
17 (in-liberal-define-context)
18 (gensym 'internal-define))))
/dports/lang/racket-minimal/racket-8.3/src/expander/boot/
H A Dcore-primitive.rkt17 "../expand/liberal-def-ctx.rkt"
35 (define-syntax-rule (add-core-primitives! #:table primitive-ids id/maybe-protected ...)
37 (define primitive-ids (seteq (quote-core id/maybe-protected) ...))
43 (define-syntax quote-core
48 (define-syntax add-a-core-primitive!
105 struct:exn:fail:syntax
110 struct:exn:fail:syntax:unbound
119 struct:exn:fail:filesystem:missing-module
124 struct:exn:fail:syntax:missing-module
195 prop:liberal-define-context
[all …]
/dports/lang/racket/racket-8.3/src/expander/boot/
H A Dcore-primitive.rkt17 "../expand/liberal-def-ctx.rkt"
35 (define-syntax-rule (add-core-primitives! #:table primitive-ids id/maybe-protected ...)
37 (define primitive-ids (seteq (quote-core id/maybe-protected) ...))
43 (define-syntax quote-core
48 (define-syntax add-a-core-primitive!
105 struct:exn:fail:syntax
110 struct:exn:fail:syntax:unbound
119 struct:exn:fail:filesystem:missing-module
124 struct:exn:fail:syntax:missing-module
195 prop:liberal-define-context
[all …]
/dports/lang/racket/racket-8.3/collects/racket/contract/private/
H A Dhelpers.rkt4 build-struct-names
5 lookup-struct-info
15 racket/struct-info
24 ;; lookup-struct-info : syntax -> struct-info?
25 (define (lookup-struct-info stx provide-stx)
36 (if (struct-info? v)
145 (define build-struct-names
181 (define cm
299 (internal-definition-context? . #t)
301 (liberal-define-context? . #t)
[all …]
/dports/lang/racket-minimal/racket-8.3/collects/racket/contract/private/
H A Dhelpers.rkt4 build-struct-names
5 lookup-struct-info
15 racket/struct-info
24 ;; lookup-struct-info : syntax -> struct-info?
25 (define (lookup-struct-info stx provide-stx)
36 (if (struct-info? v)
145 (define build-struct-names
181 (define cm
299 (internal-definition-context? . #t)
301 (liberal-define-context? . #t)
[all …]
/dports/lang/racket/racket-8.3/share/pkgs/racket-doc/scribblings/reference/
H A Dstx-trans.scrbl73 @defthing[prop:set!-transformer struct-type-property?]{
187 @defthing[prop:rename-transformer struct-type-property?]{
221 (struct slv-cooperator (redirect-to-first?)
327 @tech{liberal expansion} of @racket[define] forms, the generated value
329 @racket[prop:liberal-define-context]. If the internal-definition
1326 @defthing[prop:liberal-define-context struct-type-property?]
1327 @defproc[(liberal-define-context? [v any/c]) boolean?]
1331 @racket[prop:liberal-define-context] property can be used as an
1335 supports @deftech{liberal expansion} of @racket[define] forms into
1341 The @racket[liberal-define-context?] predicate returns @racket[#t] if
[all …]
H A Dsyntax.scrbl975 (struct-out id)
1127 (provide (struct-out egg))
1128 (struct egg (color wt)))
1367 (#,(racketidfont "struct") struct-id (field-id ...))
1389 A @racket[(#,(racketidfont "struct") struct-id (field-id ...))]
1390 sub-form expands to @racket[struct-id],
1391 @racketidfont{make-}@racket[struct-id],
1392 @racketidfont{struct:}@racket[struct-id],
1393 @racket[struct-id]@racketidfont{?},
2529 In an @tech{internal-definition context}, a @racket[define] form
[all …]
/dports/lang/racket-minimal/racket-8.3/src/bc/src/
H A Dstartup.inc44487 "(1/prop:liberal-define-context has-liberal-define-context-property? liberal-define-context-value)"
44488 "(make-struct-type-property 'liberal-define-context))"
44490 "(struct:liberal-define-context make-liberal-define-context 1/liberal-define-context?)"
44495 " 'liberal-define-context"
44500 "(list(cons 1/prop:liberal-define-context #t))"
44505 " 'make-liberal-define-context)))))"
66853 " 'prop:liberal-define-context"
66854 " 'liberal-define-context?"
67183 "((prop:liberal-define-context245_0) 1/prop:liberal-define-context))"
67185 "(let-values(((temp246_0) 'liberal-define-context?)"
[all …]
/dports/lang/racket/racket-8.3/src/bc/src/
H A Dstartup.inc44487 "(1/prop:liberal-define-context has-liberal-define-context-property? liberal-define-context-value)"
44488 "(make-struct-type-property 'liberal-define-context))"
44490 "(struct:liberal-define-context make-liberal-define-context 1/liberal-define-context?)"
44495 " 'liberal-define-context"
44500 "(list(cons 1/prop:liberal-define-context #t))"
44505 " 'make-liberal-define-context)))))"
66853 " 'prop:liberal-define-context"
66854 " 'liberal-define-context?"
67183 "((prop:liberal-define-context245_0) 1/prop:liberal-define-context))"
67185 "(let-values(((temp246_0) 'liberal-define-context?)"
[all …]
/dports/lang/racket/racket-8.3/doc/syntax/
H A Dblueboxes.rktd9 parse-option = #:context context-expr
38 #:context context-expr
238 #s(prefab-struct-key pattern-part ...)
457     #:context context      
1472 struct
1531 (generate-expand-context [liberal-definitions?]) -> list?
1532   liberal-definitions? : boolean? = #f
1561 (parse-define-struct stx orig-stx) -> identifier?
1657   make-make-struct-type : procedure?
1965     #:context context      
[all …]
/dports/lang/racket/racket-8.3/collects/racket/private/
H A Dkw.rkt151 ;; `core` is flattened into the definition context as described
191 ;; definition context. That way, uses of the `f` macro can typically
207 (define-values (struct:keyword-procedure mk-kw-proc keyword-procedure?
215 (define keyword-procedure-checker (make-struct-field-accessor keyword-procedure-ref 0))
216 (define keyword-procedure-proc (make-struct-field-accessor keyword-procedure-ref 1))
220 (define-values (struct:keyword-method make-km keyword-method? km-ref km-set!)
284 (define-values (struct:okp make-optional-keyword-procedure okp? okp-ref okp-set!)
292 (define-values (struct:okm make-optional-keyword-method okm? okm-ref okm-set!)
873 (if (eq? (syntax-local-context) 'expression)
1127 (let ([ctx (syntax-local-context)])
[all …]
/dports/lang/racket-minimal/racket-8.3/collects/racket/private/
H A Dkw.rkt151 ;; `core` is flattened into the definition context as described
191 ;; definition context. That way, uses of the `f` macro can typically
207 (define-values (struct:keyword-procedure mk-kw-proc keyword-procedure?
215 (define keyword-procedure-checker (make-struct-field-accessor keyword-procedure-ref 0))
216 (define keyword-procedure-proc (make-struct-field-accessor keyword-procedure-ref 1))
220 (define-values (struct:keyword-method make-km keyword-method? km-ref km-set!)
284 (define-values (struct:okp make-optional-keyword-procedure okp? okp-ref okp-set!)
292 (define-values (struct:okm make-optional-keyword-method okm? okm-ref okm-set!)
873 (if (eq? (syntax-local-context) 'expression)
1127 (let ([ctx (syntax-local-context)])
[all …]
/dports/lang/racket/racket-8.3/doc/reference/
H A Dblueboxes.rktd5190 (define-struct id-maybe-super (field ...)
5201 (define-struct/derived (id . rest-form)
6172 (define-unit-from-context id tagged-sig-spec)
6690 (define-contract-struct id (field-id ...))
6745 (define-struct/contract struct-id ([field contract-expr] ...)
6747 (define-struct/contract (struct-id super-struct-id)
6761   context-limit)
9246 prop:liberal-define-context : struct-type-property?
9248 (liberal-define-context? v) -> boolean?
11099 (define-serializable-struct id-maybe-super (field ...)
[all …]
/dports/mail/libspf/libspf-1.0.0-p5/patches/Postfix/2.1.x/
H A Dpostfix-2.1.4-libspf-1.0-RC6.diff286 * command with a 501 response. So much for the principle of "be liberal
296 * command with a 501 response. So much for the principle of "be liberal
307 * command with a 501 response. So much for the principle of "be liberal
317 * command with a 501 response. So much for the principle of "be liberal
422 * attributes. This requires making "state" a context attribute of the
432 * attributes. This requires making "state" a context attribute of the
780 * immediately, outside any particular mail transaction context. For
790 * immediately, outside any particular mail transaction context. For
1198 *************** typedef struct SMTPD_STATE {
1218 #define SMTPD_PEER_CODE_PERM 5
[all …]
/dports/security/sequoia/sequoia-383133f6be990237044900a4df676488bf8dd71e/cargo-crates/nettle-src-3.5.1-2/nettle/
H A Dnettle.info280 on the context. The context struct encapsulates all information needed
329 #define BUF_SIZE 1000
659 Initialize the context struct.
2020 It can be used to define a CBC context struct, either directly,
2240 conventions. The last three arguments define the source and
2247 conventions. The last three arguments define the source and
2449 may implement more liberal conventions. The CCM mode is a bit special
2553 This defines an all-in-one context struct, including the context of
2717 This defines an all-in-one context struct, including the context of
3376 It can be used to define a HMAC context struct, either directly,
[all …]
H A Dnettle.texinfo296 operating on the context. The context struct encapsulates all information
655 Initialize the context struct.
2085 It can be used to define a @acronym{CBC} context struct, either directly,
2188 last three arguments define the source and destination area for the
2301 last three arguments define the source and destination area for the
2309 last three arguments define the source and destination area for the
2548 @acronym{AEAD} may implement more liberal conventions. The @acronym{CCM}
2650 This defines an all-in-one context struct, including the context of the
2824 This defines an all-in-one context struct, including the context of the
3449 It can be used to define a @acronym{HMAC} context struct, either
[all …]
/dports/security/nettle/nettle-3.7.3/
H A Dnettle.info291 on the context. The context struct encapsulates all information needed
340 #define BUF_SIZE 1000
671 Initialize the context struct.
2264 It can be used to define a CBC context struct, either directly,
2484 conventions. The last three arguments define the source and
2491 conventions. The last three arguments define the source and
2693 may implement more liberal conventions. The CCM mode is a bit special
2798 This defines an all-in-one context struct, including the context of
2962 This defines an all-in-one context struct, including the context of
3714 It can be used to define a HMAC context struct, either directly,
[all …]
H A Dnettle.texinfo307 operating on the context. The context struct encapsulates all information
667 Initialize the context struct.
2346 It can be used to define a @acronym{CBC} context struct, either directly,
2449 last three arguments define the source and destination area for the
2562 last three arguments define the source and destination area for the
2570 last three arguments define the source and destination area for the
2809 @acronym{AEAD} may implement more liberal conventions. The @acronym{CCM}
2912 This defines an all-in-one context struct, including the context of the
3086 This defines an all-in-one context struct, including the context of the
3801 It can be used to define a @acronym{HMAC} context struct, either
[all …]

12345678910>>...19