* testsuite/lib/libsup.exp: Remove unnecessary quotes around

variable expansions.
	* testsuite/lib/util-defs.exp: Likewise.

ChangeLog

@@ -1,3 +1,9 @@
+2018-12-09  Ben Elliston  <bje@gnu.org>
+
+	* testsuite/lib/libsup.exp: Remove unnecessary quotes around
+	variable expansions.
+	* testsuite/lib/util-defs.exp: Likewise.
+
 2018-12-09  Ben Elliston  <bje@gnu.org>
 
 	* baseboards/androideabi.exp: Remove unnecessary quotes and braces

testsuite/lib/libsup.exp

@@ -87,7 +87,7 @@ proc start_expect { } {
     #    catch wait
 
     # Start expect runing
-    spawn "$EXPECT"
+    spawn $EXPECT
     expect {
 	-re "expect.*> " {
 	    verbose "Started the child expect shell" 2
@@ -169,11 +169,11 @@ proc exp_test { cmd pattern msg } {
 	    warning "$msg, 0 was returned"
 	    exp_continue
 	}
-	"$pattern" {
-	    pass "$msg"
+	$pattern {
+	    pass $msg
 	}
 	timeout {
-	    fail "$msg"
+	    fail $msg
 	}
     }
 }
@@ -200,10 +200,10 @@ proc config_test { cmd true false msg } {
 	    exp_continue
 	}
 	-re "\r\n1\r\n" {
-	    $true "$msg"
+	    $true $msg
 	}
 	-re "\r\n0\r\n" {
-	    $false "$msg"
+	    $false $msg
 	}
 	timeout {
 	    perror "$msg (timed out)"

testsuite/lib/util-defs.exp

@@ -61,7 +61,7 @@ proc util_test { args } {
     verbose "Output is \"$comp_output\"" 2
     verbose "Pattern is \"$pattern\"" 2
 
-    if [regexp "$pattern" $comp_output] {
+    if [regexp $pattern $comp_output] {
 	verbose "Pattern matches." 2
 	return 0
     }