| /dports/lang/racket-minimal/racket-8.3/src/expander/read/ |
| H A D | config.rkt | 9 make-read-config
48 #:wrap [wrap #f #;(lambda (s-exp srcloc) s-exp)]
60 wrap
87 (define (read-config-update config
89 #:wrap wrap
94 (struct*-copy read-config config
96 [wrap wrap]
116 (read-config-col config)
117 (read-config-pos config)
118 (and (read-config-pos config) end-pos (max 0 (- end-pos (read-config-pos config))))))
[all …]
|
| H A D | main.rkt | 55 #:wrap [wrap #f]
77 #:wrap wrap
87 #:wrap wrap
113 #:wrap [wrap #f]
123 #:wrap wrap
223 … (wrap (read-unwrapped-sequence read-one ec #\( #\) in r-config #:shape-tag? #t) in r-config ec)]
230 … (wrap (read-unwrapped-sequence read-one ec #\[ #\] in r-config #:shape-tag? #t) in r-config ec))]
240 … (wrap (read-unwrapped-sequence read-one ec #\{ #\} in r-config #:shape-tag? #t) in r-config ec))]
332 [(char-delimiter? c2 config) (wrap #t in config c)]
337 [(char-delimiter? c2 config) (wrap #f in config c)]
[all …]
|
| H A D | regexp.rkt | 2 (require "config.rkt"
4 "wrap.rkt"
11 (provide read-regexp)
13 (define (read-regexp mode-c accum-str in config)
14 (define c3 (read-char/special in config))
15 (define no-wrap-config (disable-wrapping config))
21 (define str (read-string in no-wrap-config))
27 (define c4 (read-char/special in config))
32 (read-string in no-wrap-config #:mode '|byte string|))
45 (wrap rx
[all …]
|
| H A D | quote.rkt | 3 "wrap.rkt")
5 (provide read-quote)
7 (define (read-quote read-one sym desc c in config)
8 (define wrapped-sym (wrap sym in config c))
10 (define e (read-one #f in config))
12 (reader-error in config #:due-to e #:end-pos end-pos
15 (wrap (list wrapped-sym e) in config #f))
|
| H A D | box.rkt | 3 "wrap.rkt"
4 "config.rkt"
7 (provide read-box)
9 (define (read-box read-one dispatch-c in config)
10 (unless (check-parameter read-accept-box config)
11 (reader-error in config
15 (define e (read-one #f in (next-readtable config)))
17 (reader-error in config #:due-to e #:end-pos open-end-pos
20 (wrap (if (read-config-for-syntax? config)
23 in config #f))
|
| H A D | wrap.rkt | 2 (require "config.rkt")
4 (provide wrap)
6 (define (wrap s-exp in config rep) function
7 (define wrap (read-config-wrap config))
8 (if wrap
9 (wrap s-exp (port+config->srcloc in config) rep)
|
| H A D | struct.rkt | 8 "wrap.rkt"
14 (define (read-struct read-one dispatch-c in config)
15 (define c (read-char/special in config))
26 (read-struct-sequence read-one c #\( #\) in config)]
30 (read-struct-sequence read-one c #\[ #\] in config))]
33 (check-parameter read-curly-brace-as-paren config)
34 (read-struct-sequence read-one c #\{ #\} in config))]
59 (when (read-config-for-syntax? config)
65 (wrap (apply make-prefab-struct seq)
72 (define (read-struct-sequence read-one opener-c opener closer in config)
[all …]
|
| H A D | vector.rkt | 7 "wrap.rkt"
18 (define (read-vector read-one opener-c opener closer in config
24 [(fixnum) (lambda (init-c in config) (read-fixnum read-one init-c in config))]
25 [(flonum) (lambda (init-c in config) (read-flonum read-one init-c in config))]))
55 (wrap v in config #f)
78 (wrap (if (read-config-for-syntax? config)
87 (define (read-fixnum-or-flonum-vector read-one dispatch-c c c2 in config)
90 (when (read-config-for-syntax? config)
93 (define c3 (read-char/special in config))
127 (define v (read-digits in config accum-str
[all …]
|
| H A D | constant.rkt | 7 "wrap.rkt")
9 (provide read-delimited-constant)
11 (define (read-delimited-constant init-c can-match? chars val in config)
12 (define accum-str (accum-string-init! config))
15 (define c (peek-char/special in config))
17 [(char-delimiter? c config)
19 (reader-error in config #:due-to c
23 (reader-error in config
30 (consume-char/special in config c)
32 (reader-error in config
[all …]
|
| H A D | char.rkt | 2 (require "config.rkt"
4 "wrap.rkt"
11 (provide read-character)
13 (define (read-character in config)
14 (define c (read-char/special in config))
30 (define c3 (read-char/special in config))
50 (define v (read-digits in config accum-str
62 (reader-error in config
100 (reader-error in config
110 (wrap char
[all …]
|
| /dports/lang/racket/racket-8.3/src/expander/read/ |
| H A D | config.rkt | 9 make-read-config
48 #:wrap [wrap #f #;(lambda (s-exp srcloc) s-exp)]
60 wrap
87 (define (read-config-update config
89 #:wrap wrap
94 (struct*-copy read-config config
96 [wrap wrap]
116 (read-config-col config)
117 (read-config-pos config)
118 (and (read-config-pos config) end-pos (max 0 (- end-pos (read-config-pos config))))))
[all …]
|
| H A D | main.rkt | 55 #:wrap [wrap #f]
77 #:wrap wrap
87 #:wrap wrap
113 #:wrap [wrap #f]
123 #:wrap wrap
223 … (wrap (read-unwrapped-sequence read-one ec #\( #\) in r-config #:shape-tag? #t) in r-config ec)]
230 … (wrap (read-unwrapped-sequence read-one ec #\[ #\] in r-config #:shape-tag? #t) in r-config ec))]
240 … (wrap (read-unwrapped-sequence read-one ec #\{ #\} in r-config #:shape-tag? #t) in r-config ec))]
332 [(char-delimiter? c2 config) (wrap #t in config c)]
337 [(char-delimiter? c2 config) (wrap #f in config c)]
[all …]
|
| H A D | regexp.rkt | 2 (require "config.rkt"
4 "wrap.rkt"
11 (provide read-regexp)
13 (define (read-regexp mode-c accum-str in config)
14 (define c3 (read-char/special in config))
15 (define no-wrap-config (disable-wrapping config))
21 (define str (read-string in no-wrap-config))
27 (define c4 (read-char/special in config))
32 (read-string in no-wrap-config #:mode '|byte string|))
45 (wrap rx
[all …]
|
| H A D | quote.rkt | 3 "wrap.rkt")
5 (provide read-quote)
7 (define (read-quote read-one sym desc c in config)
8 (define wrapped-sym (wrap sym in config c))
10 (define e (read-one #f in config))
12 (reader-error in config #:due-to e #:end-pos end-pos
15 (wrap (list wrapped-sym e) in config #f))
|
| H A D | box.rkt | 3 "wrap.rkt"
4 "config.rkt"
7 (provide read-box)
9 (define (read-box read-one dispatch-c in config)
10 (unless (check-parameter read-accept-box config)
11 (reader-error in config
15 (define e (read-one #f in (next-readtable config)))
17 (reader-error in config #:due-to e #:end-pos open-end-pos
20 (wrap (if (read-config-for-syntax? config)
23 in config #f))
|
| H A D | wrap.rkt | 2 (require "config.rkt")
4 (provide wrap)
6 (define (wrap s-exp in config rep) function
7 (define wrap (read-config-wrap config))
8 (if wrap
9 (wrap s-exp (port+config->srcloc in config) rep)
|
| H A D | struct.rkt | 8 "wrap.rkt"
14 (define (read-struct read-one dispatch-c in config)
15 (define c (read-char/special in config))
26 (read-struct-sequence read-one c #\( #\) in config)]
30 (read-struct-sequence read-one c #\[ #\] in config))]
33 (check-parameter read-curly-brace-as-paren config)
34 (read-struct-sequence read-one c #\{ #\} in config))]
59 (when (read-config-for-syntax? config)
65 (wrap (apply make-prefab-struct seq)
72 (define (read-struct-sequence read-one opener-c opener closer in config)
[all …]
|
| H A D | vector.rkt | 7 "wrap.rkt"
18 (define (read-vector read-one opener-c opener closer in config
24 [(fixnum) (lambda (init-c in config) (read-fixnum read-one init-c in config))]
25 [(flonum) (lambda (init-c in config) (read-flonum read-one init-c in config))]))
55 (wrap v in config #f)
78 (wrap (if (read-config-for-syntax? config)
87 (define (read-fixnum-or-flonum-vector read-one dispatch-c c c2 in config)
90 (when (read-config-for-syntax? config)
93 (define c3 (read-char/special in config))
127 (define v (read-digits in config accum-str
[all …]
|
| H A D | constant.rkt | 7 "wrap.rkt")
9 (provide read-delimited-constant)
11 (define (read-delimited-constant init-c can-match? chars val in config)
12 (define accum-str (accum-string-init! config))
15 (define c (peek-char/special in config))
17 [(char-delimiter? c config)
19 (reader-error in config #:due-to c
23 (reader-error in config
30 (consume-char/special in config c)
32 (reader-error in config
[all …]
|
| /dports/emulators/qemu/qemu-6.2.0/meson/mesonbuild/wrap/ |
| H A D | wrap.py | 119 config.read(self.filename)
122 self.parse_wrap_section(config)
145 self.parse_provide_section(config)
148 if len(config.sections()) < 1:
150 self.wrap_section = config.sections()[0]
155 self.values = dict(config[self.wrap_section])
158 if config.has_section('provide'):
159 for k, v in config['provide'].items():
493 block = resp.read(blocksize)
504 block = resp.read(blocksize)
[all …]
|
| /dports/emulators/qemu-devel/qemu-de8ed1055c2ce18c95f597eb10df360dcb534f99/meson/mesonbuild/wrap/ |
| H A D | wrap.py | 119 config.read(self.filename)
122 self.parse_wrap_section(config)
145 self.parse_provide_section(config)
148 if len(config.sections()) < 1:
150 self.wrap_section = config.sections()[0]
155 self.values = dict(config[self.wrap_section])
158 if config.has_section('provide'):
159 for k, v in config['provide'].items():
493 block = resp.read(blocksize)
504 block = resp.read(blocksize)
[all …]
|
| /dports/devel/meson/meson-0.60.3/mesonbuild/wrap/ |
| H A D | wrap.py | 121 config.read(self.filename)
124 self.parse_wrap_section(config)
147 self.parse_provide_section(config)
155 if len(config.sections()) < 1:
157 self.wrap_section = config.sections()[0]
161 self.values = dict(config[self.wrap_section])
164 if config.has_section('provide'):
165 for k, v in config['provide'].items():
498 block = resp.read(blocksize)
509 block = resp.read(blocksize)
[all …]
|
| /dports/devel/meson/stage/usr/local/lib/python3.8/site-packages/mesonbuild/wrap/ |
| H A D | wrap.py | 121 config.read(self.filename)
124 self.parse_wrap_section(config)
147 self.parse_provide_section(config)
155 if len(config.sections()) < 1:
157 self.wrap_section = config.sections()[0]
161 self.values = dict(config[self.wrap_section])
164 if config.has_section('provide'):
165 for k, v in config['provide'].items():
498 block = resp.read(blocksize)
509 block = resp.read(blocksize)
[all …]
|
| /dports/devel/meson/meson-0.60.3/build/lib/mesonbuild/wrap/ |
| H A D | wrap.py | 121 config.read(self.filename)
124 self.parse_wrap_section(config)
147 self.parse_provide_section(config)
155 if len(config.sections()) < 1:
157 self.wrap_section = config.sections()[0]
161 self.values = dict(config[self.wrap_section])
164 if config.has_section('provide'):
165 for k, v in config['provide'].items():
498 block = resp.read(blocksize)
509 block = resp.read(blocksize)
[all …]
|
| /dports/devel/ipython5/ipython-5.10.0/IPython/lib/ |
| H A D | latextools.py | 14 from traitlets.config import get_config
42 ).tag(config=True)
48 ).tag(config=True)
54 ).tag(config=True)
59 ).tag(config=True)
91 bin_data = f(s, wrap)
97 def latex_to_png_mpl(s, wrap): argument
106 if wrap:
144 return f.read()
164 def genelatex(body, wrap): argument
[all …]
|