Remove superfluous semicolons from testsuite throughout.

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.base / corefile.exp

diff --git a/gdb/testsuite/gdb.base/corefile.exp b/gdb/testsuite/gdb.base/corefile.exp
index d5996baa4231d5b4727062ef48f57ef7a8e401c4..054ed3e01cecc6a0d1376054e78938bd212397ed 100644 (file)
--- a/gdb/testsuite/gdb.base/corefile.exp
+++ b/gdb/testsuite/gdb.base/corefile.exp
@@ -84,14 +84,14 @@ expect {
 # See previous comments above, they are still applicable.
 #
 
-close;
+close
 
 if $verbose>1 then {
     send_user "Spawning $GDB $INTERNAL_GDBFLAGS $GDBFLAGS $binfile -core=$corefile\n"
 }
 
 
-eval "spawn $GDB $INTERNAL_GDBFLAGS $GDBFLAGS $binfile -core=$corefile";
+eval "spawn $GDB $INTERNAL_GDBFLAGS $GDBFLAGS $binfile -core=$corefile"
 expect {
     -re "Core was generated by .*coremaker.*\r\n\#0  .*\(\).*\r\n$gdb_prompt $" {
        pass "args: execfile -core=[file tail $corefile]"
@@ -108,7 +108,7 @@ expect {
 set timeout $oldtimeout
 verbose "Timeout is now $timeout seconds" 2
 
-close;
+close
 
 # Now restart normally.
 
@@ -122,7 +122,7 @@ gdb_test_multiple "core-file $corefile" "core-file command" {
     -re ".* program is being debugged already.*y or n. $" {
        # gdb_load may connect us to a gdbserver.
        send_gdb "y\n"
-       exp_continue;
+       exp_continue
     }
     -re "Core was generated by .*coremaker.*\r\n\#0  .*\(\).*\r\n$gdb_prompt $" {
        pass "core-file command"
@@ -228,7 +228,7 @@ gdb_exit
 
 if ![is_remote target] {
     set test "attach: spawn sleep"
-    set res [remote_spawn host "$binfile sleep"];
+    set res [remote_spawn host "$binfile sleep"]
     if { $res < 0 || $res == "" } {
        fail $test
        return