pcre: fix tc that failed on Windows

2013-10-25 17:47:58 +02:00 · 2013-10-25 17:47:58 +02:00 · 0c08896981
parent a7648bb5a8
commit 0c08896981
1 changed files with 5 additions and 1 deletions
--- a/basis/pcre/pcre-tests.factor
+++ b/basis/pcre/pcre-tests.factor
@ -14,7 +14,11 @@ IN: pcre.tests

 CONSTANT: iso-date "(?P<year>\\d{4})-(?P<month>\\d{2})-(?P<day>\\d{2})"

-[ { f -1 } ] [ "foo" (pcre) 3array 1 tail ] unit-test
+! On windows the erroffset appears to be set to 0 despite there being
+! nothing wrong with the regexp.
+[ t ] [
+    "foo" (pcre) 3array 1 tail { { f -1 } { f 0 } } member?
+] unit-test

 [ { 1 2 3 } ] [
    iso-date <pcre>