From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gdb-patches-return-28416-listarch-gdb-patches=sources.redhat.com@sources.redhat.com>
Received: (qmail 20759 invoked by alias); 6 Nov 2003 04:57:17 -0000
Mailing-List: contact gdb-patches-help@sources.redhat.com; run by ezmlm
Precedence: bulk
List-Subscribe: <mailto:gdb-patches-subscribe@sources.redhat.com>
List-Archive: <http://sources.redhat.com/ml/gdb-patches/>
List-Post: <mailto:gdb-patches@sources.redhat.com>
List-Help: <mailto:gdb-patches-help@sources.redhat.com>, <http://sources.redhat.com/ml/#faqs>
Sender: gdb-patches-owner@sources.redhat.com
Received: (qmail 20752 invoked from network); 6 Nov 2003 04:57:16 -0000
Received: from unknown (HELO zenia.home) (12.223.225.216)
  by sources.redhat.com with SMTP; 6 Nov 2003 04:57:16 -0000
Received: by zenia.home (Postfix, from userid 5433)
	id 44F14207B4; Wed,  5 Nov 2003 23:56:26 -0500 (EST)
To: gdb-patches@sources.redhat.com
Subject: RFA: give store.exp tests unique names
From: Jim Blandy <jimb@redhat.com>
Date: Thu, 06 Nov 2003 04:57:00 -0000
Message-ID: <vt24qxirt6t.fsf@zenia.home>
User-Agent: Gnus/5.09 (Gnus v5.9.0) Emacs/21.3
MIME-Version: 1.0
Content-Type: text/plain; charset=us-ascii
X-SW-Source: 2003-11/txt/msg00076.txt.bz2


Doesn't Michael C.'s system detect duplicate test names?  Perhaps I am
doing something wrong.

2003-11-05  Jim Blandy  <jimb@redhat.com>

	* gdb.base/store.exp: Make sure every test has a unique name.

Index: gdb/testsuite/gdb.base/store.exp
===================================================================
RCS file: /cvs/cvsfiles/devo/gdb/testsuite/gdb.base/store.exp,v
retrieving revision 1.4
diff -c -r1.4 store.exp
*** gdb/testsuite/gdb.base/store.exp	14 Aug 2003 22:44:06 -0000	1.4
--- gdb/testsuite/gdb.base/store.exp	6 Nov 2003 04:47:03 -0000
***************
*** 61,69 ****
      gdb_test "next" "l = add_${t} .l, r.;" "next ${t}"
      gdb_test "print l" " = ${l}" "print old l - ${t}"
      gdb_test "print r" " = ${r}" "print old r - ${t}"
!     gdb_test "set variable l = 4"
      gdb_test "print l" " = ${new}" "print new l - ${t}"
!     gdb_test "next" "return l \\+ r;"
      gdb_test "print l" " = ${add}" "print add  - ${t}"
  }
  
--- 61,69 ----
      gdb_test "next" "l = add_${t} .l, r.;" "next ${t}"
      gdb_test "print l" " = ${l}" "print old l - ${t}"
      gdb_test "print r" " = ${r}" "print old r - ${t}"
!     gdb_test "set variable l = 4" "" "set l - ${t}"
      gdb_test "print l" " = ${new}" "print new l - ${t}"
!     gdb_test "next" "return l \\+ r;" "next over call - ${t}"
      gdb_test "print l" " = ${add}" "print add  - ${t}"
  }
  
***************
*** 85,91 ****
      gdb_test "up" "l = add_${t} .l, r.;" "up ${t}"
      gdb_test "print l" " = ${l}" "up print old l - ${t}"
      gdb_test "print r" " = ${r}" "up print old r - ${t}"
!     gdb_test "set variable l = 4"
      gdb_test "print l" " = ${new}" "up print new l - ${t}"
  }
  
--- 85,91 ----
      gdb_test "up" "l = add_${t} .l, r.;" "up ${t}"
      gdb_test "print l" " = ${l}" "up print old l - ${t}"
      gdb_test "print r" " = ${r}" "up print old r - ${t}"
!     gdb_test "set variable l = 4" "" "up set l - ${t}"
      gdb_test "print l" " = ${new}" "up print new l - ${t}"
  }
  
***************
*** 105,113 ****
      gdb_test "tbreak wack_struct_${t}"
      gdb_test "continue" "int i; register struct s_${t} u = z_${t};" \
  	    "continue set struct ${t}"
!     gdb_test "next 2" "add_struct_${t} .u.;"
      gdb_test "print u" " = ${old}" "old check struct ${t}"
!     gdb_test "set variable u = s_${t}"
      gdb_test "print u" " = ${new}" "new check struct ${t}"
  }
  
--- 105,113 ----
      gdb_test "tbreak wack_struct_${t}"
      gdb_test "continue" "int i; register struct s_${t} u = z_${t};" \
  	    "continue set struct ${t}"
!     gdb_test "next 2" "add_struct_${t} .u.;" "check struct next ${t}"
      gdb_test "print u" " = ${old}" "old check struct ${t}"
!     gdb_test "set variable u = s_${t}" "" "set check struct ${t}"
      gdb_test "print u" " = ${new}" "new check struct ${t}"
  }
  
***************
*** 123,129 ****
  	    "continue up struct ${t}"
      gdb_test "up" "u = add_struct_${t} .u.;" "up struct ${t}"
      gdb_test "print u" " = ${old}" "old up struct ${t}"
!     gdb_test "set variable u = s_${t}"
      gdb_test "print u" " = ${new}" "new up struct ${t}"
  }
  
--- 123,129 ----
  	    "continue up struct ${t}"
      gdb_test "up" "u = add_struct_${t} .u.;" "up struct ${t}"
      gdb_test "print u" " = ${old}" "old up struct ${t}"
!     gdb_test "set variable u = s_${t}" "" "set up struct ${t}"
      gdb_test "print u" " = ${new}" "new up struct ${t}"
  }