Bug fix: regexp should not treat \n as |

Remove a "feature" in the built-in regexp, where
a newline in the pattern was treated as alternation, like |.

Signed-off-by: Steve Bennett <steveb@workware.net.au>

1 files changed, 4 insertions, 0 deletions

diff --git a/tests/regexp.test b/tests/regexp.test
index a198fc8..885e44c 100644
--- a/tests/regexp.test
+++ b/tests/regexp.test
@@ -640,6 +640,10 @@ test regexp-21.13 {multiple matches handle newlines} {
     regexp -all -inline -indices -line -- ^ "a\nb\nc"
 } {{0 -1} {2 1} {4 3}}
 
+test regexp-21.14 {Literal newline in pattern} {
+    regexp -all -inline "\n(\[ \t\]+)" "\n\t\t# This  is  a test"
+} "{\n\t\t} {\t\t}"
+
 test regexp-22.1 {effect of caching} jim {
 
     set filedata {BEGIN_TABLE ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; END_TABLE}