diff options
| author | Ben Elliston <bje@gnu.org> | 2018-12-12 12:57:00 +1100 |
|---|---|---|
| committer | Ben Elliston <bje@gnu.org> | 2018-12-12 12:57:00 +1100 |
| commit | 874edd44fc41aff555b8cc39d91b6576095135df (patch) | |
| tree | 9c4f48d766c74c88e275aa234eb24115ae6185d8 /lib/telnet.exp | |
| parent | b0b842d77c6fc8b9f6c9f19baa93fb20330f5301 (diff) | |
| download | dejagnu-874edd44fc41aff555b8cc39d91b6576095135df.zip dejagnu-874edd44fc41aff555b8cc39d91b6576095135df.tar.gz dejagnu-874edd44fc41aff555b8cc39d91b6576095135df.tar.bz2 | |
* config/gdb-comm.exp, config/gdb_stub.exp, config/vxworks.exp,
lib/dg.exp, lib/ftp.exp, lib/kermit.exp, lib/rlogin.exp,
lib/telnet.exp, runtest.exp, testsuite/lib/libsup.exp: Simplify
some regular expressions in constant strings by placing them
inside braces instead of quotes. This allows one level of
backslash quoting to be removed.
Diffstat (limited to 'lib/telnet.exp')
| -rw-r--r-- | lib/telnet.exp | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/telnet.exp b/lib/telnet.exp index 219684a..abb7db0 100644 --- a/lib/telnet.exp +++ b/lib/telnet.exp @@ -119,7 +119,7 @@ proc telnet_open { hostname args } { perror "telnet: need a password" break } - -re "advance.*y/n.*\\?" { + -re {advance.*y/n.*\?} { exp_send "n\n" exp_continue } @@ -140,7 +140,7 @@ proc telnet_open { hostname args } { sleep 20 exp_continue } - -re "Escape character is.*\\.\[\r\n\]" { + -re {Escape character is.*\.[\r\n]} { if { $raw || [board_info $connhost exists dont_wait_for_prompt] } { set result 0 } else { @@ -170,7 +170,7 @@ proc telnet_open { hostname args } { warning "telnet: connection closed by foreign host." break } - -re "\[\r\n\]+" { + -re {[\r\n]+} { exp_continue } timeout { @@ -227,11 +227,11 @@ proc telnet_binary { hostname } { remote_send $hostname "toggle binary\n" exp_continue } - -re "Negotiating binary.*\[\r\n\].*$" { } + -re {Negotiating binary.*[\r\n].*$} { } -re "binary.*unknown argument.*telnet> *$" { remote_send $hostname "mode character\n" } - -re "Already operating in binary.*\[\r\n\].*$" { } + -re {Already operating in binary.*[\r\n].*$} { } timeout { warning "Never got binary response from telnet." } |