regsub: Fix regsub -all with \A
commita942eef12415e0b53e04279259dd92cca4d444f0
authorSteve Bennett <steveb@workware.net.au>
Mon, 4 May 2020 05:02:19 +0000 (4 15:02 +1000)
committerSteve Bennett <steveb@workware.net.au>
Mon, 4 May 2020 11:57:37 +0000 (4 21:57 +1000)
tree34edc849d5b2b528d3986e3782bbb44261f6b75f
parentac35b8a6ec417f75b5ec86ca64ea1614a8170a38
regsub: Fix regsub -all with \A

regsub -all matches \A against the start of each match, but
correctly handle a pattern like ^ which does not advance the
match

Signed-off-by: Steve Bennett <steveb@workware.net.au>
jim-regexp.c
jim_tcl.txt
tests/regexp.test