From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <sid-return-266-listarch-sid=sources.redhat.com@sources.redhat.com>
Received: (qmail 10666 invoked by alias); 10 Dec 2001 23:48:49 -0000
Mailing-List: contact sid-help@sources.redhat.com; run by ezmlm
Precedence: bulk
List-Subscribe: <mailto:sid-subscribe@sources.redhat.com>
List-Archive: <http://sources.redhat.com/ml/sid/>
List-Post: <mailto:sid@sources.redhat.com>
List-Help: <mailto:sid-help@sources.redhat.com>, <http://sources.redhat.com/lists.html#faqs>
Sender: sid-owner@sources.redhat.com
Received: (qmail 8085 invoked from network); 10 Dec 2001 23:47:29 -0000
From: Ben Elliston <bje@redhat.com>
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit
Message-ID: <15381.7613.416810.99371@scooby.brisbane.redhat.com>
Date: Sun, 18 Nov 2001 14:42:00 -0000
To: sid@sources.redhat.com
Subject: Testsuite improvement patch
X-Mailer: VM 6.75 under 21.1 (patch 14) "Cuyahoga Valley" XEmacs Lucid
X-SW-Source: 2001-q4/txt/msg00030.txt.bz2

The following patch makes SID's component/cgen-cpu testsuites behave
like testsuites such as GCC's: if the test case passes, any object
code generated by the assembler or linker is subsequently removed.
This leaves the testsuite directory in a tidier state at the end of a
test run.

It is not necessary to wrap a Tcl catch{} command around "file delete"
commands -- according to the manual page: ``Trying to delete a
non-existent file is not considered an error.''

Okay to commit?


2001-12-11  Ben Elliston  <bje@redhat.com>

	* lib/cpudefs.exp (run-one-sid-test): Delete object code if the
	test case passes.

***************
*** 390,395 ****
--- 390,396 ----
  	        if { "$opts(xerror)" == "no" } {
  	    	    if [string match $opts(output) $output] {
  		        pass "$test \#$iter"
+ 			file delete ${name}.o ${exe-name}
  		    } else {
  		        verbose -log "output:  $output" 3
  		        verbose -log "pattern: $opts(output)" 3
***************
*** 408,413 ****
--- 409,415 ----
  	        } else {
  		    if [string match $opts(output) $output] {
  		        pass "$test \#$iter"
+ 			file delete ${name}.o ${exe-name}
  		    } else {
  		        verbose -log "output:  $output" 3
  		        verbose -log "pattern: $opts(output)" 3

From mboxrd@z Thu Jan  1 00:00:00 1970
From: Ben Elliston <bje@redhat.com>
To: sid@sources.redhat.com
Subject: Testsuite improvement patch
Date: Mon, 10 Dec 2001 15:48:00 -0000
Message-ID: <15381.7613.416810.99371@scooby.brisbane.redhat.com>
X-SW-Source: 2001-q4/msg00047.html
Message-ID: <20011210154800.gmVSEo_APOySFxlMKQ3xwnuU1fy79qraLoqXt6taUCU@z>

The following patch makes SID's component/cgen-cpu testsuites behave
like testsuites such as GCC's: if the test case passes, any object
code generated by the assembler or linker is subsequently removed.
This leaves the testsuite directory in a tidier state at the end of a
test run.

It is not necessary to wrap a Tcl catch{} command around "file delete"
commands -- according to the manual page: ``Trying to delete a
non-existent file is not considered an error.''

Okay to commit?


2001-12-11  Ben Elliston  <bje@redhat.com>

	* lib/cpudefs.exp (run-one-sid-test): Delete object code if the
	test case passes.

***************
*** 390,395 ****
--- 390,396 ----
  	        if { "$opts(xerror)" == "no" } {
  	    	    if [string match $opts(output) $output] {
  		        pass "$test \#$iter"
+ 			file delete ${name}.o ${exe-name}
  		    } else {
  		        verbose -log "output:  $output" 3
  		        verbose -log "pattern: $opts(output)" 3
***************
*** 408,413 ****
--- 409,415 ----
  	        } else {
  		    if [string match $opts(output) $output] {
  		        pass "$test \#$iter"
+ 			file delete ${name}.o ${exe-name}
  		    } else {
  		        verbose -log "output:  $output" 3
  		        verbose -log "pattern: $opts(output)" 3