* consistency.vlad/vlad.exp: Remove trailing semicolons.

	* g++.dg/gcov/gcov.exp: Likewise.
	* gcc.c-torture/execute/ieee/ieee.exp: Likewise.
	* gcc.target/xstormy16/xstormy16.exp: Likewise.
	* lib/c-torture.exp: Likewise.
	* lib/fortran-torture.exp: Likewise.
	* lib/g++.exp: Likewise.
	* lib/gcc-defs.exp: Likewise.
	* lib/gcc-dg.exp: Likewise.
	* lib/gcc.exp: Likewise.
	* lib/gcov.exp: Likewise.
	* lib/gfortran.exp: Likewise.
	* lib/mike-g++.exp: Likewise.
	* lib/mike-gcc.exp: Likewise.
	* lib/objc-torture.exp: Likewise.
	* lib/objc.exp: Likewise.
	* lib/profopt.exp: Likewise.
	* lib/target-libpath.exp: Likewise.
	* lib/target-supports.exp: Likewise.
	* lib/treelang.exp: Likewise.
	* lib/wrapper.exp: Likewise.


git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96132 138bc75d-0d04-0410-961f-82ee72b054a4

1 files changed, 20 insertions, 20 deletions

diff --git a/gcc/testsuite/lib/objc-torture.exp b/gcc/testsuite/lib/objc-torture.exp
index 73cbc6a30a0..648cb1fba0d 100644
--- a/gcc/testsuite/lib/objc-torture.exp
+++ b/gcc/testsuite/lib/objc-torture.exp
@@ -80,7 +80,7 @@ proc objc-torture-compile { src option } {
     set options ""
     lappend options "additional_flags=-w $option"
 
-    set comp_output [objc_target_compile "$src" "$output" object $options];
+    set comp_output [objc_target_compile "$src" "$output" object $options]
     objc_check_compile $testcase $option $output $comp_output
     remote_file build delete $output
 }
@@ -98,9 +98,9 @@ proc objc-torture-execute { src args } {
     global tmpdir tool srcdir output compiler_conditional_xfail_data
 
     if { [llength $args] > 0 } {
-	set additional_flags [lindex $args 0];
+	set additional_flags [lindex $args 0]
     } else {
-	set additional_flags "";
+	set additional_flags ""
     }
     # Check for alternate driver.
     if [file exists [file rootname $src].x] {
@@ -132,14 +132,14 @@ proc objc-torture-execute { src args } {
 	set testcase "[file tail [file dirname $src]]/[file tail $src]"
     }
 
-    set count 0;
-    set oldstatus "foo";
+    set count 0
+    set oldstatus "foo"
     foreach option $option_list {
 	if { $count > 0 } {
-	    set oldexec $execname;
+	    set oldexec $execname
 	}
-	set execname "${executable}${count}";
-	incr count;
+	set execname "${executable}${count}"
+	incr count
 
 	# torture_{compile,execute}_xfail are set by the .x script
 	# (if present)
@@ -153,15 +153,15 @@ proc objc-torture-execute { src args } {
             set ignore_me [eval $torture_eval_before_compile]
 	}
 
-	remote_file build delete $execname;
+	remote_file build delete $execname
 	verbose "Testing $testcase, $option" 1
 
 	set options ""
 	lappend options "additional_flags=-w $option"
 	if { $additional_flags != "" } {
-	    lappend options "additional_flags=$additional_flags";
+	    lappend options "additional_flags=$additional_flags"
 	}
-	set comp_output [objc_target_compile "$src" "${execname}" executable $options];
+	set comp_output [objc_target_compile "$src" "${execname}" executable $options]
 
 	if ![objc_check_compile "$testcase compilation" $option $execname $comp_output] {
 	    unresolved "$testcase execution, $option"
@@ -200,26 +200,26 @@ proc objc-torture-execute { src args } {
 	# Do not do this for native testing since the cost to load/execute
 	# the test is fairly small and the comparison step actually slows
 	# the entire process down because it usually does not "hit".
-	set skip 0;
+	set skip 0
 	if { ![isnative] && [info exists oldexec] } {
 	    if { [remote_file build cmp $oldexec $execname] == 0 } {
-		set skip 1;
+		set skip 1
 	    }
 	}
 	if { $skip == 0 } {
 	    set result [objc_load "$execname" "" ""]
-	    set status [lindex $result 0];
-	    set output [lindex $result 1];
+	    set status [lindex $result 0]
+	    set output [lindex $result 1]
 	}
         if { $oldstatus == "pass" } {
-	    remote_file build delete $oldexec;
+	    remote_file build delete $oldexec
         }
 	$status "$testcase execution, $option"
-	set oldstatus $status;
+	set oldstatus $status
     }
     if [info exists status] {
 	if { $status == "pass" } {
-	    remote_file build delete $execname;
+	    remote_file build delete $execname
 	}
     }
 }
@@ -253,9 +253,9 @@ proc search_for { file pattern } {
 proc objc-torture { args } {
     global srcdir subdir compiler_conditional_xfail_data
 
-    set src [lindex $args 0];
+    set src [lindex $args 0]
     if { [llength $args] > 1 } {
-	set options [lindex $args 1];
+	set options [lindex $args 1]
     } else {
 	set options ""
     }