This commit is contained in:
waldemar%netscape.com 2002-08-13 23:56:53 +00:00
Родитель fdbfdd5d57
Коммит ba5a07c1a1
1 изменённых файлов: 1 добавлений и 0 удалений

Просмотреть файл

@ -669,6 +669,7 @@
(run-regexp "^(a\\1?){4}$" "aaaaaaaaaa") (run-regexp "^(a\\1?){4}$" "aaaaaaaaaa")
(run-regexp "(?:(f)(o)(o)|(b)(a)(r))*" "foobar") (run-regexp "(?:(f)(o)(o)|(b)(a)(r))*" "foobar")
(run-regexp "(a)?a(b)" "ab") (run-regexp "(a)?a(b)" "ab")
(run-regexp "^(?:b|a(?=(.)))*\\1" "abc")
|# |#
#+allegro (clean-grammar *rg*) ;Remove this line if you wish to print the grammar's state tables. #+allegro (clean-grammar *rg*) ;Remove this line if you wish to print the grammar's state tables.