another bug fix for conditionals

svn: r4334
This commit is contained in:
Matthew Flatt 2006-09-14 06:41:52 +00:00
parent b240bd0a3a
commit 567ea0f59b

View File

@ -1519,7 +1519,13 @@
(#"(?(?<!a)12|13)" #"b12" (#"12")) (#"(?(?<!a)12|13)" #"b12" (#"12"))
(#"(?(?<!a)12|13)" #"a13" (#"13")) (#"(?(?<!a)12|13)" #"a13" (#"13"))
(#"(?(?<!a)12|13)" #"b13" #f) (#"(?(?<!a)12|13)" #"b13" #f)
(#"(?(?<!a)12|13)" #"a12" #f))) (#"(?(?<!a)12|13)" #"a12" #f)
(#"^(E)?(?(1)aa|a)*$" #"Ea" #f)
(#"^(E)?(?(1)aa|a)*$" #"Eaa" (#"Eaa" #"E"))
(#"^(E)?(?(1)aa|a)*$" #"Eaaa" #f)
(#"^(E)?(?(1)aa|a)*$" #"Eaaaa" (#"Eaaaa" #"E"))
(#"^(E)?(?(1)aa|a)*$" #"aaa" (#"aaa" #f))
(#"^(E)?(?(1)aa|a)*$" #"aaaa" (#"aaaa" #f))))
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Test unicode-property patterns ;; Test unicode-property patterns