Skip to content
Snippets Groups Projects
Commit 9e6eec17 authored by Per Cederqvist's avatar Per Cederqvist
Browse files

Use "$hollerith" instead of a hard-coded regexp to match any string,

to avoid parsing past newlines.
parent 5c7ab74a
No related branches found
No related tags found
No related merge requests found
...@@ -521,10 +521,10 @@ extracting_expect "=2000 ($any_num)" session_no 1 ...@@ -521,10 +521,10 @@ extracting_expect "=2000 ($any_num)" session_no 1
kom_login 8 "pw3" 0 kom_login 8 "pw3" 0
send "2001 54 0\n" send "2001 54 0\n"
simple_expect "=2001 8 0 $session_no 0H \[0-9\]*H.* $any_num $any_time" simple_expect "=2001 8 0 $session_no 0H $hollerith $any_num $any_time"
send "2002 64 0\n" send "2002 64 0\n"
simple_expect "=2002 8 0 $session_no 0H \[0-9\]*H.* \[0-9\]*H.* \[0-9\]*H.* $any_num $any_time" simple_expect "=2002 8 0 $session_no 0H $hollerith $hollerith $hollerith $any_num $any_time"
send "2003 69 [holl "DejaGnu Test Suite"] [holl "2-0"]\n" send "2003 69 [holl "DejaGnu Test Suite"] [holl "2-0"]\n"
simple_expect "=2003" simple_expect "=2003"
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment