зеркало из https://github.com/mozilla/pjs.git
Added U+0085 to the list of line terminators. Added a few interesting test cases.
This commit is contained in:
Родитель
8dcdb24b94
Коммит
40b8801175
|
@ -19,7 +19,7 @@
|
|||
(:character-literal #\A) :nbhy (:character-literal #\Z) ", and "
|
||||
(:character-literal #\a) :nbhy (:character-literal #\z) ")"))
|
||||
() t)
|
||||
(:line-terminator (#?000A #?000D #?2028 #?2029) () t)
|
||||
(:line-terminator (#?000A #?000D #?0085 #?2028 #?2029) () t)
|
||||
(:decimal-digit (#\0 #\1 #\2 #\3 #\4 #\5 #\6 #\7 #\8 #\9)
|
||||
(($default-action $default-action)
|
||||
(decimal-value $digit-value)))
|
||||
|
@ -663,6 +663,12 @@
|
|||
(run-regexp "a.." (concatenate 'string "a" (string #\newline) "bacd"))
|
||||
(run-regexp "a.." (concatenate 'string "a" (string #\newline) "bacd") :span t)
|
||||
|
||||
(run-regexp "(a|b*)*" "a")
|
||||
(run-regexp "(b*)*" "a")
|
||||
(run-regexp "^\\-?(\\d{1,}|\\.{0,})*(\\,\\d{1,})?$" "100.00")
|
||||
(run-regexp "^\\-?(\\d{1,}|\\.{0,})*(\\,\\d{1,})?$" "100,00")
|
||||
(run-regexp "^\\-?(\\d{1,}|\\.{0,})*(\\,\\d{1,})?$" "1.000,00")
|
||||
|
||||
(run-regexp "^(a\\1?){4}$" "aaaaaaaaaa")
|
||||
(run-regexp "(?:(f)(o)(o)|(b)(a)(r))*" "foobar")
|
||||
(run-regexp "(a)?a(b)" "ab")
|
||||
|
|
Загрузка…
Ссылка в новой задаче