tests: interactive.test: fix for posix regex

If using POSIX regex instead of the builtin jim regex,
\r and \n character escapes are not supported.
Use literal \r and \n instead.

Signed-off-by: Steve Bennett <[email protected]>

Author: msteveb

tests/interactive.test

@@ -31,15 +31,15 @@ file delete test_history
 wait-for-prompt $p
 $p send "history load test_history\r"
 # skip echoed output
-$p expect {\r\n}
+$p expect "\r\n"
 wait-for-prompt $p
 
 test interactive-1.1 {basic command} -body {
 	$p send "lsort \[info commands li*\]\r"
 	# skip echoed output
-	$p expect {\r\n}
+	$p expect "\r\n"
 	# get command result
-	$p expect {\r\n}
+	$p expect "\r\n"
 	$p before
 } -result {lindex linsert list} -cleanup {
 	wait-for-prompt $p
@@ -57,45 +57,45 @@ test interactive-1.2 {command line completion} lineedit {
 		$p expect {list} { incr check }
 		$p send \r
 	}
-	$p expect {\r\n}
+	$p expect "\r\n"
 	wait-for-prompt $p
 
 	list $check $failed
 } {3 0}
 
 test interactive-1.3 {history show} -constraints lineedit -body {
 	$p send "history show\r"
-	$p expect {\r\n}
-	$p expect {history show\r\n}
+	$p expect "\r\n"
+	$p expect "history show\r\n"
 	string cat [$p before] [$p after]
 } -result "   1 history load test_history\r\n   2 lsort \[info commands li*\]\r\n   3 list\r\n   4 history show\r\n" -cleanup {
 	wait-for-prompt $p
 }
 
 test interactive-1.4 {history getline} -constraints lineedit -body {
 	$p send "history getline {PROMPT> }\r"
-	$p expect {\r\n}
+	$p expect "\r\n"
 	sleep 0.25
 	$p send "abc\bd\x01e\r"
-	$p expect {\r\n}
-	$p expect {\r\n}
+	$p expect "\r\n"
+	$p expect "\r\n"
 	$p before
 } -result {eabd} -cleanup {
 	wait-for-prompt $p
 }
 
 test interactive-1.5 {history getline} -constraints lineedit -body {
 	$p send "set len \[history getline {PROMPT> } buf\]\r"
-	$p expect {\r\n}
+	$p expect "\r\n"
 	sleep 0.25
 	$p send "abcde\r"
-	$p expect {\r\n}
-	$p expect {\r\n}
+	$p expect "\r\n"
+	$p expect "\r\n"
 	sleep 0.25
 	$p wait-for-prompt
 	$p send "list \$len \$buf\r"
-	$p expect {\r\n}
-	$p expect {\r\n}
+	$p expect "\r\n"
+	$p expect "\r\n"
 	$p before
 } -result {5 abcde} -cleanup {
 	wait-for-prompt $p
@@ -108,9 +108,9 @@ test interactive-1.6 {insert wide character} -constraints {utf8 lineedit} -body
 	$p send \x1bOD
 	$p send y
 	$p send \r
-	$p expect {\r\n}
+	$p expect "\r\n"
 	sleep 0.25
-	$p expect {\r\n}
+	$p expect "\r\n"
 	$p before
 } -result ay\u1100b -cleanup {
 	wait-for-prompt $p
@@ -123,9 +123,9 @@ test interactive-1.7 {insert utf-8 combining character} -constraints {utf8 linee
 	$p send \x1bOD
 	$p send y
 	$p send \r
-	$p expect {\r\n}
+	$p expect "\r\n"
 	sleep 0.25
-	$p expect {\r\n}
+	$p expect "\r\n"
 	$p before
 } -result yx\u0300 -cleanup {
 	wait-for-prompt $p