| /dports/lang/racket/racket-8.3/src/expander/read/ |
| H A D | string.rkt | 44 (accum-string-add! accum-str escaped-c)]
45 [(#\a) (accum-string-add! accum-str #\u7)]
47 [(#\t) (accum-string-add! accum-str #\tab)]
49 [(#\v) (accum-string-add! accum-str #\vtab)]
50 [(#\f) (accum-string-add! accum-str #\page)]
51 [(#\r) (accum-string-add! accum-str #\return)]
52 [(#\e) (accum-string-add! accum-str #\u1B)]
62 (accum-string-add! accum-str escaped-c)
157 (accum-string-add! accum-str c)
213 (accum-string-add! accum-str c)))
[all …]
|
| H A D | constant.rkt | 4 "accum-string.rkt"
12 (define accum-str (accum-string-init! config))
13 (accum-string-add! accum-str init-c)
20 "bad syntax `#~a`" (accum-string-get! accum-str config)))]
22 (accum-string-add! accum-str c)
24 "bad syntax `#~a`" (accum-string-get! accum-str config))]
27 (accum-string-add! accum-str c)
31 (accum-string-add! accum-str c)
33 "bad syntax `#~a`" (accum-string-get! accum-str config))]))
34 (wrap val in config (accum-string-get! accum-str config)))
|
| H A D | accum-string.rkt | 9 (provide accum-string-init!
10 accum-string-add!
11 accum-string-convert!
12 accum-string-count
13 set-accum-string-count!
14 accum-string-get!
15 accum-string-get-bytes!
16 accum-string-abandon!)
31 (accum-string 0 (make-string 32))]))
33 (define (accum-string-add! a c)
[all …]
|
| H A D | char.rkt | 7 "accum-string.rkt"
49 (define accum-str (accum-string-init! config))
59 (accum-string-abandon! accum-str config)
64 (accum-string-get! accum-str config))])]
67 (accum-string-abandon! accum-str config)
76 (define accum-str (accum-string-init! config))
77 (accum-string-add! accum-str c)
78 (accum-string-add! accum-str next-c)
84 (accum-string-add! accum-str next-c)
87 (define name (string-foldcase
[all …]
|
| H A D | symbol-or-number.rkt | 8 "accum-string.rkt"
40 (define accum-str (accum-string-init! config))
44 (accum-string-add! accum-str extra-prefix))
73 (accum-string-convert! accum-str string-foldcase foldcase-from))]
78 (loop #f #f (accum-string-count accum-str))]
85 (accum-string-convert! accum-str string-foldcase foldcase-from))
86 (loop #f c (accum-string-count accum-str))]
95 (accum-string-convert! accum-str string-foldcase foldcase-from))
96 (accum-string-add! accum-str next-c)
98 (loop #f #f (accum-string-count accum-str))]
[all …]
|
| H A D | hash.rkt | 10 "accum-string.rkt"
23 (define accum-str (accum-string-init! config))
24 (accum-string-add! accum-str dispatch-c)
25 (accum-string-add! accum-str init-c)
32 expect-c (accum-string-get! accum-str config)))
33 (accum-string-add! accum-str c))
77 (accum-string-add! accum-str c)
81 (accum-string-add! accum-str c)
86 (accum-string-get! accum-str config)))]
89 (accum-string-add! accum-str c))
[all …]
|
| H A D | regexp.rkt | 7 "accum-string.rkt"
9 "string.rkt")
13 (define (read-regexp mode-c accum-str in config)
20 (accum-string-abandon! accum-str config)
21 (define str (read-string in no-wrap-config))
26 (accum-string-add! accum-str c3)
30 (accum-string-abandon! accum-str config)
32 (read-string in no-wrap-config #:mode '|byte string|))
39 (accum-string-get! accum-str config))])]
43 (accum-string-get! accum-str config))]))
|
| H A D | extension.rkt | 7 "accum-string.rkt"
86 (define accum-str (accum-string-init! config))
88 (accum-string-add! accum-str init-c))
99 (positive? (accum-string-count accum-str)))
109 (accum-string-add! accum-str c)
119 (define lang-str (accum-string-get! accum-str config))
155 (define accum-str (accum-string-init! config))
157 (accum-string-add! accum-str c))
162 (accum-string-add! accum-str c))
164 (bad-syntax-error in config (accum-string-get! accum-str config)
[all …]
|
| H A D | digit.rkt | 5 "accum-string.rkt")
14 (define (read-digits in config [accum-str #f]
22 (when accum-str (accum-string-add! accum-str c))
32 (when accum-str (accum-string-add! accum-str c))
|
| H A D | graph.rkt | 5 "accum-string.rkt"
15 (define accum-str (accum-string-init! config))
16 (accum-string-add! accum-str init-c)
27 (format "~a~a~a" dispatch-c (accum-string-get! accum-str config) c))
37 (accum-string-abandon! accum-str config)
40 (accum-string-abandon! accum-str config)
46 (accum-string-abandon! accum-str config)
62 (unless ((accum-string-count accum-str) . <= . 8)
65 dispatch-c (accum-string-get! accum-str config) c))
80 (accum-string-abandon! accum-str config)
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/expander/read/ |
| H A D | string.rkt | 44 (accum-string-add! accum-str escaped-c)]
45 [(#\a) (accum-string-add! accum-str #\u7)]
47 [(#\t) (accum-string-add! accum-str #\tab)]
49 [(#\v) (accum-string-add! accum-str #\vtab)]
50 [(#\f) (accum-string-add! accum-str #\page)]
51 [(#\r) (accum-string-add! accum-str #\return)]
52 [(#\e) (accum-string-add! accum-str #\u1B)]
62 (accum-string-add! accum-str escaped-c)
157 (accum-string-add! accum-str c)
213 (accum-string-add! accum-str c)))
[all …]
|
| H A D | constant.rkt | 4 "accum-string.rkt"
12 (define accum-str (accum-string-init! config))
13 (accum-string-add! accum-str init-c)
20 "bad syntax `#~a`" (accum-string-get! accum-str config)))]
22 (accum-string-add! accum-str c)
24 "bad syntax `#~a`" (accum-string-get! accum-str config))]
27 (accum-string-add! accum-str c)
31 (accum-string-add! accum-str c)
33 "bad syntax `#~a`" (accum-string-get! accum-str config))]))
34 (wrap val in config (accum-string-get! accum-str config)))
|
| H A D | accum-string.rkt | 9 (provide accum-string-init!
10 accum-string-add!
11 accum-string-convert!
12 accum-string-count
13 set-accum-string-count!
14 accum-string-get!
15 accum-string-get-bytes!
16 accum-string-abandon!)
31 (accum-string 0 (make-string 32))]))
33 (define (accum-string-add! a c)
[all …]
|
| H A D | char.rkt | 7 "accum-string.rkt"
49 (define accum-str (accum-string-init! config))
59 (accum-string-abandon! accum-str config)
64 (accum-string-get! accum-str config))])]
67 (accum-string-abandon! accum-str config)
76 (define accum-str (accum-string-init! config))
77 (accum-string-add! accum-str c)
78 (accum-string-add! accum-str next-c)
84 (accum-string-add! accum-str next-c)
87 (define name (string-foldcase
[all …]
|
| H A D | symbol-or-number.rkt | 8 "accum-string.rkt"
40 (define accum-str (accum-string-init! config))
44 (accum-string-add! accum-str extra-prefix))
73 (accum-string-convert! accum-str string-foldcase foldcase-from))]
78 (loop #f #f (accum-string-count accum-str))]
85 (accum-string-convert! accum-str string-foldcase foldcase-from))
86 (loop #f c (accum-string-count accum-str))]
95 (accum-string-convert! accum-str string-foldcase foldcase-from))
96 (accum-string-add! accum-str next-c)
98 (loop #f #f (accum-string-count accum-str))]
[all …]
|
| H A D | hash.rkt | 10 "accum-string.rkt"
23 (define accum-str (accum-string-init! config))
24 (accum-string-add! accum-str dispatch-c)
25 (accum-string-add! accum-str init-c)
32 expect-c (accum-string-get! accum-str config)))
33 (accum-string-add! accum-str c))
77 (accum-string-add! accum-str c)
81 (accum-string-add! accum-str c)
86 (accum-string-get! accum-str config)))]
89 (accum-string-add! accum-str c))
[all …]
|
| H A D | regexp.rkt | 7 "accum-string.rkt"
9 "string.rkt")
13 (define (read-regexp mode-c accum-str in config)
20 (accum-string-abandon! accum-str config)
21 (define str (read-string in no-wrap-config))
26 (accum-string-add! accum-str c3)
30 (accum-string-abandon! accum-str config)
32 (read-string in no-wrap-config #:mode '|byte string|))
39 (accum-string-get! accum-str config))])]
43 (accum-string-get! accum-str config))]))
|
| H A D | extension.rkt | 7 "accum-string.rkt"
86 (define accum-str (accum-string-init! config))
88 (accum-string-add! accum-str init-c))
99 (positive? (accum-string-count accum-str)))
109 (accum-string-add! accum-str c)
119 (define lang-str (accum-string-get! accum-str config))
155 (define accum-str (accum-string-init! config))
157 (accum-string-add! accum-str c))
162 (accum-string-add! accum-str c))
164 (bad-syntax-error in config (accum-string-get! accum-str config)
[all …]
|
| H A D | digit.rkt | 5 "accum-string.rkt")
14 (define (read-digits in config [accum-str #f]
22 (when accum-str (accum-string-add! accum-str c))
32 (when accum-str (accum-string-add! accum-str c))
|
| /dports/lang/nim/nim-1.6.2/tests/stdlib/ |
| H A D | tre.nim | 21 var matches: array[6, string]
47 var accum: seq[string] = @[]
49 accum.add(word)
52 accum = @[]
54 accum.add(word)
57 accum = @[]
59 accum.add(word)
76 accum.add(x)
83 var matches: array[16, string]
97 var accum: seq[string] = @[]
[all …]
|
| /dports/security/botan110/Botan-1.10.17/src/entropy/unix_procs/ |
| H A D | es_unix.cpp | 38 Unix_EntropySource::Unix_EntropySource(const std::vector<std::string>& path) : in Unix_EntropySource()
78 accum.add(&statbuf, sizeof(statbuf), .005); in poll()
81 accum.add(::getpid(), 0); in poll()
82 accum.add(::getppid(), 0); in poll()
83 accum.add(::getuid(), 0); in poll()
84 accum.add(::getgid(), 0); in poll()
85 accum.add(::getpgrp(), 0); in poll()
89 accum.add(usage, .005); in poll()
92 accum.add(usage, .005); in poll()
109 accum.add(&io_buffer[0], got_this_loop, .005); in poll()
[all …]
|
| /dports/lang/racket-minimal/racket-8.3/src/io/path/ |
| H A D | build.rkt | 2 (require "../locale/string.rkt"
38 (lambda (p) (or (path-string? p)
53 (if (string? p)
54 "string"
62 [(string? p) (check (system-path-convention-type))]
178 (list (starting-point-add-up (car accum)))
238 ;; must be a byte string
250 … add-ups? ; whether to add `up`s to the base string, as opposed to dropping them
258 #:add-ups? [add-ups? #f]
422 (define (starting-point-add-up s)
[all …]
|
| /dports/lang/racket/racket-8.3/src/io/path/ |
| H A D | build.rkt | 2 (require "../locale/string.rkt"
38 (lambda (p) (or (path-string? p)
53 (if (string? p)
54 "string"
62 [(string? p) (check (system-path-convention-type))]
178 (list (starting-point-add-up (car accum)))
238 ;; must be a byte string
250 … add-ups? ; whether to add `up`s to the base string, as opposed to dropping them
258 #:add-ups? [add-ups? #f]
422 (define (starting-point-add-up s)
[all …]
|
| /dports/biology/sra-tools/sra-tools-2.11.0/ncbi-vdb/libs/axf/test/ |
| H A D | test_RefSeq.cpp | 61 auto const seq = std::string("NNNACGTNNN"); in test()
72 if (std::string(test, len) != seq) { in test()
83 if (std::string(test, 5) != seq.substr(0, 5)) { in test()
94 if (std::string(test, len) != seq.substr(5)) { in test()
138 int accum = 0; in loadFromStream() local
171 accum = (accum << 2) | b4na; in loadFromStream()
175 accum = 0; in loadFromStream()
179 Ns.add(position); in loadFromStream()
197 int accum = 0; in loadFromStreamCircular() local
225 accum = (accum << 4) | b2na; in loadFromStreamCircular()
[all …]
|
| /dports/biology/ncbi-vdb/ncbi-vdb-2.11.0/libs/axf/test/ |
| H A D | test_RefSeq.cpp | 61 auto const seq = std::string("NNNACGTNNN"); in test()
72 if (std::string(test, len) != seq) { in test()
83 if (std::string(test, 5) != seq.substr(0, 5)) { in test()
94 if (std::string(test, len) != seq.substr(5)) { in test()
138 int accum = 0; in loadFromStream() local
171 accum = (accum << 2) | b4na; in loadFromStream()
175 accum = 0; in loadFromStream()
179 Ns.add(position); in loadFromStream()
197 int accum = 0; in loadFromStreamCircular() local
225 accum = (accum << 4) | b2na; in loadFromStreamCircular()
[all …]
|