Re: Running Individual tests from gas suites.

[Jitendra Pawar <jitendra@linsyssoft.com>]

[-- Attachment #1: Type: text/plain, Size: 566 bytes --]


> Please send patches, not the whole modified file.

Here I have attached patch file...!

:-)
Jitendra

On Tue, 2005-02-08 at 22:24, Hans-Peter Nilsson wrote:
> On Tue, 8 Feb 2005, Jitendra Pawar wrote:
> > To remove this error there is modification need in gas/lib/gas-defs.exp
> > file. here I have attached modified file. one can get changes by grep on
> > 'gas_spawned'.
> >
> > can you please add this change in nest release?
> 
> Please send patches, not the whole modified file.
> (No, don't send it to me, send it to the list.)
> Thanks.
> 
> brgds, H-P
> 

[-- Attachment #2: gas-defs.exp.patch --]
[-- Type: text/plain, Size: 952 bytes --]

--- gas-defs.exp.org	2005-02-09 12:13:09.000000000 +0530
+++ gas-defs.exp	2005-02-09 12:21:01.000000000 +0530
@@ -59,6 +59,7 @@
     global srcdir
     global subdir
     global spawn_id
+    global gas_spawned
 
     verbose -log "Starting $AS $ASFLAGS $as_opts $prog" 2
     catch {
@@ -66,14 +67,20 @@
     } foo
     if ![regexp {^[0-9]+} $foo] then {
 	perror "Can't run $subdir/$prog: $foo"
+    } else {
+        set gas_spawned 1
     }
 }
 
 proc gas_finish { } {
     global spawn_id
+    global gas_spawned
 
-    catch "close"
-    catch "wait"
+    if $gas_spawned then {
+	    catch "close"
+	    catch "wait"
+    }
+    set gas_spawned 0
 }
 
 proc want_no_output { testname } {
@@ -165,7 +172,9 @@
     global target_vendor
     global target_os
     global stdoptlist
+    global gas_spawned
 
+    set gas_spawned 0
     case "$target_cpu" in {
 	"m68???"		{ set target_cpu_family m68k }
 	"i[3-7]86"		{ set target_cpu_family i386 }