libjava.exp (libjava_init): Call the GCJ_UNDER_TEST with the -B$specdir.

2006-07-04  Andreas Tobler  <a.tobler@schweiz.ch>

	* testsuite/lib/libjava.exp (libjava_init): Call the GCJ_UNDER_TEST with
	the -B$specdir.

From-SVN: r115188

diff --git a/libjava/ChangeLog b/libjava/ChangeLog
index fd3b6d0e572ca2fa35bd009fa85368bfc73e00fa..95d783cae7be7bd28ab3204646939286ad2dc64d 100644 (file)
--- a/libjava/ChangeLog
+++ b/libjava/ChangeLog
@@ -1,5 +1,8 @@
 2006-07-04  Andreas Tobler  <a.tobler@schweiz.ch>
 
+       * testsuite/lib/libjava.exp (libjava_init): Call the GCJ_UNDER_TEST with
+       the -B$specdir.
+
        PR libgcj/28226:
        * include/posix.h (_Jv_platform_dladdr): Remove const qualifier.
        * include/win32.h (_Jv_platform_dladdr): Likewise.

diff --git a/libjava/testsuite/lib/libjava.exp b/libjava/testsuite/lib/libjava.exp
index 4b1f7ae2df4b47373999ded63fb67b2e72d4a119..5100c8a7b498401d86456ca905aa5469537b5830 100644 (file)
--- a/libjava/testsuite/lib/libjava.exp
+++ b/libjava/testsuite/lib/libjava.exp
@@ -166,8 +166,13 @@ proc libjava_init { args } {
 
     # Find the libgcj jar file.
 
-    set tmp [eval exec "$GCJ_UNDER_TEST -v 2>@ stdout"]
-    regexp " version \[^\n\r\]*" $tmp version
+    # FIXME: This finds libgcj.spec for the default multilib.
+    # If thread models differ between multilibs, this has to be moved
+    # to libjava_arguments
+    set specdir [libjava_find_spec]
+
+    set text [eval exec "$GCJ_UNDER_TEST -B$specdir -v 2>@ stdout"]
+    regexp " version \[^\n\r\]*" $text version
     set libjava_version [lindex $version 1]
 
     verbose "version: $libjava_version"
@@ -175,13 +180,7 @@ proc libjava_init { args } {
     set libgcj_jar [glob $objdir/../libgcj-$libjava_version.jar]
     verbose "jar file is $libgcj_jar"
 
-    # FIXME: This finds libgcj.spec for the default multilib.
-    # If thread models differ between multilibs, this has to be moved
-    # to libjava_arguments
-    set specdir [libjava_find_spec]
-
     # The -B is so we find libgcj.spec.
-    set text [eval exec "$GCJ_UNDER_TEST -B$specdir -v 2>@ stdout"]
     regexp -- "Thread model: (\[^\n\]+)\n" $text ignore model
     set libjava_uses_threads [expr {! ($model == "no"
                                       || $model == "none"