[RFA] testsuite/gdb.c++/namespace-marker.exp: work around "marker() ()" bug

[RFA] testsuite/gdb.c++/namespace-marker.exp: work around "marker() ()" bug

[Michael Elizabeth Chastain]

This is Sunday Project Patch #10.

This patch changes testsuite/gdb.c++/namespace.exp to use the library
function 'runto' to reach a marker function.  This simplifies the file,
and it accommodates a bug in gdb when using g++ v3pre.

The bug is PR gdb/34, "g++ v3 functions show as "inheritance2() ()"".
testsuite/gdb.c++/method.exp has one specific test case to detect this
bug, so I want to fix other test scripts so that they don't cascade
fail on this bug.

Before and after results with g++ v3pre:
  before: 6 PASS, 5 FAIL
  after:  9 PASS, 2 FAIL

I test this on native Red Hat Linux 7 and native Solaris 2.6 with
gcc 2.95.3 and gcc 3pre dated 2001-04-22.

OK to apply?

Michael

===

2001-04-22  Michael Chastain  <chastain@redhat.com>

	* gdb.c++/namespace.exp: Use the 'runto' library function.

===

Index: gdb/testsuite/gdb.c++/namespace.exp
===================================================================
RCS file: /cvs/src/src/gdb/testsuite/gdb.c++/namespace.exp,v
retrieving revision 1.5
diff -c -3 -p -r1.5 namespace.exp
*** gdb/testsuite/gdb.c++/namespace.exp	2001/03/08 21:09:23	1.5
--- gdb/testsuite/gdb.c++/namespace.exp	2001/04/23 06:21:48
*************** if ![runto_main] then {
*** 68,87 ****
      continue
  }
  
! send_gdb "break marker1\n" ; gdb_expect -re ".*$gdb_prompt $"
!     send_gdb "cont\n"
!     gdb_expect {
!         -re "Break.* marker1 \\(\\) at .*:$decimal.*$gdb_prompt $" {
!             send_gdb "up\n"
!             gdb_expect {
!                 -re ".*main.*$gdb_prompt $" { pass "up from marker1" }
!                 -re ".*$gdb_prompt $"       { fail "up from marker1" }
!                 timeout { fail "up from marker1 (timeout)" }
!             }
!         }
!         -re "$gdb_prompt $" { fail "continue to marker1"  }
!         timeout { fail "(timeout) continue to marker1"  }
!     }
  
  # Access a data item inside a namespace using colons and
  # single quotes :-(
--- 68,79 ----
      continue
  }
  
! if ![runto 'marker1'] then {
!     perror "couldn't run to marker1"
!     continue
! }
! 
! gdb_test "up" ".*main.*" "up from marker1"
  
  # Access a data item inside a namespace using colons and
  # single quotes :-(

Re: [RFA] testsuite/gdb.c++/namespace-marker.exp: work around "marker() ()" bug

[Fernando Nasser]

Ditto.


Michael Elizabeth Chastain wrote:
> 
> This is Sunday Project Patch #10.
> 
> This patch changes testsuite/gdb.c++/namespace.exp to use the library
> function 'runto' to reach a marker function.  This simplifies the file,
> and it accommodates a bug in gdb when using g++ v3pre.
> 
> The bug is PR gdb/34, "g++ v3 functions show as "inheritance2() ()"".
> testsuite/gdb.c++/method.exp has one specific test case to detect this
> bug, so I want to fix other test scripts so that they don't cascade
> fail on this bug.
> 
> Before and after results with g++ v3pre:
>   before: 6 PASS, 5 FAIL
>   after:  9 PASS, 2 FAIL
> 
> I test this on native Red Hat Linux 7 and native Solaris 2.6 with
> gcc 2.95.3 and gcc 3pre dated 2001-04-22.
> 
> OK to apply?
> 
> Michael
> 
> ===
> 
> 2001-04-22  Michael Chastain  <chastain@redhat.com>
> 
>         * gdb.c++/namespace.exp: Use the 'runto' library function.
> 
> ===
> 
> Index: gdb/testsuite/gdb.c++/namespace.exp
> ===================================================================
> RCS file: /cvs/src/src/gdb/testsuite/gdb.c++/namespace.exp,v
> retrieving revision 1.5
> diff -c -3 -p -r1.5 namespace.exp
> *** gdb/testsuite/gdb.c++/namespace.exp 2001/03/08 21:09:23     1.5
> --- gdb/testsuite/gdb.c++/namespace.exp 2001/04/23 06:21:48
> *************** if ![runto_main] then {
> *** 68,87 ****
>       continue
>   }
> 
> ! send_gdb "break marker1\n" ; gdb_expect -re ".*$gdb_prompt $"
> !     send_gdb "cont\n"
> !     gdb_expect {
> !         -re "Break.* marker1 \\(\\) at .*:$decimal.*$gdb_prompt $" {
> !             send_gdb "up\n"
> !             gdb_expect {
> !                 -re ".*main.*$gdb_prompt $" { pass "up from marker1" }
> !                 -re ".*$gdb_prompt $"       { fail "up from marker1" }
> !                 timeout { fail "up from marker1 (timeout)" }
> !             }
> !         }
> !         -re "$gdb_prompt $" { fail "continue to marker1"  }
> !         timeout { fail "(timeout) continue to marker1"  }
> !     }
> 
>   # Access a data item inside a namespace using colons and
>   # single quotes :-(
> --- 68,79 ----
>       continue
>   }
> 
> ! if ![runto 'marker1'] then {
> !     perror "couldn't run to marker1"
> !     continue
> ! }
> !
> ! gdb_test "up" ".*main.*" "up from marker1"
> 
>   # Access a data item inside a namespace using colons and
>   # single quotes :-(

-- 
Fernando Nasser
Red Hat Canada Ltd.                     E-Mail:  fnasser@redhat.com
2323 Yonge Street, Suite #300
Toronto, Ontario   M4P 2C9