Skip to content

Commit f7a1a80

Browse files
committed
Fix bogus link in test comments.
I apparently copied-and-pasted the wrong link in commit ca8217c. Point it where it was meant to go.
1 parent 9486e7b commit f7a1a80

File tree

2 files changed

+2
-2
lines changed

2 files changed

+2
-2
lines changed

src/test/modules/test_regex/expected/test_regex.out

+1-1
Original file line numberDiff line numberDiff line change
@@ -506,7 +506,7 @@ ERROR: invalid regular expression: quantifier operand invalid
506506
select * from test_regex('?', '', '-');
507507
ERROR: invalid regular expression: quantifier operand invalid
508508
-- These two are not yet incorporated in Tcl, cf
509-
-- https://core.tcl-lang.org/tcl/artifact/106269fa65d96b83
509+
-- https://core.tcl-lang.org/tcl/tktview?name=5ea71fdcd3291c38
510510
-- expectError 6.21 - {x(\w)(?=(\1))} ESUBREG
511511
select * from test_regex('x(\w)(?=(\1))', '', '-');
512512
ERROR: invalid regular expression: invalid backreference number

src/test/modules/test_regex/sql/test_regex.sql

+1-1
Original file line numberDiff line numberDiff line change
@@ -171,7 +171,7 @@ select * from test_regex('+', '', '-');
171171
select * from test_regex('?', '', '-');
172172

173173
-- These two are not yet incorporated in Tcl, cf
174-
-- https://core.tcl-lang.org/tcl/artifact/106269fa65d96b83
174+
-- https://core.tcl-lang.org/tcl/tktview?name=5ea71fdcd3291c38
175175
-- expectError 6.21 - {x(\w)(?=(\1))} ESUBREG
176176
select * from test_regex('x(\w)(?=(\1))', '', '-');
177177
-- expectMatch 6.22 HP {x(?=((foo)))} xfoo x

0 commit comments

Comments
 (0)