aboutsummaryrefslogtreecommitdiff
path: root/src/test/modules/test_regex
diff options
context:
space:
mode:
Diffstat (limited to 'src/test/modules/test_regex')
-rw-r--r--src/test/modules/test_regex/expected/test_regex.out8
-rw-r--r--src/test/modules/test_regex/sql/test_regex.sql2
2 files changed, 10 insertions, 0 deletions
diff --git a/src/test/modules/test_regex/expected/test_regex.out b/src/test/modules/test_regex/expected/test_regex.out
index ed1b0cbdb9b..0dc2265d8b2 100644
--- a/src/test/modules/test_regex/expected/test_regex.out
+++ b/src/test/modules/test_regex/expected/test_regex.out
@@ -614,6 +614,14 @@ ERROR: invalid regular expression: quantifier operand invalid
-- expectError 7.15 - a*+ BADRPT
select * from test_regex('a*+', '', '-');
ERROR: invalid regular expression: quantifier operand invalid
+-- test for ancient brenext() bug; not currently in Tcl
+select * from test_regex('.*b', 'aaabbb', 'b');
+ test_regex
+------------
+ {0}
+ {aaabbb}
+(2 rows)
+
-- doing 8 "braces"
-- expectMatch 8.1 NQ "a{0,1}" "" ""
select * from test_regex('a{0,1}', '', 'NQ');
diff --git a/src/test/modules/test_regex/sql/test_regex.sql b/src/test/modules/test_regex/sql/test_regex.sql
index 4676cd1a060..1a2bfa62357 100644
--- a/src/test/modules/test_regex/sql/test_regex.sql
+++ b/src/test/modules/test_regex/sql/test_regex.sql
@@ -214,6 +214,8 @@ select * from test_regex('a?*', '', '-');
select * from test_regex('a+*', '', '-');
-- expectError 7.15 - a*+ BADRPT
select * from test_regex('a*+', '', '-');
+-- test for ancient brenext() bug; not currently in Tcl
+select * from test_regex('.*b', 'aaabbb', 'b');
-- doing 8 "braces"