diff --git a/ld/testsuite/ChangeLog b/ld/testsuite/ChangeLog
index 9cff11e868e..b65e4f718f0 100644
--- a/ld/testsuite/ChangeLog
+++ b/ld/testsuite/ChangeLog
@@ -1,3 +1,7 @@
+2002-05-02  Richard Sandiford  <rsandifo@redhat.com>
+
+	* ld-scripts/map-address.exp: Quote conditions.
+
 2002-04-30  Richard Sandiford  <rsandifo@redhat.com>
 
 	* ld-scripts/map-address.exp: New test.
diff --git a/ld/testsuite/ld-scripts/map-address.exp b/ld/testsuite/ld-scripts/map-address.exp
index 510d5324e01..7264f1386ce 100644
--- a/ld/testsuite/ld-scripts/map-address.exp
+++ b/ld/testsuite/ld-scripts/map-address.exp
@@ -18,19 +18,19 @@
 set testname "map addresses"
 
 # The source file doesn't matter.  Pinch one from the sizeof test.
-if ![ld_assemble $as $srcdir/$subdir/sizeof.s tmpdir/map-address.o] {
+if {![ld_assemble $as $srcdir/$subdir/sizeof.s tmpdir/map-address.o]} {
     unresolved $testname
     return
 }
 
-if ![ld_simple_link $ld tmpdir/map-address \
+if {![ld_simple_link $ld tmpdir/map-address \
 	 "-T $srcdir/$subdir/map-address.t \
 	  tmpdir/map-address.o \
-	  -Map tmpdir/map-address.map"] {
+	  -Map tmpdir/map-address.map"]} {
     fail $testname
-} elseif [regexp_diff \
-	    "tmpdir/map-address.map" \
-	    "$srcdir/$subdir/map-address.d"] {
+} elseif {[regexp_diff \
+	       "tmpdir/map-address.map" \
+	       "$srcdir/$subdir/map-address.d"]} {
     fail $testname
 } else {
     pass $testname