gcc.exp (gcc_init): Check that the need_status_wrapper target_info attribute != 0...

	* lib/gcc.exp (gcc_init): Check that the need_status_wrapper
	target_info attribute != 0, in addition to the empty string.
	(gcc_target_compile): Likewise.

From-SVN: r49470

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 1f5090f6520c3f6cbee7e2d286f7eb3ed9e49993..8a078a4dec7dea11d4ac76fdac558f927a9e7cfa 100644 (file)
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,9 @@
+2002-02-04  Ben Elliston  <bje@redhat.com>
+
+       * lib/gcc.exp (gcc_init): Check that the need_status_wrapper
+       target_info attribute != 0, in addition to the empty string.
+       (gcc_target_compile): Likewise.
+
 2002-02-03  Andrew Cagney  <ac131313@redhat.com>
 
        * gcc.dg/Wswitch.c: New test.

diff --git a/gcc/testsuite/lib/gcc.exp b/gcc/testsuite/lib/gcc.exp
index e03f55916da11c1ada7c522313461a70c8f6eee2..73337556a470136c612d091b0c9ea537c02e95fa 100644 (file)
--- a/gcc/testsuite/lib/gcc.exp
+++ b/gcc/testsuite/lib/gcc.exp
@@ -106,7 +106,9 @@ proc gcc_init { args } {
     if ![info exists tmpdir] then {
        set tmpdir /tmp
     }
-    if { [target_info needs_status_wrapper]!="" && ![info exists gluefile] } {
+    if {[target_info needs_status_wrapper] != "" && \
+           [target_info needs_status_wrapper] != "0" && \
+           ![info exists gluefile]} {
        set gluefile ${tmpdir}/testglue.o;
        set result [build_wrapper $gluefile];
        if { $result != "" } {
@@ -127,8 +129,10 @@ proc gcc_target_compile { source dest type options } {
     global gluefile wrap_flags;
     global GCC_UNDER_TEST
     global TOOL_OPTIONS
-
-    if { [target_info needs_status_wrapper]!="" && [info exists gluefile] } {
+       
+    if {[target_info needs_status_wrapper] != "" && \
+           [target_info needs_status_wrapper] != "0" && \
+           [info exists gluefile] } {
        lappend options "libs=${gluefile}"
        lappend options "ldflags=$wrap_flags"
     }