Home
last modified time | relevance | path

Searched +refs:rx +refs:path +refs:list (Results 1 – 25 of 5735) sorted by relevance

12345678910>>...230

/dports/lang/racket/racket-8.3/collects/racket/private/
H A Dpath-list.rkt1 (module path-list '#%kernel
4 (#%provide path-list-string->path-list)
6 (-define rx:path-list #f)
8 (-define (init-rx:path-list!)
9 (unless rx:path-list
10 (set! rx:path-list (byte-regexp (string->bytes/utf-8
25 (-define (path-list-string->path-list s default)
31 (raise-arguments-error 'path-list-string->path-list
36 (raise-argument-error 'path-list-string->path-list "(listof path?)" default))
37 (init-rx:path-list!)
[all …]
/dports/lang/racket-minimal/racket-8.3/collects/racket/private/
H A Dpath-list.rkt1 (module path-list '#%kernel
4 (#%provide path-list-string->path-list)
6 (-define rx:path-list #f)
8 (-define (init-rx:path-list!)
9 (unless rx:path-list
10 (set! rx:path-list (byte-regexp (string->bytes/utf-8
25 (-define (path-list-string->path-list s default)
31 (raise-arguments-error 'path-list-string->path-list
36 (raise-argument-error 'path-list-string->path-list "(listof path?)" default))
37 (init-rx:path-list!)
[all …]
/dports/lang/racket/racket-8.3/share/pkgs/macro-debugger-text-lib/macro-debugger/analysis/private/
H A Dmoduledb.rkt3 setup/path-to-relative
15 ;; A ModuleDB = hash[path/symbol => (U 'no-drop 'no-bypass)]
31 (let ([name (resolved-module-path-name (module-path-index-resolve mod))])
35 [(path? name)
36 (let ([str (path->relative-string/library name)])
37 (for/or ([rx (in-list no-bypass-rxs)])
67 '(#rx"^<collects>/srfi/[0-9]+\\.rkt$"))
75 (define legacy-rxs (list #rx"^mzlib" #rx"^texpict"))
78 (for/and ([rx (in-list legacy-rxs)])
79 (not (regexp-match? rx s)))))
[all …]
/dports/lang/racket/racket-8.3/collects/setup/private/
H A Domitted-paths.rkt12 (require racket/path racket/list racket/promise "../dirs.rkt" "lib-roots.rkt")
24 (list (explode-path (simplify-path (car p)))
45 (regexp-match? #rx"^[.]" str))))
47 ;; accumulated omissions is a list of
48 ;; exploded paths plus a list of (cons prefix-path regexp)
77 (map list (filter (lambda (p)
79 (for/or ([rx (in-list rxes)])
81 (for/or ([prefix+rx (in-list (omits-prefix+rxs accumulated))])
83 (build-path (car prefix+rx) p)))))
86 (append (map (lambda (rx) (cons 'same rx)) rxes)
[all …]
/dports/lang/racket-minimal/racket-8.3/collects/setup/private/
H A Domitted-paths.rkt12 (require racket/path racket/list racket/promise "../dirs.rkt" "lib-roots.rkt")
24 (list (explode-path (simplify-path (car p)))
45 (regexp-match? #rx"^[.]" str))))
47 ;; accumulated omissions is a list of
48 ;; exploded paths plus a list of (cons prefix-path regexp)
77 (map list (filter (lambda (p)
79 (for/or ([rx (in-list rxes)])
81 (for/or ([prefix+rx (in-list (omits-prefix+rxs accumulated))])
83 (build-path (car prefix+rx) p)))))
86 (append (map (lambda (rx) (cons 'same rx)) rxes)
[all …]
/dports/lang/racket/racket-8.3/share/pkgs/redex-benchmark/redex/benchmark/models/util/
H A Dinfo-util.rkt3 (require racket/path
4 racket/list
5 racket/runtime-path)
8 make-path-root
11 (define-runtime-path here ".")
22 (define model-name (first (regexp-split #rx"\\." (last (regexp-split #rx"/" filename)))))
23 (define mod-path (string->symbol
28 (list (first (regexp-split #rx"\\." (last (regexp-split #rx"/" filename))))
33 (for/list ([f (in-directory the-dir)]
40 (for/list ([t (in-list types)])
[all …]
/dports/lang/racket/racket-8.3/collects/syntax/private/
H A Dmodcollapse-noctc.rkt12 racket/list
141 (list (cadr relto-mp)))))])
163 (list (cadr relto-mp))))))])
198 (list (ss->rkt (cadr s))))
227 (list
262 (list* (car s)
273 (list* (car s) e2 (cddr s))))))]))
301 [(and (or (not (pair? s)) (not (list? s))) (not (path? s)))
366 (list* 'submod r sm))
428 (for/list ([e (in-list l)])
[all …]
/dports/lang/racket-minimal/racket-8.3/collects/syntax/private/
H A Dmodcollapse-noctc.rkt12 racket/list
141 (list (cadr relto-mp)))))])
163 (list (cadr relto-mp))))))])
198 (list (ss->rkt (cadr s))))
227 (list
262 (list* (car s)
273 (list* (car s) e2 (cddr s))))))]))
301 [(and (or (not (pair? s)) (not (list? s))) (not (path? s)))
366 (list* 'submod r sm))
428 (for/list ([e (in-list l)])
[all …]
/dports/graphics/geeqie/geeqie-1.6/src/pan-view/
H A Dpan-item.c73 pw->list = g_list_remove(pw->list, pi); in pan_item_remove()
130 pw->list = g_list_prepend(pw->list, pi); in pan_item_box_new()
284 pw->list = g_list_prepend(pw->list, pi); in pan_item_tri_new()
432 pw->list = g_list_prepend(pw->list, pi); in pan_item_text_new()
471 pw->list = g_list_prepend(pw->list, pi); in pan_item_thumb_new()
656 pw->list = g_list_prepend(pw->list, pi); in pan_item_image_new()
749 if (path[0] == G_DIR_SEPARATOR) in pan_item_find_by_path_l()
751 if (pi->fd->path && strcmp(path, pi->fd->path) == 0) match = TRUE; in pan_item_find_by_path_l()
794 if (!path) return NULL; in pan_item_find_by_path()
797 list = pan_item_find_by_path_l(list, pw->list_static, type, path, ignore_case, partial); in pan_item_find_by_path()
[all …]
/dports/security/aide/aide-0.17.4/src/
H A Dseltree.c36 list* r; in log_tree()
82 p=checked_strdup(rx); in strrxtok()
174 return strcmp(x1->path, x2->path); in compare_node_by_path()
180 list* r=NULL; in get_seltree_node()
187 if(strncmp(path,tree->path,strlen(path)+1)==0){ in get_seltree_node()
220 node->path=checked_strdup(path); in new_seltree_node()
270 r->rx=rx; in add_rx_to_tree()
296 …"added new node '%s' (%p) for '%s' (reason: new rule '%s')", curnode->path, curnode, rxtok, r->rx); in add_rx_to_tree()
321 static int check_list_for_match(list* rxrlist,char* text, rx_rule* *rule, RESTRICTION_TYPE file_typ… in check_list_for_match()
323 list* r=NULL; in check_list_for_match()
[all …]
/dports/lang/racket/racket-8.3/share/pkgs/gui-lib/mrlib/private/
H A Ddot.rkt49 (define dot-path (find-dot (regexp-match #rx"neato" option)))
50 (when dot-path
157 [(regexp-match #rx"^([0-9]*)\\.([0-9]*)$" candidate)
179 [(regexp-match #rx"^node" line)
182 [(regexp-match #rx"^edge" line)
185 [(regexp-match #rx"stop" line)
233 (let ([s (regexp-replace #rx"^ *" s "")])
244 [(regexp-match #rx"^([^ ]*) (.*)$" s)
249 [(regexp-match #rx"^([^ ]*)$" s)
263 (let ([path (new dc-path%)])
[all …]
/dports/lang/racket/racket-8.3/collects/pkg/private/
H A Daddl-installs.rkt6 "../path.rkt"
38 (not (for/or ([prefix+rx (in-list prefix+rxs)])
39 (define prefix (car prefix+rx))
40 (regexp-match? (cdr prefix+rx) (if (eq? prefix 'same)
63 (simplify-path (build-path f i)))))
69 (for/list ([prefix+rx (in-list prefix+rxs)])
70 (define prefix (car prefix+rx))
74 (cdr prefix+rx)))))
101 (path->string (path-replace-extension name #"")))
106 (if (and (list? l) (andmap path-string? l))
[all …]
H A Dsuggestions.rkt3 racket/path
14 (let ([installation (build-path (find-share-dir) "pkgs" (file-name-from-path default))])
19 (define (pkg-catalog-suggestions-for-module module-path
23 (let* ([mod (collapse-module-path
24 module-path
25 (lambda () (build-path (current-directory) "dummy.rkt")))]
27 [more-pkgs (let ([rx:reader #rx"/lang/reader[.]rkt$"])
30 (regexp-match rx:reader (cadr mod)))
31 … (db:get-module-pkgs `(lib ,(regexp-replace rx:reader (cadr mod) "/main.rkt")))
33 (sort (set->list
[all …]
/dports/lang/racket-minimal/racket-8.3/collects/pkg/private/
H A Daddl-installs.rkt6 "../path.rkt"
38 (not (for/or ([prefix+rx (in-list prefix+rxs)])
39 (define prefix (car prefix+rx))
40 (regexp-match? (cdr prefix+rx) (if (eq? prefix 'same)
63 (simplify-path (build-path f i)))))
69 (for/list ([prefix+rx (in-list prefix+rxs)])
70 (define prefix (car prefix+rx))
74 (cdr prefix+rx)))))
101 (path->string (path-replace-extension name #"")))
106 (if (and (list? l) (andmap path-string? l))
[all …]
H A Dsuggestions.rkt3 racket/path
14 (let ([installation (build-path (find-share-dir) "pkgs" (file-name-from-path default))])
19 (define (pkg-catalog-suggestions-for-module module-path
23 (let* ([mod (collapse-module-path
24 module-path
25 (lambda () (build-path (current-directory) "dummy.rkt")))]
27 [more-pkgs (let ([rx:reader #rx"/lang/reader[.]rkt$"])
30 (regexp-match rx:reader (cadr mod)))
31 … (db:get-module-pkgs `(lib ,(regexp-replace rx:reader (cadr mod) "/main.rkt")))
33 (sort (set->list
[all …]
/dports/lang/racket/racket-8.3/collects/racket/
H A Drequire.rkt3 (require (for-syntax racket/base racket/require-transform racket/list syntax/stx
12 [(_ rx spec)
13 (regexp? (syntax-e #'rx))
14 (let ([rx (syntax-e #'rx)])
18 (regexp-match? rx (symbol->string
32 (syntax->list #'(specs ...)))]
73 (for/and ([ps (in-list (syntax->list #'(path-stx ...)))])
84 (for/list ([ps (in-list (syntax->list #'(path-stx ...)))])
88 (let loop ([dir srcdir] [path (string->path path)] [pathstr path])
107 (if (stx-list? first)
[all …]
/dports/lang/racket-minimal/racket-8.3/collects/racket/
H A Drequire.rkt3 (require (for-syntax racket/base racket/require-transform racket/list syntax/stx
12 [(_ rx spec)
13 (regexp? (syntax-e #'rx))
14 (let ([rx (syntax-e #'rx)])
18 (regexp-match? rx (symbol->string
32 (syntax->list #'(specs ...)))]
73 (for/and ([ps (in-list (syntax->list #'(path-stx ...)))])
84 (for/list ([ps (in-list (syntax->list #'(path-stx ...)))])
88 (let loop ([dir srcdir] [path (string->path path)] [pathstr path])
107 (if (stx-list? first)
[all …]
/dports/lang/racket/racket-8.3/share/pkgs/gui-lib/mred/private/
H A Dpath-dialog.rkt22 (define path-separator-rx-str (if win? "/\\" "/"))
23 (define (make-rx . strs)
24 (let ([l (map (lambda (s) (if (eq? / s) path-separator-rx-str s)) strs)])
26 (define end-separators-rx (make-rx "["/"]+$"))
27 (define initial-/dir-part-rx (make-rx "^["/"]*([^"/"]+)"))
28 (define initial-dir/-part-rx (make-rx "^.*?["/"]"))
29 (define isfilter-rx #rx"[*?]")
44 #rx"/" (if (path? p) (path->string p) p) "\\\\")
339 (send path-list set (list "Bad Directory:" (path->string dir)))
629 (send path-list
[all …]
/dports/lang/racket/racket-8.3/share/pkgs/gui-lib/framework/private/
H A Daspell.rkt9 [query-aspell (->* ((and/c string? (not/c #rx"[\n]")))
17 [find-aspell-binary-path (-> (or/c path? #f))]
26 (define (find-aspell-binary-path)
29 (or (find-executable-path aspell)
30 (find-executable-path ispell)
32 (define c1 (build-path cp aspell))
40 (define aspell? (regexp-match? #rx"aspell" (path->string asp)))
57 (define asp (find-aspell-binary-path))
118 (when (regexp-match? #rx"[Aa]spell" line)
205 (list word-start word-len (regexp-split #rx", " suggestions))
[all …]
/dports/lang/racket/racket-8.3/collects/setup/
H A Dunixstyle-install.rkt118 (sort (map path->string (apply directory-list dir)) string<?))
285 (for ([dir (in-list (list bindir librktdir))]
286 [files (in-list (list binfiles libfiles))]
287 [ignore-non-executable? (in-list (list #f #t))])
303 (define new-ls (for/list ([l (in-list ls)])
536 (for ([f (in-list (directory-list))])
538 (regexp-match? #rx#"(?i:[.]exe)$" (path-element->bytes f)))
622 (for ([f-path (in-list (directory-list dir))])
749 [rx (regexp-replace* #rx"[*]" rx ".*")]
750 [rx (regexp rx)])
[all …]
/dports/lang/racket-minimal/racket-8.3/collects/setup/
H A Dunixstyle-install.rkt118 (sort (map path->string (apply directory-list dir)) string<?))
285 (for ([dir (in-list (list bindir librktdir))]
286 [files (in-list (list binfiles libfiles))]
287 [ignore-non-executable? (in-list (list #f #t))])
303 (define new-ls (for/list ([l (in-list ls)])
536 (for ([f (in-list (directory-list))])
538 (regexp-match? #rx#"(?i:[.]exe)$" (path-element->bytes f)))
622 (for ([f-path (in-list (directory-list dir))])
749 [rx (regexp-replace* #rx"[*]" rx ".*")]
750 [rx (regexp rx)])
[all …]
/dports/lang/racket/racket-8.3/share/pkgs/plai-lib/tests/gc/
H A Drun-test.rkt3 racket/runtime-path
11 (define-runtime-path here ".")
13 (define (in-directory pth rx)
14 (in-list
16 (filter (compose (curry regexp-match rx) path->bytes)
17 (directory-list pth)))))
36 (for ([m (in-directory (build-path here "good-mutators") #rx"rkt$")])
40 (for ([m (in-directory (build-path here "bad-mutators") #rx"rkt$")])
42 (test-mutator m) =error> #rx""))
46 #rx"plai/mutator has error"
[all …]
/dports/lang/racket/racket-8.3/share/pkgs/plai-lib/tests/gc2/
H A Drun-test.rkt3 racket/runtime-path
11 (define-runtime-path here ".")
13 (define (in-directory pth rx)
14 (in-list
16 (filter (compose (curry regexp-match rx) path->bytes)
17 (directory-list pth)))))
36 (for ([m (in-directory (build-path here "good-mutators") #rx"rkt$")])
40 (for ([m (in-directory (build-path here "bad-mutators") #rx"rkt$")])
42 (test-mutator m) =error> #rx""))
46 #rx"plai/gc2/mutator has error"
[all …]
/dports/multimedia/smplayer/smplayer-21.10.0/src/
H A Dhelper.cpp237 QString path = fi.absolutePath(); in searchForConsecutiveFiles() local
239 QDir dir(path); in searchForConsecutiveFiles()
243 QRegExp rx("(\\d+)"); in searchForConsecutiveFiles() local
296 QString path = fi.absolutePath(); in filesInDirectory() local
298 QDir d(path); in filesInDirectory()
304 QString s = path +"/" + all_files[n]; in filesInDirectory()
340 QStringList list = files; in resolveSymlinks() local
341 for (int n=0; n < list.count(); n++) { in resolveSymlinks()
342 QFileInfo fi(list[n]); in resolveSymlinks()
344 list[n] = fi.symLinkTarget(); in resolveSymlinks()
[all …]
/dports/graphics/gimp-app/gimp-2.10.30/app/vectors/
H A Dgimpvectors-import.c349 GList *list; in gimp_vectors_import() local
367 for (list = path->strokes; list; list = list->next) in gimp_vectors_import()
411 GList *list; in gimp_vectors_import() local
415 for (list = path->strokes; list; list = list->next) in gimp_vectors_import()
498 GList *list; in svg_parser_end_element() local
500 for (list = path->strokes; list; list = list->next) in svg_parser_end_element()
766 rx = MIN (rx, width / 2); in svg_handler_rect_start()
773 if (rx) in svg_handler_rect_start()
787 if (rx) in svg_handler_rect_start()
801 if (rx) in svg_handler_rect_start()
[all …]

12345678910>>...230