Home
last modified time | relevance | path

Searched refs:rhss (Results 1 – 25 of 257) sorted by relevance

1234567891011

/dports/lang/racket-minimal/racket-8.3/src/schemify/
H A Dletrec.rkt15 (define (letrec-splitable-values-binding? idss rhss)
18 (wrap-pair? (car rhss))
19 (eq? 'values (wrap-car (car rhss)))
20 (= (length (wrap-cdr (car rhss)))
22 (for/and ([rhs (in-list (wrap-cdr (car rhss)))])
25 (define (letrec-split-values-binding idss rhss bodys)
27 [rhs (in-list (wrap-cdr (car rhss)))])
44 [`(,_ ([,ids ,rhss] ...) . ,body)
48 [rhs (in-list rhss)])
H A Dleft-to-right.rkt18 (define (left-to-right/let ids rhss bodys
25 `(let ([,(car ids) ,(car rhss)]) . ,bodys)]
27 (let loop ([ids ids] [rhss rhss] [all-simple? #t] [binds null])
29 [(null? (cdr rhss))
31 (define rhs (car rhss))
41 (define rhs (car rhss))
44 (cdr rhss)
59 (let loop ([idss idss] [rhss rhss] [binds null])
61 [(null? (cdr rhss))
63 (car idss) (car rhss)
[all …]
H A Dxify.rkt22 [`(let ([,ids ,rhss] ...) . ,body)
23 (xify-let 'let ids rhss body env)]
24 [`(letrec ([,ids ,rhss] ...) . ,body)
25 (xify-let 'letrec ids rhss body env)]
26 [`(letrec* ([,ids ,rhss] ...) . ,body)
27 (xify-let 'letrec* ids rhss body env)]
55 (define (xify-let form ids rhss body env)
58 [rhs (in-list rhss)])
H A Dsimple.rkt62 [`(let-values ([,idss ,rhss] ...) ,body)
65 [rhs (in-list rhss)])
68 [`(let ([,_ ,rhss] ...) ,body)
70 (and (for/and ([rhs (in-list rhss)])
73 [`(letrec-values ([(,idss ...) ,rhss] ...) ,body)
76 [rhs (in-list rhss)])
79 [`(letrec* ([,ids ,rhss] ...) ,body)
81 (and (for/and ([rhs (in-list rhss)])
H A Dsize.rkt26 [`(let-values ([,_ ,rhss] ...)
28 (body-leftover-size (cons rhss body) (sub1 size))]
29 [`(letrec-values ([,_ ,rhss] ...)
31 (body-leftover-size (cons rhss body) (sub1 size))]
/dports/lang/racket/racket-8.3/src/schemify/
H A Dletrec.rkt15 (define (letrec-splitable-values-binding? idss rhss)
18 (wrap-pair? (car rhss))
19 (eq? 'values (wrap-car (car rhss)))
20 (= (length (wrap-cdr (car rhss)))
22 (for/and ([rhs (in-list (wrap-cdr (car rhss)))])
25 (define (letrec-split-values-binding idss rhss bodys)
27 [rhs (in-list (wrap-cdr (car rhss)))])
44 [`(,_ ([,ids ,rhss] ...) . ,body)
48 [rhs (in-list rhss)])
H A Dleft-to-right.rkt18 (define (left-to-right/let ids rhss bodys
25 `(let ([,(car ids) ,(car rhss)]) . ,bodys)]
27 (let loop ([ids ids] [rhss rhss] [all-simple? #t] [binds null])
29 [(null? (cdr rhss))
31 (define rhs (car rhss))
41 (define rhs (car rhss))
44 (cdr rhss)
59 (let loop ([idss idss] [rhss rhss] [binds null])
61 [(null? (cdr rhss))
63 (car idss) (car rhss)
[all …]
H A Dxify.rkt22 [`(let ([,ids ,rhss] ...) . ,body)
23 (xify-let 'let ids rhss body env)]
24 [`(letrec ([,ids ,rhss] ...) . ,body)
25 (xify-let 'letrec ids rhss body env)]
26 [`(letrec* ([,ids ,rhss] ...) . ,body)
27 (xify-let 'letrec* ids rhss body env)]
55 (define (xify-let form ids rhss body env)
58 [rhs (in-list rhss)])
H A Dsimple.rkt62 [`(let-values ([,idss ,rhss] ...) ,body)
65 [rhs (in-list rhss)])
68 [`(let ([,_ ,rhss] ...) ,body)
70 (and (for/and ([rhs (in-list rhss)])
73 [`(letrec-values ([(,idss ...) ,rhss] ...) ,body)
76 [rhs (in-list rhss)])
79 [`(letrec* ([,ids ,rhss] ...) ,body)
81 (and (for/and ([rhs (in-list rhss)])
H A Dsize.rkt26 [`(let-values ([,_ ,rhss] ...)
28 (body-leftover-size (cons rhss body) (sub1 size))]
29 [`(letrec-values ([,_ ,rhss] ...)
31 (body-leftover-size (cons rhss body) (sub1 size))]
/dports/www/pomerium/pomerium-0.8.3/vendor/github.com/yashtewari/glob-intersection/
H A Dnon_empty_test.go21 for lhs, rhss := range tests {
22 for _, rhs := range rhss {
48 for lhs, rhss := range tests {
49 for _, rhs := range rhss {
/dports/sysutils/istio/istio-1.6.7/vendor/github.com/open-policy-agent/opa/vendor/github.com/yashtewari/glob-intersection/
H A Dnon_empty_test.go20 for lhs, rhss := range tests {
21 for _, rhs := range rhss {
46 for lhs, rhss := range tests {
47 for _, rhs := range rhss {
/dports/sysutils/istio/istio-1.6.7/vendor/github.com/yashtewari/glob-intersection/
H A Dnon_empty_test.go20 for lhs, rhss := range tests {
21 for _, rhs := range rhss {
46 for lhs, rhss := range tests {
47 for _, rhs := range rhss {
/dports/lang/racket-minimal/racket-8.3/src/expander/expand/
H A Dbody.rkt117 val-rhss
162 val-rhss))
205 val-rhss
225 val-rhss
239 val-rhss
299 val-idss val-keyss val-rhss track-stxs
328 (let loop ([idss idss] [keyss keyss] [rhss rhss] [track-stxs track-stxs]
404 (cons expanded-rhs accum-rhss)
409 (loop (cdr idss) (cdr keyss) (cdr rhss) (cdr track-stxs)
414 (define (build-clauses accum-idss accum-rhss accum-track-stxs)
[all …]
/dports/lang/racket/racket-8.3/src/expander/expand/
H A Dbody.rkt117 val-rhss
162 val-rhss))
205 val-rhss
225 val-rhss
239 val-rhss
299 val-idss val-keyss val-rhss track-stxs
328 (let loop ([idss idss] [keyss keyss] [rhss rhss] [track-stxs track-stxs]
404 (cons expanded-rhs accum-rhss)
409 (loop (cdr idss) (cdr keyss) (cdr rhss) (cdr track-stxs)
414 (define (build-clauses accum-idss accum-rhss accum-track-stxs)
[all …]
/dports/lang/racket/racket-8.3/src/expander/extract/
H A Dprune-name.rkt50 [`(let-values ([,idss ,rhss] ...) ,e)
52 [rhs (in-list rhss)])
55 [`(letrec-values ([,idss ,rhss] ...) ,e)
57 [rhs (in-list rhss)])
/dports/lang/racket-minimal/racket-8.3/src/expander/extract/
H A Dprune-name.rkt50 [`(let-values ([,idss ,rhss] ...) ,e)
52 [rhs (in-list rhss)])
55 [`(letrec-values ([,idss ,rhss] ...) ,e)
57 [rhs (in-list rhss)])
/dports/lang/racket-minimal/racket-8.3/src/cify/
H A Dliteral.rkt47 [`(let-values ([,idss ,rhss] ...) ,bodys ...)
49 [rhs (in-list rhss)])
52 [`(letrec-values ([,idss ,rhss] ...) ,bodys ...)
54 [rhs (in-list rhss)])
105 [`(let-values ([,idss ,rhss] ...) ,bodys ...)
106 (or (convert-any? rhss)
108 [`(letrec-values ([,idss ,rhss] ...) ,bodys ...)
109 (or (convert-any? rhss)
H A Dref.rkt106 [`(define-values (,ids ...) (values ,rhss ...))
109 [rhs (in-list rhss)])
175 [`(,let-id ([,ids ,rhss] ...) . ,body)
177 [rhs (in-list rhss)]
190 [rhs (in-list rhss)]
198 [rhs (in-list rhss)])
218 [`(define-values (,ids ...) (values ,rhss ...))
220 [rhs (in-list rhss)])
263 [`(,let-id ([,ids ,rhss] ...) . ,body)
268 [rhs (in-list rhss)])
/dports/lang/racket/racket-8.3/src/cify/
H A Dliteral.rkt47 [`(let-values ([,idss ,rhss] ...) ,bodys ...)
49 [rhs (in-list rhss)])
52 [`(letrec-values ([,idss ,rhss] ...) ,bodys ...)
54 [rhs (in-list rhss)])
105 [`(let-values ([,idss ,rhss] ...) ,bodys ...)
106 (or (convert-any? rhss)
108 [`(letrec-values ([,idss ,rhss] ...) ,bodys ...)
109 (or (convert-any? rhss)
H A Dref.rkt106 [`(define-values (,ids ...) (values ,rhss ...))
109 [rhs (in-list rhss)])
175 [`(,let-id ([,ids ,rhss] ...) . ,body)
177 [rhs (in-list rhss)]
190 [rhs (in-list rhss)]
198 [rhs (in-list rhss)])
218 [`(define-values (,ids ...) (values ,rhss ...))
220 [rhs (in-list rhss)])
263 [`(,let-id ([,ids ,rhss] ...) . ,body)
268 [rhs (in-list rhss)])
/dports/devel/hs-haskell-language-server/haskell-language-server-1.4.0/_cabal_deps/hlint-3.2.7/src/Hint/
H A DNaming.hs89 shorten (L locDecl (ValD ttg0 bind@(PatBind _ _ grhss@(GRHSs _ rhss _) _))) =
90 L locDecl (ValD ttg0 bind {pat_rhs = grhss {grhssGRHSs = map shortenLGRHS rhss}})
94 shortenMatch (L locMatch match@(Match _ _ _ grhss@(GRHSs _ rhss _))) =
95 L locMatch match {m_grhss = grhss {grhssGRHSs = map shortenLGRHS rhss}}
/dports/devel/hs-hlint/hlint-3.3.4/src/Hint/
H A DNaming.hs89 shorten (L locDecl (ValD ttg0 bind@(PatBind _ _ grhss@(GRHSs _ rhss _) _))) =
90 L locDecl (ValD ttg0 bind {pat_rhs = grhss {grhssGRHSs = map shortenLGRHS rhss}})
94 shortenMatch (L locMatch match@(Match _ _ _ grhss@(GRHSs _ rhss _))) =
95 L locMatch match {m_grhss = grhss {grhssGRHSs = map shortenLGRHS rhss}}
/dports/devel/loki/loki-0.1.7/include/loki/flex/
H A Dsmallstringopt.h187 const size_t rhss = rhs.size();
189 if (rhss > maxSmallString && capacity() > rhss) {
191 if (s >= rhss) {
193 resize(rhss, 0);
/dports/math/SCIP/scip-7.0.3/src/scip/
H A Dreader_mps.c3364 assert( rhss != NULL ); in printRhsSection()
3904 SCIP_Real* rhss; in SCIPwriteMps() local
4137 rhss[c] = lhs; in SCIPwriteMps()
4139 rhss[c] = rhs; in SCIPwriteMps()
4164 rhss[c] = 1.0; in SCIPwriteMps()
4174 rhss[c] = 1.0; in SCIPwriteMps()
4226 rhss[c] = lhs; in SCIPwriteMps()
4228 rhss[c] = rhs; in SCIPwriteMps()
4331 rhss[c] = lhs; in SCIPwriteMps()
4333 rhss[c] = rhs; in SCIPwriteMps()
[all …]

1234567891011