diff options
| author | Steve Bennett <steveb@workware.net.au> | 2022-12-03 11:15:02 +1000 |
|---|---|---|
| committer | Steve Bennett <steveb@workware.net.au> | 2022-12-03 11:18:01 +1000 |
| commit | c9f2fdaede9414e65f4c19174b0c4e8244830e28 (patch) | |
| tree | 522ef8da25b79dd2b64385704b452e2ebe6853ff /tests/regexp2.test | |
| parent | 7bc75b1a8a3b6f8fadd8a45c7e7e2f1b2473a5b6 (diff) | |
| download | jimtcl-c9f2fdaede9414e65f4c19174b0c4e8244830e28.zip jimtcl-c9f2fdaede9414e65f4c19174b0c4e8244830e28.tar.gz jimtcl-c9f2fdaede9414e65f4c19174b0c4e8244830e28.tar.bz2 | |
regexp: fix end of word check
The end of word check was wrong and return true when it should not.
Fixes #246
Signed-off-by: Steve Bennett <steveb@workware.net.au>
Diffstat (limited to 'tests/regexp2.test')
| -rw-r--r-- | tests/regexp2.test | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/tests/regexp2.test b/tests/regexp2.test index 9b6cdcf..156454f 100644 --- a/tests/regexp2.test +++ b/tests/regexp2.test @@ -940,4 +940,8 @@ test regexp-25.2 {Single braced count} { regexp "a{4}" baaaad } 1 +test regexp-25.3 {End of word} { + regexp {\mcd\M} cdef +} 0 + testreport |