From: Tom Tromey <tromey@redhat.com>
Date: Sat, 19 Jul 2003 15:43:20 +0000 (+0000)
Subject: verify.exp (gcj_verify_list_tests): Only change directory if new directory exists.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=01482e6dedf200137f9a7aa57d3c585bbc81b1c9;p=gcc.git

verify.exp (gcj_verify_list_tests): Only change directory if new directory exists.

	* libjava.verify/verify.exp (gcj_verify_list_tests): Only change
	directory if new directory exists.

From-SVN: r69590
---

diff --git a/libjava/testsuite/ChangeLog b/libjava/testsuite/ChangeLog
index 2e7d5d9e9d2..576318bd682 100644
--- a/libjava/testsuite/ChangeLog
+++ b/libjava/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2003-07-19  Tom Tromey  <tromey@redhat.com>
+
+	* libjava.verify/verify.exp (gcj_verify_list_tests): Only change
+	directory if new directory exists.
+
 2003-07-13  Tom Tromey  <tromey@redhat.com>
 
 	* libjava.verify/verify.exp: Fixed variable init.
diff --git a/libjava/testsuite/libjava.verify/verify.exp b/libjava/testsuite/libjava.verify/verify.exp
index 456f3b66230..76c9b00d4bf 100644
--- a/libjava/testsuite/libjava.verify/verify.exp
+++ b/libjava/testsuite/libjava.verify/verify.exp
@@ -11,12 +11,14 @@ set {gcj_verify_xfail(gij verify of subr.fail.jsr8)} 1
 
 proc gcj_verify_list_tests {srcdir} {
   set result {}
-  set here [pwd]
-  cd $srcdir
-  foreach item [lsort [glob -nocomplain */*/*.class]] {
-    lappend result [file rootname $item]
+  if {[file exists $srcdir]} {
+    set here [pwd]
+    cd $srcdir
+    foreach item [lsort [glob -nocomplain */*/*.class]] {
+      lappend result [file rootname $item]
+    }
+    cd $here
   }
-  cd $here
   return $result
 }