From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gdb-patches-return-32608-listarch-gdb-patches=sources.redhat.com@sources.redhat.com>
Received: (qmail 8724 invoked by alias); 28 Apr 2004 00:16:13 -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 8675 invoked from network); 28 Apr 2004 00:16:11 -0000
Received: from unknown (HELO walton.kettenis.dyndns.org) (213.93.77.109)
  by sources.redhat.com with SMTP; 28 Apr 2004 00:16:11 -0000
Received: from elgar.kettenis.dyndns.org (elgar.kettenis.dyndns.org [192.168.0.2])
	by walton.kettenis.dyndns.org (8.12.6p3/8.12.6) with ESMTP id i3S0FxS6000309;
	Wed, 28 Apr 2004 02:15:59 +0200 (CEST)
	(envelope-from kettenis@elgar.kettenis.dyndns.org)
Received: from elgar.kettenis.dyndns.org (localhost [127.0.0.1])
	by elgar.kettenis.dyndns.org (8.12.6p3/8.12.6) with ESMTP id i3S0Fx4C012867;
	Wed, 28 Apr 2004 02:15:59 +0200 (CEST)
	(envelope-from kettenis@elgar.kettenis.dyndns.org)
Received: (from kettenis@localhost)
	by elgar.kettenis.dyndns.org (8.12.6p3/8.12.6/Submit) id i3S0FsPn012864;
	Wed, 28 Apr 2004 02:15:54 +0200 (CEST)
Date: Wed, 28 Apr 2004 00:16:00 -0000
Message-Id: <200404280015.i3S0FsPn012864@elgar.kettenis.dyndns.org>
From: Mark Kettenis <kettenis@chello.nl>
To: brobecker@gnat.com
CC: cagney@gnu.org, gdb-patches@sources.redhat.com
In-reply-to: <20040426005349.GQ2811@gnat.com> (message from Joel Brobecker on
	Sun, 25 Apr 2004 17:53:49 -0700)
Subject: Re: [patch] Test scalar call/return/finish test - call-sc
References: <4089AD34.90607@gnu.org> <20040424182018.GN2811@gnat.com> <200404251144.i3PBiaB6019886@elgar.kettenis.dyndns.org> <20040426005349.GQ2811@gnat.com>
X-SW-Source: 2004-04/txt/msg00623.txt.bz2

   Date: Sun, 25 Apr 2004 17:53:49 -0700
   From: Joel Brobecker <brobecker@gnat.com>

   > Anyway, can anybody shoot any holes in my new regexp?

   I did try Daniel's suggestion, and it worked too.

Works for me too, so I checked in the attached.

Mark


Index: testsuite/ChangeLog
from  Mark Kettenis  <kettenis@gnu.org>

	* gdb.base/call-sc.exp (start_scalars_test): Fix regular
	expression that checks the return type.

Index: testsuite/gdb.base/call-sc.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.base/call-sc.exp,v
retrieving revision 1.1
diff -u -p -r1.1 call-sc.exp
--- testsuite/gdb.base/call-sc.exp 23 Apr 2004 23:34:53 -0000 1.1
+++ testsuite/gdb.base/call-sc.exp 28 Apr 2004 00:14:05 -0000
@@ -115,7 +115,7 @@ proc start_scalars_test { type } {
     set test "ptype; ${testfile}"
     set foo_t "xxx"
     gdb_test_multiple "ptype ${type}" "${test}" {
-	-re "type = (\[^\\r\\n\]*).*$gdb_prompt $" {
+	-re "type = (\[^\r\n\]*)\r\n$gdb_prompt $" {
 	    set foo_t "$expect_out(1,string)"
 	    pass "$test (${foo_t})"
 	}