X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Fregexp%2Fregexp-tests.factor;h=cdbe7742efcfa05435ddf2545c2d307ad25ae380;hp=36e877a03f2354655362c0ee0197656c2153f15a;hb=c0f0342d9ae9197401af909d86204c2d1f89559a;hpb=528de2849f6e31f45750b5276bec49123df03f58

diff --git a/basis/regexp/regexp-tests.factor b/basis/regexp/regexp-tests.factor
index 36e877a03f..cdbe7742ef 100644
--- a/basis/regexp/regexp-tests.factor
+++ b/basis/regexp/regexp-tests.factor
@@ -513,6 +513,9 @@ unit-test
 
 { 3 } [ "caba" "(?<=b)a" <regexp> first-match from>> ] unit-test
 
+{ "<" } [ "<style>" R/ <(?=STYLE\b)/i first-match >string ] unit-test
+{ "bar" } [ "foobar" R/ (?<=FOO)BAR/i first-match >string ] unit-test
+
 { t } [ "\ra" R/ .^a/ms matches? ] unit-test
 { f } [ "\ra" R/ .^a/mds matches? ] unit-test
 { t } [ "\na" R/ .^a/ms matches? ] unit-test