/dports/lang/racket-minimal/racket-8.3/src/expander/expand/ |
H A D | lift-key.rkt | 3 ;; A lift key represents a target for lifting, such as a particular 6 (provide generate-lift-key) 8 (define (generate-lift-key) 9 (gensym 'lift))
|
H A D | local-expand.rkt | 16 "lift-key.rkt" 29 (define (local-expand/capture-lifts s context stop-ids [intdefs #f] [lift-key (generate-lift-key)]) 32 #:lift-key lift-key)) 38 …al-transformer-expand/capture-lifts s context stop-ids [intdefs #f] [lift-key (generate-lift-key)]) 42 #:lift-key lift-key)) 73 #:lift-key [lift-key (and (or capture-lifts? 75 (generate-lift-key))] 131 #:lift-key lift-key 139 #:lift-key lift-key 144 #:lift-key lift-key
|
H A D | top.rkt | 18 "lift-context.rkt" 19 "lift-key.rkt" 62 (define lift-ctx (make-lift-context 63 (make-top-level-lift trans-ctx))) 65 [lift-key #:parent root-expand-context (generate-lift-key)] 66 [lifts lift-ctx])) 81 (define lifts (get-and-clear-lifts! lift-ctx)) 86 (log-expand ctx 'module-lift-loop lifts)
|
H A D | root-expand-context.rkt | 8 "lift-key.rkt") 35 lift-key ; identifies (via `syntax-local-lift-context`) a target for lifts 56 (generate-lift-key))) 113 (generate-lift-key)))
|
H A D | context.rkt | 13 "lift-key.rkt") 63 lifts ; #f or lift-context, which contains a list of lifteds 64 lift-envs ; list of box of env for lifts to locals 93 (root-expand-context-lift-key root-ctx) 115 '() ; lift-envs 139 [lift-key #:parent root-expand-context (root-expand-context-lift-key root-ctx)] 216 ;; Adjust `ctx` to to generate a parsed result
|
H A D | main.rkt | 29 "lift-context.rkt" 34 "lift-key.rkt" 517 (expand-context-lift-envs ctx) 552 (reference-record-used! (binding-frame-id binding) (local-binding-key binding)))) 561 #:lift-key [lift-key (generate-lift-key)] 568 (define lift-env (and local? (box empty-env))) 569 (define lift-ctx (make-lift-context 571 (make-local-lift lift-env 577 [lift-key #:parent root-expand-context lift-key] 625 #:lift-key [lift-key (generate-lift-key)] [all …]
|
/dports/lang/racket/racket-8.3/src/expander/expand/ |
H A D | lift-key.rkt | 3 ;; A lift key represents a target for lifting, such as a particular 6 (provide generate-lift-key) 8 (define (generate-lift-key) 9 (gensym 'lift))
|
H A D | local-expand.rkt | 16 "lift-key.rkt" 29 (define (local-expand/capture-lifts s context stop-ids [intdefs #f] [lift-key (generate-lift-key)]) 32 #:lift-key lift-key)) 38 …al-transformer-expand/capture-lifts s context stop-ids [intdefs #f] [lift-key (generate-lift-key)]) 42 #:lift-key lift-key)) 73 #:lift-key [lift-key (and (or capture-lifts? 75 (generate-lift-key))] 131 #:lift-key lift-key 139 #:lift-key lift-key 144 #:lift-key lift-key
|
H A D | top.rkt | 18 "lift-context.rkt" 19 "lift-key.rkt" 62 (define lift-ctx (make-lift-context 63 (make-top-level-lift trans-ctx))) 65 [lift-key #:parent root-expand-context (generate-lift-key)] 66 [lifts lift-ctx])) 81 (define lifts (get-and-clear-lifts! lift-ctx)) 86 (log-expand ctx 'module-lift-loop lifts)
|
H A D | root-expand-context.rkt | 8 "lift-key.rkt") 35 lift-key ; identifies (via `syntax-local-lift-context`) a target for lifts 56 (generate-lift-key))) 113 (generate-lift-key)))
|
H A D | context.rkt | 13 "lift-key.rkt") 63 lifts ; #f or lift-context, which contains a list of lifteds 64 lift-envs ; list of box of env for lifts to locals 93 (root-expand-context-lift-key root-ctx) 115 '() ; lift-envs 139 [lift-key #:parent root-expand-context (root-expand-context-lift-key root-ctx)] 216 ;; Adjust `ctx` to to generate a parsed result
|
H A D | main.rkt | 29 "lift-context.rkt" 34 "lift-key.rkt" 517 (expand-context-lift-envs ctx) 552 (reference-record-used! (binding-frame-id binding) (local-binding-key binding)))) 561 #:lift-key [lift-key (generate-lift-key)] 568 (define lift-env (and local? (box empty-env))) 569 (define lift-ctx (make-lift-context 571 (make-local-lift lift-env 577 [lift-key #:parent root-expand-context lift-key] 625 #:lift-key [lift-key (generate-lift-key)] [all …]
|
/dports/lang/racket/racket-8.3/share/pkgs/htdp-lib/2htdp/ |
H A D | planetcute.rkt | 21 (let* ([key (syntax-local-lift-context)] 22 [id (generate-temporary)] 25 (or (hash-ref saved-id-table key #f) 26 ;; No: lift the require for the image: 27 … (syntax-local-lift-require `(rename (lib ,(format "~a.rkt" img) "2htdp" "planetcute") ,id ,img) 29 (when key (hash-set! saved-id-table key lifted-id)) 45 ;; contexts, delay expansion until it's a good time to lift
|
/dports/security/p5-Crypt-RSA/Crypt-RSA-1.99/lib/Crypt/RSA/ |
H A D | Key.pm | 40 sub generate { subroutine 44 my $key; 60 $key = rsaparams ( Size => $size, Verbosity => $verbosity ); 61 my $n = $$key{p} * $$key{q}; 82 $pubkey->e ($$key{e} || $params{e}); 83 $prikey->e ($$key{e} || $params{e}); 84 $prikey->p ($$key{p} || $params{p}); 90 $prikey->d (lift($m/$pubkey->e)); 101 $$key{p} = 0; $$key{q} = 0; $$key{e} = 0; $m = 0; 116 lift($m / $a);
|
/dports/math/gp2c/gp2c-0.0.12/test/gp/ |
H A D | read.gp | 2 addhelp(randprime,"randprime(N): generate a random prime number < 2^N") 3 powmod(a,b,c)=lift(Mod(a,c)^b) 13 addhelp(buildkey,"buildkey(N): compute a random El Gamal key of N bits"); 14 crypt(data,key)= 16 local(y,Ax=key[1],A=key[2],P=key[3]); 22 decrypt(data,key)= 24 local(Axy,Ay=data[2],x=key[1],P=key[2]);
|
/dports/lang/racket/racket-8.3/collects/racket/contract/private/ |
H A D | opters.rkt | 17 (let* ((lift-var (car (generate-temporaries (syntax (lift))))) 18 (partial-var (car (generate-temporaries (syntax (partial)))))) 136 (append lift-ps lift-from-hos) 497 (let*-values ([(dom-vars rng-vars) (values (generate-temporaries doms) 498 (generate-temporaries rngs))] 586 [(dom-vars ...) (generate-temporaries dom-vars)] 587 [(cont-mark-value) (generate-temporaries '(cont-mark-value))]) 605 opt->/c-cm-key 619 (cons opt->/c-cm-key cont-mark-value) 641 (let*-values ([(dom-vars) (generate-temporaries doms)] [all …]
|
/dports/lang/racket-minimal/racket-8.3/collects/racket/contract/private/ |
H A D | opters.rkt | 17 (let* ((lift-var (car (generate-temporaries (syntax (lift))))) 18 (partial-var (car (generate-temporaries (syntax (partial)))))) 136 (append lift-ps lift-from-hos) 497 (let*-values ([(dom-vars rng-vars) (values (generate-temporaries doms) 498 (generate-temporaries rngs))] 586 [(dom-vars ...) (generate-temporaries dom-vars)] 587 [(cont-mark-value) (generate-temporaries '(cont-mark-value))]) 605 opt->/c-cm-key 619 (cons opt->/c-cm-key cont-mark-value) 641 (let*-values ([(dom-vars) (generate-temporaries doms)] [all …]
|
/dports/misc/cheat/cheat-4.2.2/vendor/github.com/alecthomas/chroma/lexers/r/ |
H A D | racket.go | 66 …rec`, `match-letrec-values`, `match/derived`, `match/values`, `member-name-key`, `mixin`, `module`… 67 …key`, `chaperone-contract-property?`, `chaperone-contract?`, `chaperone-evt`, `chaperone-hash`, `c…
|
/dports/misc/cheat/cheat-4.2.2/vendor/github.com/alecthomas/chroma/chroma-0.9.1/lexers/r/ |
H A D | racket.go | 66 …rec`, `match-letrec-values`, `match/derived`, `match/values`, `member-name-key`, `mixin`, `module`… 67 …key`, `chaperone-contract-property?`, `chaperone-contract?`, `chaperone-evt`, `chaperone-hash`, `c…
|
/dports/www/gitlab-workhorse/gitlab-foss-0a901d60f8ae4a60c04ae82e6e9c3a03e9321417/workhorse/vendor/github.com/alecthomas/chroma/lexers/r/ |
H A D | racket.go | 62 …rec`, `match-letrec-values`, `match/derived`, `match/values`, `member-name-key`, `mixin`, `module`… 63 …key`, `chaperone-contract-property?`, `chaperone-contract?`, `chaperone-evt`, `chaperone-hash`, `c…
|
/dports/devel/gh/cli-2.4.0/vendor/github.com/alecthomas/chroma/lexers/r/ |
H A D | racket.go | 62 …rec`, `match-letrec-values`, `match/derived`, `match/values`, `member-name-key`, `mixin`, `module`… 63 …key`, `chaperone-contract-property?`, `chaperone-contract?`, `chaperone-evt`, `chaperone-hash`, `c…
|
/dports/www/gitea/gitea-1.16.5/vendor/github.com/alecthomas/chroma/lexers/r/ |
H A D | racket.go | 66 …rec`, `match-letrec-values`, `match/derived`, `match/values`, `member-name-key`, `mixin`, `module`… 67 …key`, `chaperone-contract-property?`, `chaperone-contract?`, `chaperone-evt`, `chaperone-hash`, `c…
|
/dports/sysutils/chezmoi/chezmoi-2.9.3/vendor/github.com/alecthomas/chroma/lexers/r/ |
H A D | racket.go | 66 …rec`, `match-letrec-values`, `match/derived`, `match/values`, `member-name-key`, `mixin`, `module`… 67 …key`, `chaperone-contract-property?`, `chaperone-contract?`, `chaperone-evt`, `chaperone-hash`, `c…
|
/dports/www/gohugo/hugo-0.91.2/vendor/github.com/alecthomas/chroma/lexers/r/ |
H A D | racket.go | 66 …rec`, `match-letrec-values`, `match/derived`, `match/values`, `member-name-key`, `mixin`, `module`… 67 …key`, `chaperone-contract-property?`, `chaperone-contract?`, `chaperone-evt`, `chaperone-hash`, `c…
|
/dports/devel/chroma/chroma-0.9.2/lexers/r/ |
H A D | racket.go | 66 …rec`, `match-letrec-values`, `match/derived`, `match/values`, `member-name-key`, `mixin`, `module`… 67 …key`, `chaperone-contract-property?`, `chaperone-contract?`, `chaperone-evt`, `chaperone-hash`, `c…
|