+2002-01-18 Andrew Cagney <ac131313@redhat.com>
+
+ * NEWS: Document that testsuite/gdb.hp/gdb.threads-hp/ is
+ obsolete.
+
2002-01-18 Andrew Cagney <ac131313@redhat.com>
* infptrace.c: Remove ATTRIBUTE_UNUSED. Update copyright.
AMD 29000 embedded with COFF a29k-none-coff
AMD 29000 embedded with a.out a29k-none-aout
+testsuite/gdb.hp/gdb.threads-hp/ directory
* REMOVED configurations and files
+2002-01-18 Andrew Cagney <ac131313@redhat.com>
+
+ * gdb.hp/gdb.threads-hp/usrthfork.exp: Mark as obsolete.
+ * gdb.hp/gdb.threads-hp/usrthcore.exp: Ditto.
+ * gdb.hp/gdb.threads-hp/usrthbasic.exp: Ditto.
+ * gdb.hp/gdb.threads-hp/usrthfork.c: Ditto.
+ * gdb.hp/gdb.threads-hp/usrthbasic.c: Ditto.
+ * gdb.hp/gdb.threads-hp/usrthcore.c: Ditto.
+
2002-01-17 Jim Blandy <jimb@redhat.com>
* gdb.asm/asm-source.exp (info symbol): Take another shot at
-#include <stdio.h>
-
-/* #include "config.h" */
-#define HAVE_PTHREAD_H
-#define __hpux__
-#define __osf__
-
-#ifndef HAVE_PTHREAD_H
-
-/* Don't even try to compile. In fact, cause a syntax error that we can
- look for as a compiler error message and know that we have no pthread
- support. In that case we can just suppress the test completely. */
-
-#error "no posix threads support"
-
-#else
-
-/* OK. We have the right header. If we try to compile this and fail, then
- there is something wrong and the user should know about it so the testsuite
- should issue an ERROR result.. */
-
-#ifdef __linux__
-#define _MIT_POSIX_THREADS 1 /* Linux (or at least RedHat 4.0) needs this */
-#endif
-
-#include <pthread.h>
-
-/* Under OSF 2.0 & 3.0 and HPUX 10, the second arg of pthread_create
- is prototyped to be just a "pthread_attr_t", while under Solaris it
- is a "pthread_attr_t *". Arg! */
-
-#if defined (__osf__) || defined (__hpux__)
-#define PTHREAD_CREATE_ARG2(arg) arg
-#define PTHREAD_CREATE_NULL_ARG2 null_attr
-static pthread_attr_t null_attr;
-#else
-#define PTHREAD_CREATE_ARG2(arg) &arg
-#define PTHREAD_CREATE_NULL_ARG2 NULL
-#endif
-
-static int verbose = 0;
-
-static void
-common_routine (arg)
- int arg;
-{
- static int from_thread1;
- static int from_thread2;
- static int from_main;
- static int hits;
- static int full_coverage;
-
- if (verbose) printf("common_routine (%d)\n", arg);
- hits++;
- switch (arg)
- {
- case 0:
- from_main++;
- break;
- case 1:
- from_thread1++;
- break;
- case 2:
- from_thread2++;
- break;
- }
- if (from_main && from_thread1 && from_thread2)
- full_coverage = 1;
-}
-
-static void *
-thread1 (void *arg)
-{
- int i;
- int z = 0;
-
- if (verbose) printf ("thread1 (%0x) ; pid = %d\n", arg, getpid ());
- for (i=1; i <= 10000000; i++)
- {
- if (verbose) printf("thread1 %d\n", pthread_self ());
- z += i;
- common_routine (1);
- sleep(1);
- }
-}
-
-static void *
-thread2 (void * arg)
-{
- int i;
- int k = 0;
-
- if (verbose) printf ("thread2 (%0x) ; pid = %d\n", arg, getpid ());
- for (i=1; i <= 10000000; i++)
- {
- if (verbose) printf("thread2 %d\n", pthread_self ());
- k += i;
- common_routine (2);
- sleep(1);
- }
- sleep(100);
-}
-
-int
-foo (a, b, c)
- int a, b, c;
-{
- int d, e, f;
-
- if (verbose) printf("a=%d\n", a);
-}
-
-main(argc, argv)
- int argc;
- char **argv;
-{
- pthread_t tid1, tid2;
- int j;
- int t = 0;
- void (*xxx) ();
- pthread_attr_t attr;
-
- if (verbose) printf ("pid = %d\n", getpid());
-
- foo (1, 2, 3);
-
-#ifndef __osf__
- if (pthread_attr_init (&attr))
- {
- perror ("pthread_attr_init 1");
- exit (1);
- }
-#endif
-
-#ifdef PTHREAD_SCOPE_SYSTEM
- if (pthread_attr_setscope (&attr, PTHREAD_SCOPE_SYSTEM))
- {
- perror ("pthread_attr_setscope 1");
- exit (1);
- }
-#endif
-
- if (pthread_create (&tid1, pthread_attr_default, thread1, (void *) 0xfeedface))
- {
- perror ("pthread_create 1");
- exit (1);
- }
- if (verbose) printf ("Made thread %d\n", tid1);
- sleep (1);
-
- if (pthread_create (&tid2, null_attr, thread2, (void *) 0xdeadbeef))
- {
- perror ("pthread_create 2");
- exit (1);
- }
- if (verbose) printf("Made thread %d\n", tid2);
-
- sleep (1);
-
- for (j = 1; j <= 10000000; j++)
- {
- if (verbose) printf("top %d\n", pthread_self ());
- common_routine (0);
- sleep(1);
- t += j;
- }
-
- exit(0);
-}
-
-#endif /* ifndef HAVE_PTHREAD_H */
+/* OBSOLETE #include <stdio.h> */
+/* OBSOLETE */
+/* OBSOLETE /* #include "config.h" */ */
+/* OBSOLETE #define HAVE_PTHREAD_H */
+/* OBSOLETE #define __hpux__ */
+/* OBSOLETE #define __osf__ */
+/* OBSOLETE */
+/* OBSOLETE #ifndef HAVE_PTHREAD_H */
+/* OBSOLETE */
+/* OBSOLETE /* Don't even try to compile. In fact, cause a syntax error that we can */
+/* OBSOLETE look for as a compiler error message and know that we have no pthread */
+/* OBSOLETE support. In that case we can just suppress the test completely. */ */
+/* OBSOLETE */
+/* OBSOLETE #error "no posix threads support" */
+/* OBSOLETE */
+/* OBSOLETE #else */
+/* OBSOLETE */
+/* OBSOLETE /* OK. We have the right header. If we try to compile this and fail, then */
+/* OBSOLETE there is something wrong and the user should know about it so the testsuite */
+/* OBSOLETE should issue an ERROR result.. */ */
+/* OBSOLETE */
+/* OBSOLETE #ifdef __linux__ */
+/* OBSOLETE #define _MIT_POSIX_THREADS 1 /* Linux (or at least RedHat 4.0) needs this */ */
+/* OBSOLETE #endif */
+/* OBSOLETE */
+/* OBSOLETE #include <pthread.h> */
+/* OBSOLETE */
+/* OBSOLETE /* Under OSF 2.0 & 3.0 and HPUX 10, the second arg of pthread_create */
+/* OBSOLETE is prototyped to be just a "pthread_attr_t", while under Solaris it */
+/* OBSOLETE is a "pthread_attr_t *". Arg! */ */
+/* OBSOLETE */
+/* OBSOLETE #if defined (__osf__) || defined (__hpux__) */
+/* OBSOLETE #define PTHREAD_CREATE_ARG2(arg) arg */
+/* OBSOLETE #define PTHREAD_CREATE_NULL_ARG2 null_attr */
+/* OBSOLETE static pthread_attr_t null_attr; */
+/* OBSOLETE #else */
+/* OBSOLETE #define PTHREAD_CREATE_ARG2(arg) &arg */
+/* OBSOLETE #define PTHREAD_CREATE_NULL_ARG2 NULL */
+/* OBSOLETE #endif */
+/* OBSOLETE */
+/* OBSOLETE static int verbose = 0; */
+/* OBSOLETE */
+/* OBSOLETE static void */
+/* OBSOLETE common_routine (arg) */
+/* OBSOLETE int arg; */
+/* OBSOLETE { */
+/* OBSOLETE static int from_thread1; */
+/* OBSOLETE static int from_thread2; */
+/* OBSOLETE static int from_main; */
+/* OBSOLETE static int hits; */
+/* OBSOLETE static int full_coverage; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf("common_routine (%d)\n", arg); */
+/* OBSOLETE hits++; */
+/* OBSOLETE switch (arg) */
+/* OBSOLETE { */
+/* OBSOLETE case 0: */
+/* OBSOLETE from_main++; */
+/* OBSOLETE break; */
+/* OBSOLETE case 1: */
+/* OBSOLETE from_thread1++; */
+/* OBSOLETE break; */
+/* OBSOLETE case 2: */
+/* OBSOLETE from_thread2++; */
+/* OBSOLETE break; */
+/* OBSOLETE } */
+/* OBSOLETE if (from_main && from_thread1 && from_thread2) */
+/* OBSOLETE full_coverage = 1; */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE static void * */
+/* OBSOLETE thread1 (void *arg) */
+/* OBSOLETE { */
+/* OBSOLETE int i; */
+/* OBSOLETE int z = 0; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf ("thread1 (%0x) ; pid = %d\n", arg, getpid ()); */
+/* OBSOLETE for (i=1; i <= 10000000; i++) */
+/* OBSOLETE { */
+/* OBSOLETE if (verbose) printf("thread1 %d\n", pthread_self ()); */
+/* OBSOLETE z += i; */
+/* OBSOLETE common_routine (1); */
+/* OBSOLETE sleep(1); */
+/* OBSOLETE } */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE static void * */
+/* OBSOLETE thread2 (void * arg) */
+/* OBSOLETE { */
+/* OBSOLETE int i; */
+/* OBSOLETE int k = 0; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf ("thread2 (%0x) ; pid = %d\n", arg, getpid ()); */
+/* OBSOLETE for (i=1; i <= 10000000; i++) */
+/* OBSOLETE { */
+/* OBSOLETE if (verbose) printf("thread2 %d\n", pthread_self ()); */
+/* OBSOLETE k += i; */
+/* OBSOLETE common_routine (2); */
+/* OBSOLETE sleep(1); */
+/* OBSOLETE } */
+/* OBSOLETE sleep(100); */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE int */
+/* OBSOLETE foo (a, b, c) */
+/* OBSOLETE int a, b, c; */
+/* OBSOLETE { */
+/* OBSOLETE int d, e, f; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf("a=%d\n", a); */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE main(argc, argv) */
+/* OBSOLETE int argc; */
+/* OBSOLETE char **argv; */
+/* OBSOLETE { */
+/* OBSOLETE pthread_t tid1, tid2; */
+/* OBSOLETE int j; */
+/* OBSOLETE int t = 0; */
+/* OBSOLETE void (*xxx) (); */
+/* OBSOLETE pthread_attr_t attr; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf ("pid = %d\n", getpid()); */
+/* OBSOLETE */
+/* OBSOLETE foo (1, 2, 3); */
+/* OBSOLETE */
+/* OBSOLETE #ifndef __osf__ */
+/* OBSOLETE if (pthread_attr_init (&attr)) */
+/* OBSOLETE { */
+/* OBSOLETE perror ("pthread_attr_init 1"); */
+/* OBSOLETE exit (1); */
+/* OBSOLETE } */
+/* OBSOLETE #endif */
+/* OBSOLETE */
+/* OBSOLETE #ifdef PTHREAD_SCOPE_SYSTEM */
+/* OBSOLETE if (pthread_attr_setscope (&attr, PTHREAD_SCOPE_SYSTEM)) */
+/* OBSOLETE { */
+/* OBSOLETE perror ("pthread_attr_setscope 1"); */
+/* OBSOLETE exit (1); */
+/* OBSOLETE } */
+/* OBSOLETE #endif */
+/* OBSOLETE */
+/* OBSOLETE if (pthread_create (&tid1, pthread_attr_default, thread1, (void *) 0xfeedface)) */
+/* OBSOLETE { */
+/* OBSOLETE perror ("pthread_create 1"); */
+/* OBSOLETE exit (1); */
+/* OBSOLETE } */
+/* OBSOLETE if (verbose) printf ("Made thread %d\n", tid1); */
+/* OBSOLETE sleep (1); */
+/* OBSOLETE */
+/* OBSOLETE if (pthread_create (&tid2, null_attr, thread2, (void *) 0xdeadbeef)) */
+/* OBSOLETE { */
+/* OBSOLETE perror ("pthread_create 2"); */
+/* OBSOLETE exit (1); */
+/* OBSOLETE } */
+/* OBSOLETE if (verbose) printf("Made thread %d\n", tid2); */
+/* OBSOLETE */
+/* OBSOLETE sleep (1); */
+/* OBSOLETE */
+/* OBSOLETE for (j = 1; j <= 10000000; j++) */
+/* OBSOLETE { */
+/* OBSOLETE if (verbose) printf("top %d\n", pthread_self ()); */
+/* OBSOLETE common_routine (0); */
+/* OBSOLETE sleep(1); */
+/* OBSOLETE t += j; */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE exit(0); */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE #endif /* ifndef HAVE_PTHREAD_H */ */
-# usrthbasic.exp -- Expect script to test gdb with user threads
-# Copyright (C) 1992 Free Software Foundation, Inc.
-
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
-
-# Please email any bugs, comments, and/or additions to this file to:
-# bug-gdb@prep.ai.mit.edu
-
-# use this to debug:
-#
-#log_user 1
-
+# OBSOLETE # usrthbasic.exp -- Expect script to test gdb with user threads
+# OBSOLETE # Copyright (C) 1992 Free Software Foundation, Inc.
+# OBSOLETE
+# OBSOLETE # This program is free software; you can redistribute it and/or modify
+# OBSOLETE # it under the terms of the GNU General Public License as published by
+# OBSOLETE # the Free Software Foundation; either version 2 of the License, or
+# OBSOLETE # (at your option) any later version.
+# OBSOLETE #
+# OBSOLETE # This program is distributed in the hope that it will be useful,
+# OBSOLETE # but WITHOUT ANY WARRANTY; without even the implied warranty of
+# OBSOLETE # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# OBSOLETE # GNU General Public License for more details.
+# OBSOLETE #
+# OBSOLETE # You should have received a copy of the GNU General Public License
+# OBSOLETE # along with this program; if not, write to the Free Software
+# OBSOLETE # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
+# OBSOLETE
+# OBSOLETE # Please email any bugs, comments, and/or additions to this file to:
+# OBSOLETE # bug-gdb@prep.ai.mit.edu
+# OBSOLETE
+# OBSOLETE # use this to debug:
+# OBSOLETE #
+# OBSOLETE #log_user 1
+# OBSOLETE
verbose "HP's thread tests are broken beyond repair right now."
return 0
-
-if $tracelevel {
- strace $tracelevel
-}
-
-if { [skip_hp_tests] } { continue }
-
-if { ![istarget "hppa*-*-hpux*"] || [istarget "hppa64-*-*"] } {
- verbose "HPUX thread test ignored for non-hppa or PA64 targets."
- return 0
-}
-
-set testfile usrthbasic
-set srcfile ${srcdir}/${subdir}/${testfile}.c
-set binfile ${srcdir}/${subdir}/${testfile}
-
-# To build the executable we need to link against the thread library.
-#
-# /opt/ansic/bin/cc -Ae +DAportable -g -o usrthbasic -lcma usrthbasic.c
-#
-## we have trouble building it on 11.0, so we use the prebuilt
-## executable instead.
-##
-##if { [gdb_compile "${srcdir}/${subdir}/${testfile}.c" "${binfile}" executable {debug additional_flags=-Ae ldflags=-lcma}] != "" } {
-## gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
-##}
-
-# We don't really seem to need longer waits.
-#
-##set oldtimeout $timeout
-##set timeout [expr "$timeout + 0"]
-##set oldverbose $verbose
-##set verbose 40
-
-#=========================
-#
-# Test looking at threads.
-#
-gdb_exit
-gdb_start
-gdb_reinitialize_dir $srcdir/$subdir
-gdb_load ${binfile}
-
-gdb_test "b main" ".*Breakpoint 1.*" "b main"
-gdb_test "run" "Breakpoint 1, main.*:119.*" "run to main"
-gdb_test "b thread1" ".*Breakpoint 2.*" "b thread1"
-gdb_test "info threads" "\\* 1 system thread.*:119\[^(\]*" \
- "info threads at main"
-gdb_test "c" "Breakpoint 2, thread1.*" "continue to thread1"
-gdb_test "info threads" \
- "\\* 3 system thread.*thread1.*libcma.1.*libcma.1\[^(\]*" \
- "info threads at main"
-gdb_test "b 165" "Breakpoint 3.*165.*" "break at main counter"
-gdb_test "c" "Breakpoint 3, main.*" "continue to main counter"
-gdb_test "info threads" " 4 system thread.*\\* 1 system thread.*main.*" \
- "info threads at main counter"
-gdb_test "b 97" "Breakpoint 4.*97.*" "break at thread2 counter"
-gdb_test "b 81" "Breakpoint 5.*81.*" "break at thread1 counter"
-gdb_test "bt" "#0 main.* at \[^(\]*" "backtrace at main counter"
-
-# After switching to thread 4, the cma scheduler should schedule it next
-# and we should hit its breakpoint in thread2.
-gdb_test "thread 4" ".Switching to thread 4.*cma__dispatch.*" \
- "switch to thread 4"
-gdb_test "bt" "#0 .*thread2.*" "backtrace at thread 4"
-sleep 1
-gdb_test "c" ".*Breakpoint 4, thread2.*" "continue and get to thread 4"
-
-# After switching to thread 1, the cma scheduler should schedule it next
-# and we should hit its breakpoint (in main).
-gdb_test "thread 1" ".*Switching to thread 1.*cma__dispatch.*" \
- "switch to thread 1"
-sleep 1
-gdb_test "c" ".*Breakpoint 3, main.*usrthbasic.c:165.*" \
- "continue and get to thread 1"
-
-# Done!
-#
-gdb_exit
-
-##set timeout $oldtimeout
-##set verbose $oldverbose
-
-return 0
+# OBSOLETE
+# OBSOLETE if $tracelevel {
+# OBSOLETE strace $tracelevel
+# OBSOLETE }
+# OBSOLETE
+# OBSOLETE if { [skip_hp_tests] } { continue }
+# OBSOLETE
+# OBSOLETE if { ![istarget "hppa*-*-hpux*"] || [istarget "hppa64-*-*"] } {
+# OBSOLETE verbose "HPUX thread test ignored for non-hppa or PA64 targets."
+# OBSOLETE return 0
+# OBSOLETE }
+# OBSOLETE
+# OBSOLETE set testfile usrthbasic
+# OBSOLETE set srcfile ${srcdir}/${subdir}/${testfile}.c
+# OBSOLETE set binfile ${srcdir}/${subdir}/${testfile}
+# OBSOLETE
+# OBSOLETE # To build the executable we need to link against the thread library.
+# OBSOLETE #
+# OBSOLETE # /opt/ansic/bin/cc -Ae +DAportable -g -o usrthbasic -lcma usrthbasic.c
+# OBSOLETE #
+# OBSOLETE ## we have trouble building it on 11.0, so we use the prebuilt
+# OBSOLETE ## executable instead.
+# OBSOLETE ##
+# OBSOLETE ##if { [gdb_compile "${srcdir}/${subdir}/${testfile}.c" "${binfile}" executable {debug additional_flags=-Ae ldflags=-lcma}] != "" } {
+# OBSOLETE ## gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+# OBSOLETE ##}
+# OBSOLETE
+# OBSOLETE # We don't really seem to need longer waits.
+# OBSOLETE #
+# OBSOLETE ##set oldtimeout $timeout
+# OBSOLETE ##set timeout [expr "$timeout + 0"]
+# OBSOLETE ##set oldverbose $verbose
+# OBSOLETE ##set verbose 40
+# OBSOLETE
+# OBSOLETE #=========================
+# OBSOLETE #
+# OBSOLETE # Test looking at threads.
+# OBSOLETE #
+# OBSOLETE gdb_exit
+# OBSOLETE gdb_start
+# OBSOLETE gdb_reinitialize_dir $srcdir/$subdir
+# OBSOLETE gdb_load ${binfile}
+# OBSOLETE
+# OBSOLETE gdb_test "b main" ".*Breakpoint 1.*" "b main"
+# OBSOLETE gdb_test "run" "Breakpoint 1, main.*:119.*" "run to main"
+# OBSOLETE gdb_test "b thread1" ".*Breakpoint 2.*" "b thread1"
+# OBSOLETE gdb_test "info threads" "\\* 1 system thread.*:119\[^(\]*" \
+# OBSOLETE "info threads at main"
+# OBSOLETE gdb_test "c" "Breakpoint 2, thread1.*" "continue to thread1"
+# OBSOLETE gdb_test "info threads" \
+# OBSOLETE "\\* 3 system thread.*thread1.*libcma.1.*libcma.1\[^(\]*" \
+# OBSOLETE "info threads at main"
+# OBSOLETE gdb_test "b 165" "Breakpoint 3.*165.*" "break at main counter"
+# OBSOLETE gdb_test "c" "Breakpoint 3, main.*" "continue to main counter"
+# OBSOLETE gdb_test "info threads" " 4 system thread.*\\* 1 system thread.*main.*" \
+# OBSOLETE "info threads at main counter"
+# OBSOLETE gdb_test "b 97" "Breakpoint 4.*97.*" "break at thread2 counter"
+# OBSOLETE gdb_test "b 81" "Breakpoint 5.*81.*" "break at thread1 counter"
+# OBSOLETE gdb_test "bt" "#0 main.* at \[^(\]*" "backtrace at main counter"
+# OBSOLETE
+# OBSOLETE # After switching to thread 4, the cma scheduler should schedule it next
+# OBSOLETE # and we should hit its breakpoint in thread2.
+# OBSOLETE gdb_test "thread 4" ".Switching to thread 4.*cma__dispatch.*" \
+# OBSOLETE "switch to thread 4"
+# OBSOLETE gdb_test "bt" "#0 .*thread2.*" "backtrace at thread 4"
+# OBSOLETE sleep 1
+# OBSOLETE gdb_test "c" ".*Breakpoint 4, thread2.*" "continue and get to thread 4"
+# OBSOLETE
+# OBSOLETE # After switching to thread 1, the cma scheduler should schedule it next
+# OBSOLETE # and we should hit its breakpoint (in main).
+# OBSOLETE gdb_test "thread 1" ".*Switching to thread 1.*cma__dispatch.*" \
+# OBSOLETE "switch to thread 1"
+# OBSOLETE sleep 1
+# OBSOLETE gdb_test "c" ".*Breakpoint 3, main.*usrthbasic.c:165.*" \
+# OBSOLETE "continue and get to thread 1"
+# OBSOLETE
+# OBSOLETE # Done!
+# OBSOLETE #
+# OBSOLETE gdb_exit
+# OBSOLETE
+# OBSOLETE ##set timeout $oldtimeout
+# OBSOLETE ##set verbose $oldverbose
+# OBSOLETE
+# OBSOLETE return 0
-#include <stdio.h>
-
-/* #include "config.h" */
-#define HAVE_PTHREAD_H
-#define __hpux__
-#define __osf__
-
-#ifndef HAVE_PTHREAD_H
-
-/* Don't even try to compile. In fact, cause a syntax error that we can
- look for as a compiler error message and know that we have no pthread
- support. In that case we can just suppress the test completely. */
-
-#error "no posix threads support"
-
-#else
-
-/* OK. We have the right header. If we try to compile this and fail, then
- there is something wrong and the user should know about it so the testsuite
- should issue an ERROR result.. */
-
-#ifdef __linux__
-#define _MIT_POSIX_THREADS 1 /* Linux (or at least RedHat 4.0) needs this */
-#endif
-
-#include <pthread.h>
-
-/* Under OSF 2.0 & 3.0 and HPUX 10, the second arg of pthread_create
- is prototyped to be just a "pthread_attr_t", while under Solaris it
- is a "pthread_attr_t *". Arg! */
-
-#if defined (__osf__) || defined (__hpux__)
-#define PTHREAD_CREATE_ARG2(arg) arg
-#define PTHREAD_CREATE_NULL_ARG2 null_attr
-static pthread_attr_t null_attr;
-#else
-#define PTHREAD_CREATE_ARG2(arg) &arg
-#define PTHREAD_CREATE_NULL_ARG2 NULL
-#endif
-
-static int verbose = 0;
-
-static void
-common_routine (arg)
- int arg;
-{
- static int from_thread1;
- static int from_thread2;
- static int from_main;
- static int hits;
- static int full_coverage;
-
- if (verbose) printf("common_routine (%d)\n", arg);
- hits++;
- switch (arg)
- {
- case 0:
- from_main++;
- break;
- case 1:
- from_thread1++;
- break;
- case 2:
- from_thread2++;
- break;
- }
- if (from_main && from_thread1 && from_thread2)
- full_coverage = 1;
-}
-
-static void *
-thread1 (void *arg)
-{
- int i;
- int z = 0;
-
- if (verbose) printf ("thread1 (%0x) ; pid = %d\n", arg, getpid ());
- for (i=1; i <= 10000000; i++)
- {
- if (verbose) printf("thread1 %d\n", pthread_self ());
- z += i;
- common_routine (1);
- sleep(1);
- }
-}
-
-static void *
-thread2 (void * arg)
-{
- int i;
- int k = 0;
-
- if (verbose) printf ("thread2 (%0x) ; pid = %d\n", arg, getpid ());
- for (i=1; i <= 10000000; i++)
- {
- if (verbose) printf("thread2 %d\n", pthread_self ());
- k += i;
- common_routine (2);
- sleep(1);
- }
- sleep(100);
-}
-
-int
-foo (a, b, c)
- int a, b, c;
-{
- int d, e, f;
-
- if (verbose) printf("a=%d\n", a);
-}
-
-main(argc, argv)
- int argc;
- char **argv;
-{
- pthread_t tid1, tid2;
- int j;
- int t = 0;
- void (*xxx) ();
- pthread_attr_t attr;
-
- if (verbose) printf ("pid = %d\n", getpid());
-
- foo (1, 2, 3);
-
-#ifndef __osf__
- if (pthread_attr_init (&attr))
- {
- perror ("pthread_attr_init 1");
- exit (1);
- }
-#endif
-
-#ifdef PTHREAD_SCOPE_SYSTEM
- if (pthread_attr_setscope (&attr, PTHREAD_SCOPE_SYSTEM))
- {
- perror ("pthread_attr_setscope 1");
- exit (1);
- }
-#endif
-
- if (pthread_create (&tid1, pthread_attr_default, thread1, (void *) 0xfeedface))
- {
- perror ("pthread_create 1");
- exit (1);
- }
- if (verbose) printf ("Made thread %d\n", tid1);
- sleep (1);
-
- if (pthread_create (&tid2, null_attr, thread2, (void *) 0xdeadbeef))
- {
- perror ("pthread_create 2");
- exit (1);
- }
- if (verbose) printf("Made thread %d\n", tid2);
-
- sleep (1);
-
- for (j = 1; j <= 10000000; j++)
- {
- if (verbose) printf("top %d\n", pthread_self ());
- common_routine (0);
- sleep(1);
- t += j;
- if (j > 3)
- {
- int* int_p;
- int_p = 0;
- *int_p = 1;
- }
- }
-
- exit(0);
-}
-
-#endif /* ifndef HAVE_PTHREAD_H */
+/* OBSOLETE #include <stdio.h> */
+/* OBSOLETE */
+/* OBSOLETE /* #include "config.h" */ */
+/* OBSOLETE #define HAVE_PTHREAD_H */
+/* OBSOLETE #define __hpux__ */
+/* OBSOLETE #define __osf__ */
+/* OBSOLETE */
+/* OBSOLETE #ifndef HAVE_PTHREAD_H */
+/* OBSOLETE */
+/* OBSOLETE /* Don't even try to compile. In fact, cause a syntax error that we can */
+/* OBSOLETE look for as a compiler error message and know that we have no pthread */
+/* OBSOLETE support. In that case we can just suppress the test completely. */ */
+/* OBSOLETE */
+/* OBSOLETE #error "no posix threads support" */
+/* OBSOLETE */
+/* OBSOLETE #else */
+/* OBSOLETE */
+/* OBSOLETE /* OK. We have the right header. If we try to compile this and fail, then */
+/* OBSOLETE there is something wrong and the user should know about it so the testsuite */
+/* OBSOLETE should issue an ERROR result.. */ */
+/* OBSOLETE */
+/* OBSOLETE #ifdef __linux__ */
+/* OBSOLETE #define _MIT_POSIX_THREADS 1 /* Linux (or at least RedHat 4.0) needs this */ */
+/* OBSOLETE #endif */
+/* OBSOLETE */
+/* OBSOLETE #include <pthread.h> */
+/* OBSOLETE */
+/* OBSOLETE /* Under OSF 2.0 & 3.0 and HPUX 10, the second arg of pthread_create */
+/* OBSOLETE is prototyped to be just a "pthread_attr_t", while under Solaris it */
+/* OBSOLETE is a "pthread_attr_t *". Arg! */ */
+/* OBSOLETE */
+/* OBSOLETE #if defined (__osf__) || defined (__hpux__) */
+/* OBSOLETE #define PTHREAD_CREATE_ARG2(arg) arg */
+/* OBSOLETE #define PTHREAD_CREATE_NULL_ARG2 null_attr */
+/* OBSOLETE static pthread_attr_t null_attr; */
+/* OBSOLETE #else */
+/* OBSOLETE #define PTHREAD_CREATE_ARG2(arg) &arg */
+/* OBSOLETE #define PTHREAD_CREATE_NULL_ARG2 NULL */
+/* OBSOLETE #endif */
+/* OBSOLETE */
+/* OBSOLETE static int verbose = 0; */
+/* OBSOLETE */
+/* OBSOLETE static void */
+/* OBSOLETE common_routine (arg) */
+/* OBSOLETE int arg; */
+/* OBSOLETE { */
+/* OBSOLETE static int from_thread1; */
+/* OBSOLETE static int from_thread2; */
+/* OBSOLETE static int from_main; */
+/* OBSOLETE static int hits; */
+/* OBSOLETE static int full_coverage; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf("common_routine (%d)\n", arg); */
+/* OBSOLETE hits++; */
+/* OBSOLETE switch (arg) */
+/* OBSOLETE { */
+/* OBSOLETE case 0: */
+/* OBSOLETE from_main++; */
+/* OBSOLETE break; */
+/* OBSOLETE case 1: */
+/* OBSOLETE from_thread1++; */
+/* OBSOLETE break; */
+/* OBSOLETE case 2: */
+/* OBSOLETE from_thread2++; */
+/* OBSOLETE break; */
+/* OBSOLETE } */
+/* OBSOLETE if (from_main && from_thread1 && from_thread2) */
+/* OBSOLETE full_coverage = 1; */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE static void * */
+/* OBSOLETE thread1 (void *arg) */
+/* OBSOLETE { */
+/* OBSOLETE int i; */
+/* OBSOLETE int z = 0; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf ("thread1 (%0x) ; pid = %d\n", arg, getpid ()); */
+/* OBSOLETE for (i=1; i <= 10000000; i++) */
+/* OBSOLETE { */
+/* OBSOLETE if (verbose) printf("thread1 %d\n", pthread_self ()); */
+/* OBSOLETE z += i; */
+/* OBSOLETE common_routine (1); */
+/* OBSOLETE sleep(1); */
+/* OBSOLETE } */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE static void * */
+/* OBSOLETE thread2 (void * arg) */
+/* OBSOLETE { */
+/* OBSOLETE int i; */
+/* OBSOLETE int k = 0; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf ("thread2 (%0x) ; pid = %d\n", arg, getpid ()); */
+/* OBSOLETE for (i=1; i <= 10000000; i++) */
+/* OBSOLETE { */
+/* OBSOLETE if (verbose) printf("thread2 %d\n", pthread_self ()); */
+/* OBSOLETE k += i; */
+/* OBSOLETE common_routine (2); */
+/* OBSOLETE sleep(1); */
+/* OBSOLETE } */
+/* OBSOLETE sleep(100); */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE int */
+/* OBSOLETE foo (a, b, c) */
+/* OBSOLETE int a, b, c; */
+/* OBSOLETE { */
+/* OBSOLETE int d, e, f; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf("a=%d\n", a); */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE main(argc, argv) */
+/* OBSOLETE int argc; */
+/* OBSOLETE char **argv; */
+/* OBSOLETE { */
+/* OBSOLETE pthread_t tid1, tid2; */
+/* OBSOLETE int j; */
+/* OBSOLETE int t = 0; */
+/* OBSOLETE void (*xxx) (); */
+/* OBSOLETE pthread_attr_t attr; */
+/* OBSOLETE */
+/* OBSOLETE if (verbose) printf ("pid = %d\n", getpid()); */
+/* OBSOLETE */
+/* OBSOLETE foo (1, 2, 3); */
+/* OBSOLETE */
+/* OBSOLETE #ifndef __osf__ */
+/* OBSOLETE if (pthread_attr_init (&attr)) */
+/* OBSOLETE { */
+/* OBSOLETE perror ("pthread_attr_init 1"); */
+/* OBSOLETE exit (1); */
+/* OBSOLETE } */
+/* OBSOLETE #endif */
+/* OBSOLETE */
+/* OBSOLETE #ifdef PTHREAD_SCOPE_SYSTEM */
+/* OBSOLETE if (pthread_attr_setscope (&attr, PTHREAD_SCOPE_SYSTEM)) */
+/* OBSOLETE { */
+/* OBSOLETE perror ("pthread_attr_setscope 1"); */
+/* OBSOLETE exit (1); */
+/* OBSOLETE } */
+/* OBSOLETE #endif */
+/* OBSOLETE */
+/* OBSOLETE if (pthread_create (&tid1, pthread_attr_default, thread1, (void *) 0xfeedface)) */
+/* OBSOLETE { */
+/* OBSOLETE perror ("pthread_create 1"); */
+/* OBSOLETE exit (1); */
+/* OBSOLETE } */
+/* OBSOLETE if (verbose) printf ("Made thread %d\n", tid1); */
+/* OBSOLETE sleep (1); */
+/* OBSOLETE */
+/* OBSOLETE if (pthread_create (&tid2, null_attr, thread2, (void *) 0xdeadbeef)) */
+/* OBSOLETE { */
+/* OBSOLETE perror ("pthread_create 2"); */
+/* OBSOLETE exit (1); */
+/* OBSOLETE } */
+/* OBSOLETE if (verbose) printf("Made thread %d\n", tid2); */
+/* OBSOLETE */
+/* OBSOLETE sleep (1); */
+/* OBSOLETE */
+/* OBSOLETE for (j = 1; j <= 10000000; j++) */
+/* OBSOLETE { */
+/* OBSOLETE if (verbose) printf("top %d\n", pthread_self ()); */
+/* OBSOLETE common_routine (0); */
+/* OBSOLETE sleep(1); */
+/* OBSOLETE t += j; */
+/* OBSOLETE if (j > 3) */
+/* OBSOLETE { */
+/* OBSOLETE int* int_p; */
+/* OBSOLETE int_p = 0; */
+/* OBSOLETE *int_p = 1; */
+/* OBSOLETE } */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE exit(0); */
+/* OBSOLETE } */
+/* OBSOLETE */
+/* OBSOLETE #endif /* ifndef HAVE_PTHREAD_H */ */
-# usrthcore.exp -- Expect script to test gdb with user threads
-# Copyright (C) 1992 Free Software Foundation, Inc.
-
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
-
-# Please email any bugs, comments, and/or additions to this file to:
-# bug-gdb@prep.ai.mit.edu
-
-# use this to debug:
-#
-#log_user 1
-
+# OBSOLETE # usrthcore.exp -- Expect script to test gdb with user threads
+# OBSOLETE # Copyright (C) 1992 Free Software Foundation, Inc.
+# OBSOLETE
+# OBSOLETE # This program is free software; you can redistribute it and/or modify
+# OBSOLETE # it under the terms of the GNU General Public License as published by
+# OBSOLETE # the Free Software Foundation; either version 2 of the License, or
+# OBSOLETE # (at your option) any later version.
+# OBSOLETE #
+# OBSOLETE # This program is distributed in the hope that it will be useful,
+# OBSOLETE # but WITHOUT ANY WARRANTY; without even the implied warranty of
+# OBSOLETE # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# OBSOLETE # GNU General Public License for more details.
+# OBSOLETE #
+# OBSOLETE # You should have received a copy of the GNU General Public License
+# OBSOLETE # along with this program; if not, write to the Free Software
+# OBSOLETE # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
+# OBSOLETE
+# OBSOLETE # Please email any bugs, comments, and/or additions to this file to:
+# OBSOLETE # bug-gdb@prep.ai.mit.edu
+# OBSOLETE
+# OBSOLETE # use this to debug:
+# OBSOLETE #
+# OBSOLETE #log_user 1
+# OBSOLETE
verbose "HP's thread tests are broken beyond repair right now."
return 0
-
-if $tracelevel {
- strace $tracelevel
-}
-
-if { [skip_hp_tests] } { continue }
-
-if { ![istarget "hppa*-*-hpux*"] || [istarget "hppa64-*-*"] } {
- verbose "HPUX thread test ignored for non-hppa or PA64 targets."
- return 0
-}
-
-set testfile usrthcore
-set srcfile ${srcdir}/${subdir}/${testfile}.c
-set binfile ${srcdir}/${subdir}/${testfile}
-
-# To build the executable we need to link against the thread library.
-#
-# /opt/ansic/bin/cc -Ae +DAportable -g -o usrthcore -lcma usrthcore.c
-#
-## we have trouble building it on 11.0, so we use the prebuilt
-## executable instead.
-##
-##if { [gdb_compile "${srcdir}/${subdir}/${testfile}.c -lcma" "${binfile}" executable {debug additional_flags=-Ae ldflags=-lcma}] != "" } {
-## gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
-##}
-
-#=========================
-#
-# Test looking at threads in a core file
-#
-
-remote_exec build "rm -f core"
-remote_exec build "${binfile}"
-
-gdb_exit
-gdb_start
-gdb_reinitialize_dir $srcdir/$subdir
-gdb_load ${binfile}
-gdb_test "core-file core" \
- ".*Core was generated by `usrthcore'.*in main.*usrthcore.c:170.*" \
- "load corefile"
-
-gdb_test "info thread" \
- " 4 .*cma__dispatch.*\\* 1 .*in main.*usrthcore.c:170.*" \
- "info thread on core file"
-gdb_test "bt" "#0.*in main.*usrthcore.c:170" "backtrace on active thread"
-gdb_test "thread 4" ".*Switching to thread 4.*cma__dispatch.*" \
- "switch to thread 4 (thread2 procedure)"
-gdb_test "bt" "#0.*cma__dispatch.*thread2.*usrthcore.c:99.*" \
- "Backtrace on inactive thread (thread2 procedure)"
-gdb_test "b thread1" "Breakpoint 1.*usrthcore.c, line 75.*" \
- "break on thread1"
-gdb_test "run" "Starting program.*Breakpoint 1, thread1.*usrthcore.c:75.*" \
- "run program, get to thread1 procedure"
-gdb_test "info threads" "\\* \[23\] .*thread1.* 1 .*cma__dispatch.*" \
- "info threads after running core"
-
-
-# Done!
-#
-gdb_exit
-
-remote_exec build "rm -f core"
-
-return 0
+# OBSOLETE
+# OBSOLETE if $tracelevel {
+# OBSOLETE strace $tracelevel
+# OBSOLETE }
+# OBSOLETE
+# OBSOLETE if { [skip_hp_tests] } { continue }
+# OBSOLETE
+# OBSOLETE if { ![istarget "hppa*-*-hpux*"] || [istarget "hppa64-*-*"] } {
+# OBSOLETE verbose "HPUX thread test ignored for non-hppa or PA64 targets."
+# OBSOLETE return 0
+# OBSOLETE }
+# OBSOLETE
+# OBSOLETE set testfile usrthcore
+# OBSOLETE set srcfile ${srcdir}/${subdir}/${testfile}.c
+# OBSOLETE set binfile ${srcdir}/${subdir}/${testfile}
+# OBSOLETE
+# OBSOLETE # To build the executable we need to link against the thread library.
+# OBSOLETE #
+# OBSOLETE # /opt/ansic/bin/cc -Ae +DAportable -g -o usrthcore -lcma usrthcore.c
+# OBSOLETE #
+# OBSOLETE ## we have trouble building it on 11.0, so we use the prebuilt
+# OBSOLETE ## executable instead.
+# OBSOLETE ##
+# OBSOLETE ##if { [gdb_compile "${srcdir}/${subdir}/${testfile}.c -lcma" "${binfile}" executable {debug additional_flags=-Ae ldflags=-lcma}] != "" } {
+# OBSOLETE ## gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+# OBSOLETE ##}
+# OBSOLETE
+# OBSOLETE #=========================
+# OBSOLETE #
+# OBSOLETE # Test looking at threads in a core file
+# OBSOLETE #
+# OBSOLETE
+# OBSOLETE remote_exec build "rm -f core"
+# OBSOLETE remote_exec build "${binfile}"
+# OBSOLETE
+# OBSOLETE gdb_exit
+# OBSOLETE gdb_start
+# OBSOLETE gdb_reinitialize_dir $srcdir/$subdir
+# OBSOLETE gdb_load ${binfile}
+# OBSOLETE gdb_test "core-file core" \
+# OBSOLETE ".*Core was generated by `usrthcore'.*in main.*usrthcore.c:170.*" \
+# OBSOLETE "load corefile"
+# OBSOLETE
+# OBSOLETE gdb_test "info thread" \
+# OBSOLETE " 4 .*cma__dispatch.*\\* 1 .*in main.*usrthcore.c:170.*" \
+# OBSOLETE "info thread on core file"
+# OBSOLETE gdb_test "bt" "#0.*in main.*usrthcore.c:170" "backtrace on active thread"
+# OBSOLETE gdb_test "thread 4" ".*Switching to thread 4.*cma__dispatch.*" \
+# OBSOLETE "switch to thread 4 (thread2 procedure)"
+# OBSOLETE gdb_test "bt" "#0.*cma__dispatch.*thread2.*usrthcore.c:99.*" \
+# OBSOLETE "Backtrace on inactive thread (thread2 procedure)"
+# OBSOLETE gdb_test "b thread1" "Breakpoint 1.*usrthcore.c, line 75.*" \
+# OBSOLETE "break on thread1"
+# OBSOLETE gdb_test "run" "Starting program.*Breakpoint 1, thread1.*usrthcore.c:75.*" \
+# OBSOLETE "run program, get to thread1 procedure"
+# OBSOLETE gdb_test "info threads" "\\* \[23\] .*thread1.* 1 .*cma__dispatch.*" \
+# OBSOLETE "info threads after running core"
+# OBSOLETE
+# OBSOLETE
+# OBSOLETE # Done!
+# OBSOLETE #
+# OBSOLETE gdb_exit
+# OBSOLETE
+# OBSOLETE remote_exec build "rm -f core"
+# OBSOLETE
+# OBSOLETE return 0
-#include <stdio.h>
-#include <pthread.h>
-#include <sys/types.h>
-
-int main(void){
-pid_t pid;
-
-switch (pid = fork()){
- case 0:
- printf("child\n");
- break;
- default:
- printf("parent\n");
- break;
- }
- return 0;
-}
+/* OBSOLETE #include <stdio.h> */
+/* OBSOLETE #include <pthread.h> */
+/* OBSOLETE #include <sys/types.h> */
+/* OBSOLETE */
+/* OBSOLETE int main(void){ */
+/* OBSOLETE pid_t pid; */
+/* OBSOLETE */
+/* OBSOLETE switch (pid = fork()){ */
+/* OBSOLETE case 0: */
+/* OBSOLETE printf("child\n"); */
+/* OBSOLETE break; */
+/* OBSOLETE default: */
+/* OBSOLETE printf("parent\n"); */
+/* OBSOLETE break; */
+/* OBSOLETE } */
+/* OBSOLETE return 0; */
+/* OBSOLETE } */
-# user_th_basic.exp -- Expect script to test gdb with user threads
-# Copyright (C) 1992 Free Software Foundation, Inc.
-
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation; either version 2 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
-
-# Please email any bugs, comments, and/or additions to this file to:
-# bug-gdb@prep.ai.mit.edu
-
+# OBSOLETE # user_th_basic.exp -- Expect script to test gdb with user threads
+# OBSOLETE # Copyright (C) 1992 Free Software Foundation, Inc.
+# OBSOLETE
+# OBSOLETE # This program is free software; you can redistribute it and/or modify
+# OBSOLETE # it under the terms of the GNU General Public License as published by
+# OBSOLETE # the Free Software Foundation; either version 2 of the License, or
+# OBSOLETE # (at your option) any later version.
+# OBSOLETE #
+# OBSOLETE # This program is distributed in the hope that it will be useful,
+# OBSOLETE # but WITHOUT ANY WARRANTY; without even the implied warranty of
+# OBSOLETE # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+# OBSOLETE # GNU General Public License for more details.
+# OBSOLETE #
+# OBSOLETE # You should have received a copy of the GNU General Public License
+# OBSOLETE # along with this program; if not, write to the Free Software
+# OBSOLETE # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
+# OBSOLETE
+# OBSOLETE # Please email any bugs, comments, and/or additions to this file to:
+# OBSOLETE # bug-gdb@prep.ai.mit.edu
+# OBSOLETE
verbose "HP's thread tests are broken beyond repair right now."
return 0
-
-if $tracelevel {
- strace $tracelevel
-}
-
-if { ![istarget "hppa*-*-hpux*"] || [istarget "hppa64-*-*"] } {
- verbose "HPUX thread test ignored for non-hppa or PA64 targets."
- return 0
-}
-
-set testfile usrthfork
-set srcfile ${srcdir}/${subdir}/${testfile}.c
-set binfile ${srcdir}/${subdir}/${testfile}
-
-# To build the executable we need to link against the thread library.
-#
-# /opt/ansic/bin/cc -Ae -g -o usrthfork -lcma usrthfork.c
-#
-## we have trouble building it on 11.0, so we use the prebuilt
-## executable instead.
-##
-##if { [gdb_compile "${srcdir}/${subdir}/${testfile}.c" "${binfile}" executable {debug additional_flags=-Ae ldflags=-lcma}] != "" } {
-## gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
-##}
-
-#=========================
-#
-# Test looking at threads.
-#
-gdb_exit
-gdb_start
-gdb_reinitialize_dir $srcdir/$subdir
-gdb_load ${binfile}
-
-gdb_test "set follow-fork-mode parent" ".*" "set follow-fork-mode parent"
-gdb_test "b main" "Breakpoint 1.*" "b main"
-gdb_test "run" "Breakpoint 1, main.*:8.*" "run to main"
-##gdb_test "next" \
-## ".*New process.*Detaching after fork from process.*13.*parent.*" \
-## "next on CMA fork"
-send_gdb "next\n"
-gdb_expect {
- -re ".*Detaching after fork from.*$gdb_prompt $" {
- pass "next on CMA fork"
- }
- -re ".*$gdb_prompt $" { fail "next on CMA fork" }
- timeout { fail "(timeout) next on CMA fork" }
-}
-exec sleep 1
-
-gdb_exit
-
-return 0
+# OBSOLETE
+# OBSOLETE if $tracelevel {
+# OBSOLETE strace $tracelevel
+# OBSOLETE }
+# OBSOLETE
+# OBSOLETE if { ![istarget "hppa*-*-hpux*"] || [istarget "hppa64-*-*"] } {
+# OBSOLETE verbose "HPUX thread test ignored for non-hppa or PA64 targets."
+# OBSOLETE return 0
+# OBSOLETE }
+# OBSOLETE
+# OBSOLETE set testfile usrthfork
+# OBSOLETE set srcfile ${srcdir}/${subdir}/${testfile}.c
+# OBSOLETE set binfile ${srcdir}/${subdir}/${testfile}
+# OBSOLETE
+# OBSOLETE # To build the executable we need to link against the thread library.
+# OBSOLETE #
+# OBSOLETE # /opt/ansic/bin/cc -Ae -g -o usrthfork -lcma usrthfork.c
+# OBSOLETE #
+# OBSOLETE ## we have trouble building it on 11.0, so we use the prebuilt
+# OBSOLETE ## executable instead.
+# OBSOLETE ##
+# OBSOLETE ##if { [gdb_compile "${srcdir}/${subdir}/${testfile}.c" "${binfile}" executable {debug additional_flags=-Ae ldflags=-lcma}] != "" } {
+# OBSOLETE ## gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
+# OBSOLETE ##}
+# OBSOLETE
+# OBSOLETE #=========================
+# OBSOLETE #
+# OBSOLETE # Test looking at threads.
+# OBSOLETE #
+# OBSOLETE gdb_exit
+# OBSOLETE gdb_start
+# OBSOLETE gdb_reinitialize_dir $srcdir/$subdir
+# OBSOLETE gdb_load ${binfile}
+# OBSOLETE
+# OBSOLETE gdb_test "set follow-fork-mode parent" ".*" "set follow-fork-mode parent"
+# OBSOLETE gdb_test "b main" "Breakpoint 1.*" "b main"
+# OBSOLETE gdb_test "run" "Breakpoint 1, main.*:8.*" "run to main"
+# OBSOLETE ##gdb_test "next" \
+# OBSOLETE ## ".*New process.*Detaching after fork from process.*13.*parent.*" \
+# OBSOLETE ## "next on CMA fork"
+# OBSOLETE send_gdb "next\n"
+# OBSOLETE gdb_expect {
+# OBSOLETE -re ".*Detaching after fork from.*$gdb_prompt $" {
+# OBSOLETE pass "next on CMA fork"
+# OBSOLETE }
+# OBSOLETE -re ".*$gdb_prompt $" { fail "next on CMA fork" }
+# OBSOLETE timeout { fail "(timeout) next on CMA fork" }
+# OBSOLETE }
+# OBSOLETE exec sleep 1
+# OBSOLETE
+# OBSOLETE gdb_exit
+# OBSOLETE
+# OBSOLETE return 0