diff --git a/ld/testsuite/ChangeLog b/ld/testsuite/ChangeLog
index 3abac4cf1178c3891a147fafd9f8a0a17f0de582..53527650df0136a2a99d36e8d9a0f04526ae74e1 100644
--- a/ld/testsuite/ChangeLog
+++ b/ld/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2004-05-12  Ben Elliston  <bje@au.ibm.com>
+
+	* ld-sh/sh64/relax.exp: Remove stray semicolons.
+	* ld-sh/sh64/relfail.exp: Likewise.
+	* lib/ld-lib.exp: Likewise.
+
 2004-05-11  Jakub Jelinek  <jakub@redhat.com>
 
 	* ld-i386/tlspic.rd: Adjust for section reordering changes
diff --git a/ld/testsuite/ld-sh/sh64/relax.exp b/ld/testsuite/ld-sh/sh64/relax.exp
index 5c8c996cb4b4276ae884bcfaac4b5f456f94ae25..43fefcefcd7935eabcfab02342e75b73a3dbebdf 100644
--- a/ld/testsuite/ld-sh/sh64/relax.exp
+++ b/ld/testsuite/ld-sh/sh64/relax.exp
@@ -116,7 +116,7 @@ proc run_sh64relaxtest {sh64relaxtests} {
 	    
 	    if {$expect_relaxed == -1} {
 		pass $testname
-		continue;
+		continue
 	    }
 	    
 	    verbose "$testname: file $binfile doesn't exist" 1
diff --git a/ld/testsuite/ld-sh/sh64/relfail.exp b/ld/testsuite/ld-sh/sh64/relfail.exp
index f9f9210bf7788cb85f0e8d73adfc33c7bb84c53a..7cbe108d3e463153dabb2ba4df06919ca6dab206 100644
--- a/ld/testsuite/ld-sh/sh64/relfail.exp
+++ b/ld/testsuite/ld-sh/sh64/relfail.exp
@@ -150,10 +150,10 @@ proc run_sh64relfailtests {sh64relfailtests} {
 	}
 	
 	if {$as_options == ""} {
-	    set as_options $def_as_options;
+	    set as_options $def_as_options
 	}
 	if {$ld_options == ""} {
-	    set ld_options $def_ld_options;
+	    set ld_options $def_ld_options
 	}
 	
 	if { $is_unresolved } {
@@ -165,7 +165,7 @@ proc run_sh64relfailtests {sh64relfailtests} {
 	puts $asm " .text"
 	puts $asm " .global $startsym"
 	puts $asm "$startsym:"
-	puts $asm " $opcode";
+	puts $asm " $opcode"
 	close $asm
 	
 	if ![ld_assemble $as "$as_options tmpdir/relfail-$testindex.s" "tmpdir/relfail-$testindex.o"] {
diff --git a/ld/testsuite/lib/ld-lib.exp b/ld/testsuite/lib/ld-lib.exp
index acb7a5d175defc44761bbf195fbda6ab43f73579..3758937f2cd17a997637a17b0b6eeaa3c946c447 100644
--- a/ld/testsuite/lib/ld-lib.exp
+++ b/ld/testsuite/lib/ld-lib.exp
@@ -90,7 +90,7 @@ proc is_endian_output_format { object_flags } {
 proc big_or_little_endian {} {
 
     if [board_info [target_info name] exists multilib_flags] {
-	set tmp_flags " [board_info [target_info name] multilib_flags]";
+	set tmp_flags " [board_info [target_info name] multilib_flags]"
 
 	foreach x $tmp_flags {
 	    case $x in {
@@ -235,7 +235,7 @@ proc default_ld_compile { cc source object } {
     }
 
     if [board_info [target_info name] exists multilib_flags] {
-	append flags " [board_info [target_info name] multilib_flags]";
+	append flags " [board_info [target_info name] multilib_flags]"
     }
 
     verbose -log "$cc $flags -c $source -o $object"