/dports/lang/racket/racket-8.3/share/pkgs/eopl/private/ |
H A D | sllboth.rkt | 9 sllgen:make-tester-regexp 10 sllgen:make-or-regexp 11 sllgen:make-arbno-regexp 12 sllgen:make-concat-regexp 18 sllgen:make-char-tester 22 '(string make-string symbol make-symbol number make-number skip)) 31 (define sllgen:make-tester-regexp (lambda (x) x)) 32 (define sllgen:make-or-regexp (lambda (res) (cons 'or res))) 33 (define sllgen:make-arbno-regexp (lambda (re) (list 'arbno re))) 34 (define sllgen:make-concat-regexp (lambda (rs) (cons 'concat rs))) [all …]
|
/dports/lang/guile1/guile-1.8.8/test-suite/tests/ |
H A D | regexp.test | 45 ;;; make-regexp 48 (with-test-prefix "make-regexp" 51 (make-regexp)) 54 (make-regexp 'blah)) 58 (make-regexp "xyz" 'abc)) 61 (make-regexp "xyz" regexp/icase 'abc))) 82 (let ((re (make-regexp "ab+"))) 86 (let ((re (make-regexp "ab+"))) 90 (let ((re (make-regexp "ab+"))) 162 (let ((m (regexp-exec (make-regexp q flag) s))) [all …]
|
/dports/lang/racket-minimal/racket-8.3/src/ |
H A D | makemake.rkt | 12 (define vars (make-hasheq)) 13 (define target-uses (make-hasheq)) 17 (define target-calls (make-hasheq)) 22 (define (read-make-line in) 28 (read-make-line in))] 82 (define l (expand-macros (read-make-line in))) 87 (define next-l (read-make-line in)) 137 [(regexp-try-match rx:cd-make i) 141 (define m (regexp-match rx:make i)) 217 [(regexp-try-match rx:cd-make i 0 #f (current-output-port)) [all …]
|
/dports/lang/racket/racket-8.3/src/ |
H A D | makemake.rkt | 12 (define vars (make-hasheq)) 13 (define target-uses (make-hasheq)) 17 (define target-calls (make-hasheq)) 22 (define (read-make-line in) 28 (read-make-line in))] 82 (define l (expand-macros (read-make-line in))) 87 (define next-l (read-make-line in)) 137 [(regexp-try-match rx:cd-make i) 141 (define m (regexp-match rx:make i)) 217 [(regexp-try-match rx:cd-make i 0 #f (current-output-port)) [all …]
|
/dports/lang/racket-minimal/racket-8.3/src/regexp/ |
H A D | demo.rkt | 55 (test (rx:regexp-match #"(.)x" (open-input-string (string-append (make-string 50000 #\y) "x"))) 57 (test (rx:regexp-match-positions #"(.)x" (open-input-string (string-append (make-string 50000 #\y) … 59 (test (rx:regexp-match "(.)x" (string-append (make-string 50000 #\y) "x")) 61 (test (rx:regexp-match-positions "(.)x" (string-append (make-string 50000 #\y) "x")) 63 (test (rx:regexp-match "(.)\u3BC" (string-append (make-string 50000 #\u3BB) "\u3BC")) 65 (test (rx:regexp-match-positions "(.)\u3BC" (string-append (make-string 50000 #\y) "\u3BC")) 145 (define-values (i o) (make-pipe)) 150 (define-values (i o) (make-pipe)) 155 (define-values (i o) (make-pipe)) 162 (test (rx:regexp-replace* (rx:regexp "a") (make-string (* 1024 1024) #\a) "x") [all …]
|
H A D | Makefile | 7 regexp-src: 8 $(RACO) make ../expander/bootstrap-run.rkt 9 $(MAKE) regexp-src-generate 14 --depends $(BUILDDIR)compiled/regexp-dep.rktd \ 15 --makefile-depends $(DEPENDSDIR)compiled/regexp.rktl $(BUILDDIR)compiled/regexp.d \ 18 -o $(BUILDDIR)compiled/regexp.rktl 21 regexp-src-generate: 25 $(RACO) make demo.rkt 30 $(RACO) make ../expander/bootstrap-run.rkt 35 $(RACO) make ../expander/bootstrap-run.rkt [all …]
|
/dports/lang/racket/racket-8.3/src/regexp/ |
H A D | demo.rkt | 55 (test (rx:regexp-match #"(.)x" (open-input-string (string-append (make-string 50000 #\y) "x"))) 57 (test (rx:regexp-match-positions #"(.)x" (open-input-string (string-append (make-string 50000 #\y) … 59 (test (rx:regexp-match "(.)x" (string-append (make-string 50000 #\y) "x")) 61 (test (rx:regexp-match-positions "(.)x" (string-append (make-string 50000 #\y) "x")) 63 (test (rx:regexp-match "(.)\u3BC" (string-append (make-string 50000 #\u3BB) "\u3BC")) 65 (test (rx:regexp-match-positions "(.)\u3BC" (string-append (make-string 50000 #\y) "\u3BC")) 145 (define-values (i o) (make-pipe)) 150 (define-values (i o) (make-pipe)) 155 (define-values (i o) (make-pipe)) 162 (test (rx:regexp-replace* (rx:regexp "a") (make-string (* 1024 1024) #\a) "x") [all …]
|
H A D | Makefile | 7 regexp-src: 8 $(RACO) make ../expander/bootstrap-run.rkt 9 $(MAKE) regexp-src-generate 14 --depends $(BUILDDIR)compiled/regexp-dep.rktd \ 15 --makefile-depends $(DEPENDSDIR)compiled/regexp.rktl $(BUILDDIR)compiled/regexp.d \ 18 -o $(BUILDDIR)compiled/regexp.rktl 21 regexp-src-generate: 25 $(RACO) make demo.rkt 30 $(RACO) make ../expander/bootstrap-run.rkt 35 $(RACO) make ../expander/bootstrap-run.rkt [all …]
|
/dports/lang/guile2/guile-2.2.7/test-suite/tests/ |
H A D | regexp.test | 53 ;;; make-regexp 56 (with-test-prefix "make-regexp" 59 (make-regexp)) 62 (make-regexp 'blah)) 66 (make-regexp "xyz" 'abc)) 69 (make-regexp "xyz" regexp/icase 'abc))) 90 (let ((re (make-regexp "ab+"))) 94 (let ((re (make-regexp "ab+"))) 98 (let ((re (make-regexp "ab+"))) 105 (let ((re (make-regexp "ab+"))) [all …]
|
/dports/lang/guile/guile-3.0.7/test-suite/tests/ |
H A D | regexp.test | 53 ;;; make-regexp 56 (with-test-prefix "make-regexp" 59 (make-regexp)) 62 (make-regexp 'blah)) 66 (make-regexp "xyz" 'abc)) 69 (make-regexp "xyz" regexp/icase 'abc))) 90 (let ((re (make-regexp "ab+"))) 94 (let ((re (make-regexp "ab+"))) 98 (let ((re (make-regexp "ab+"))) 105 (let ((re (make-regexp "ab+"))) [all …]
|
/dports/lang/racket/racket-8.3/share/pkgs/racket-doc/scribblings/reference/ |
H A D | match-parse.rkt | 11 (make-element variable-color (list s))) 15 (make-element #f 26 [(regexp-match-positions #rx"pat" s) 28 [(regexp-match-positions #rx"qp" s) 62 (apply make-prefab-struct 76 (make-element symbol-color '("..."))] 79 (make-element #f (list (make-element symbol-color '("__")) 82 (make-element #f (list (make-element symbol-color '("..")) 99 (make-flow (list (make-paragraph (list e))))) 113 (make-table [all …]
|
H A D | reader-example.rkt | 32 (make-table 36 (list (make-flow 39 (make-style #f (list (make-table-columns 56 (regexp-replace* #rx"[\\]\"" 57 (regexp-replace* 93 [(or (regexp? v) 94 (byte-regexp? v)) 98 [(byte-regexp? v) 'byte-regexp] 99 [else 'regexp]) 113 (make-table [all …]
|
/dports/lang/racket/racket-8.3/share/pkgs/syntax-color-lib/syntax-color/ |
H A D | scribble-lexer.rkt | 19 (define (make-rx:opener #:command-char [at #\@]) 20 (regexp (format "^[|]([^~aa-zA-Z0-9 \t\r\n\f\\\177-\377{]*){" (regexp-quote (string at))))) 22 (define rxes (make-weak-hash)) 23 (define rx-keys (make-weak-hasheq)) 25 (define (intern-byte-regexp bstr) 35 (define rx:^@ (regexp (format "^~a" (regexp-quote (string at))))) 39 (make-text rx:^@ 124 (make-args) 143 (cons (make-text rx:^@ 168 (cons (make-text (byte-rx #"^[|]" re-opener (regexp-quote at-bytes)) [all …]
|
/dports/lang/fth/fth-1.4.1/tests/ |
H A D | regexp-test.fs | 32 \ regexp? 33 "x" make-regexp regexp? not "regexp? (1)" test-expr 34 /^s/ regexp? not "regexp? (2)" test-expr 35 nil regexp? "regexp? (3)" test-expr 36 \ make-regexp 37 "(bar)" make-regexp { re1 } 38 "(B|b)+" make-regexp { re2 } 39 re1 regexp? not "re1 make-regexp not" test-expr 40 re2 regexp? not "re2 make-regexp not" test-expr 41 \ regexp-match (alias regexp= and re=) [all …]
|
/dports/www/guile-www/guile-www-1.1.1/contrib/ |
H A D | ssl-support.diff | 52 (define-public (url:make-http host port path) 54 +(define-public (url:make-https host port path) 58 (define-public (url:make-mailto address) 61 (define http-regexp (make-regexp "^http://([^:/]+)(:([0-9]+))?(/(.*))?$")) 62 +(define https-regexp (make-regexp "^https://([^:/]+)(:([0-9]+))?(/(.*))?$")) 63 (define ftp-regexp 64 (make-regexp "^ftp://(([^@:/]+)@)?([^:/]+)(:([0-9]+))?(/(.*))?$")) 65 (define mailto-regexp (make-regexp "^mailto:(.*)$")) 71 + ((regexp-exec https-regexp url) 73 + (url:make-https (match:substring m 1) [all …]
|
/dports/lang/racket/racket-8.3/src/bc/src/ |
H A D | makex.rkt | 4 (define list-mode (make-parameter #f)) 5 (define assign-mode (make-parameter #f)) 6 (define exports-mode (make-parameter #f)) 7 (define winex-mode (make-parameter #f)) 8 (define gwinex-mode (make-parameter #f)) 9 (define gcalert-mode (make-parameter #f)) 10 (define precisegc-mode (make-parameter #f)) 52 [(regexp-match #rx"^/[*]" l) 55 [(regexp-match #rx"^#" l) 58 [(regexp-match? #rx"^ *$" l) [all …]
|
/dports/lang/racket-minimal/racket-8.3/src/bc/src/ |
H A D | makex.rkt | 4 (define list-mode (make-parameter #f)) 5 (define assign-mode (make-parameter #f)) 6 (define exports-mode (make-parameter #f)) 7 (define winex-mode (make-parameter #f)) 8 (define gwinex-mode (make-parameter #f)) 9 (define gcalert-mode (make-parameter #f)) 10 (define precisegc-mode (make-parameter #f)) 52 [(regexp-match #rx"^/[*]" l) 55 [(regexp-match #rx"^#" l) 58 [(regexp-match? #rx"^ *$" l) [all …]
|
/dports/net/tinyfugue/tf-50b8/os2/ |
H A D | make.tl | 9 @echo "#### Use 'make VIDEO=ANSI' to build ansi-version (default)" 11 @echo "#### Use 'make VIDEO=TERMCAP' to build termcap-version" 14 @echo "#### Use 'make clean' for removing object-files" 27 -del regexp.o* 32 regexp.$O: regexp\regexp.h regexp\regexp.c regexp\regmagic.h config.h 33 cd regexp & \ 34 $(MAKE) "CFLAGS=$(CFLAGS)" "CC=$(CC)" "O=$(O)" regexp.$O & \ 35 @copy regexp.$O .. & \ 36 @del regexp.$O & \
|
/dports/net/tinyfugue-devel/tinyfugue-5.1.3/os2/ |
H A D | make.tl | 9 @echo "#### Use 'make VIDEO=ANSI' to build ansi-version (default)" 11 @echo "#### Use 'make VIDEO=TERMCAP' to build termcap-version" 14 @echo "#### Use 'make clean' for removing object-files" 27 -del regexp.o* 32 regexp.$O: regexp\regexp.h regexp\regexp.c regexp\regmagic.h config.h 33 cd regexp & \ 34 $(MAKE) "CFLAGS=$(CFLAGS)" "CC=$(CC)" "O=$(O)" regexp.$O & \ 35 @copy regexp.$O .. & \ 36 @del regexp.$O & \
|
/dports/cad/sp2sp/gwave2-20090213/utilities/ |
H A D | gwave-doc-snarf.in | 86 ; where the regexp RE matches. 89 (let ((r (make-regexp re))) 110 ; (regexp-exec (make-regexp "de+") "abcdeeef")) 111 ; (regexp-exec #+"de+" "abcdeeef") 116 (make-regexp s) 125 (s1 (regexp-substitute/global #f #+"^[ \t]*\\(" s 'post)) 126 (s2 (regexp-substitute/global #f #+"\\)[ \t]*$" s1 'pre)) 127 (s3 (regexp-substitute/global #f #+"[ \t]*SCM[ \t]*" s2 'pre 'post)) 133 (let ((rcaret (make-regexp "^\\^\\^"))) 137 (if (regexp-exec rcaret line)
|
/dports/lang/racket/racket-8.3/src/cs/ |
H A D | regexp.sls | 1 (library (regexp) 7 [unsafe-make-place-local rumble:unsafe-make-place-local] 13 (define-place-register-define define regexp-register-start regexp-register-count) 16 (include-generated "regexp.scm") 18 (define (any-regexp? v) 19 (or (1/regexp? v) 20 (1/byte-regexp? v))) 22 (set-intern-regexp?! any-regexp?) 23 (set-printable-regexp?! any-regexp?))
|
/dports/lang/racket-minimal/racket-8.3/src/cs/ |
H A D | regexp.sls | 1 (library (regexp) 7 [unsafe-make-place-local rumble:unsafe-make-place-local] 13 (define-place-register-define define regexp-register-start regexp-register-count) 16 (include-generated "regexp.scm") 18 (define (any-regexp? v) 19 (or (1/regexp? v) 20 (1/byte-regexp? v))) 22 (set-intern-regexp?! any-regexp?) 23 (set-printable-regexp?! any-regexp?))
|
/dports/lang/racket/racket-8.3/src/bc/sgc/ |
H A D | checkreg | 10 (define declared (make-hash-table)) 11 (define registered (make-hash-table)) 21 (define char-regexp (regexp "(.*)'.'(.*)")) 24 (define id-regexp (regexp id)) 44 (define comma-regexp (regexp "(.*),(.*)")) 45 (define equal-regexp (regexp "(.*)=(.*)")) 73 [(regexp-match comma-regexp vars) 77 [(regexp-match equal-regexp vars) 84 [(regexp-match id-regexp vars) 88 (make-decl type file))))] [all …]
|
/dports/lang/racket-minimal/racket-8.3/src/bc/sgc/ |
H A D | checkreg | 10 (define declared (make-hash-table)) 11 (define registered (make-hash-table)) 21 (define char-regexp (regexp "(.*)'.'(.*)")) 24 (define id-regexp (regexp id)) 44 (define comma-regexp (regexp "(.*),(.*)")) 45 (define equal-regexp (regexp "(.*)=(.*)")) 73 [(regexp-match comma-regexp vars) 77 [(regexp-match equal-regexp vars) 84 [(regexp-match id-regexp vars) 88 (make-decl type file))))] [all …]
|
/dports/devel/p5-Regexp-Bind/Regexp-Bind-0.05/ |
H A D | README | 10 $record = bind($string, $regexp, @fields); 11 @record = global_bind($string, $regexp, @fields); 13 $record = bind_array($string, $regexp); 14 @record = global_bind_array($string, $regexp); 20 This module is an extension to perl's native regexp func- 22 matched buffers. Both normal regexp syntax and embedded 23 regexp syntax are supported. You can view it as a tiny and 34 make 35 make test 36 make install
|