From: Nathaniel Wesley Filardo Date: Sat, 10 Feb 2018 23:51:50 +0000 (-0500) Subject: simplify discard of extraneous lines in lcdproclib X-Git-Url: https://hydra-www.ietfng.org/gitweb/?a=commitdiff_plain;h=b4637110c8942a85d1c1bb9e535bde4c0b202a87;p=acmetensortoys-snakecontrol simplify discard of extraneous lines in lcdproclib --- diff --git a/bin/lcdproclib.tcl b/bin/lcdproclib.tcl index cffe11f..95ec8ad 100644 --- a/bin/lcdproclib.tcl +++ b/bin/lcdproclib.tcl @@ -10,15 +10,12 @@ proc ::lcdproclib::cmd {sid cmd} { while { true } { expect { -i ${sid} -re "^success\[^\n\]*\n" { return } - -i ${sid} -re "^\r\n" { } - -i ${sid} -re "^listen\[^\n\]*\n" {} - -i ${sid} -re "^ignore\[^\n\]*\n" {} + -i ${sid} -re "\[^\n\]*\n" { } timeout { error "LCD protocol failure while waiting for success?" } } } } - -i ${sid} -re "^listen\[^\n\]*\n" {} - -i ${sid} -re "^ignore\[^\n\]*\n" {} + -i ${sid} -re "\[^\n\]*\n" { } timeout { error "LCD protocol failure while waiting for echo?" } } }