From mboxrd@z Thu Jan  1 00:00:00 1970
From: Michael Snyder <msnyder@cygnus.com>
To: gdb-patches@sources.redhat.com
Subject: Re: [RFA] Tweak for pthreads.exp testcase (resend)
Date: Wed, 06 Jun 2001 11:38:00 -0000
Message-id: <3B1E78A1.C832A6E@cygnus.com>
References: <200106042347.QAA17176@cleaver.cygnus.com>
X-SW-Source: 2001-06/msg00088.html

Michael Snyder wrote:
> 
> OK, let's try again, this time with the actual patch instead of the file.
> 
> If the "Stop with ^C" test fails, then all subsequent tests in this
> script will time out.  Rather than wait for that to happen, detect
> the failure and terminate the test.

Committed.

> 
> 2001-06-04  Michael Snyder  <msnyder@redhat.com>
> 
>         * gdb.threads/pthreads.exp (check_control_c): Return 0 for success,
>         non-zero if control_c fails.  Terminate the test on failure,
>         rather than wait for 12 more tests to time out.
> 
> Index: pthreads.exp
> ===================================================================
> RCS file: /cvs/src/src/gdb/testsuite/gdb.threads/pthreads.exp,v
> retrieving revision 1.5
> diff -c -3 -p -r1.5 pthreads.exp
> *** pthreads.exp        2001/05/25 01:10:20     1.5
> --- pthreads.exp        2001/06/04 23:04:21
> *************** proc check_control_c {} {
> *** 259,264 ****
> --- 259,265 ----
>         }
>         timeout {
>             fail "$description (timeout)"
> +           return 1;
>         }
>       }
>       gdb_test "bt" ""
> *************** proc check_control_c {} {
> *** 267,272 ****
> --- 268,274 ----
>       if [all_threads_running] then {
>         pass "All threads running after continuing from ^C stop"
>       }
> +     return 0;
>   }
> 
>   proc check_backtraces {} {
> *************** setup_xfail "alpha-*-osf*"
> *** 337,343 ****
>   if [runto_main] then {
>       clear_xfail "alpha-*-osf*"
>       if [test_startup] then {
> !       check_control_c
>         check_backtraces
>       }
>   }
> --- 339,348 ----
>   if [runto_main] then {
>       clear_xfail "alpha-*-osf*"
>       if [test_startup] then {
> !       if [check_control_c] then {
> !           warning "Could not stop child with ^C; skipping rest of tests.\n"
> !           return;
> !       }
>         check_backtraces
>       }
>   }