OLD | NEW |
1 # multi-create.exp -- Test creating many threads in parallel | 1 # multi-create.exp -- Test creating many threads in parallel |
2 # Copyright (C) 2007-2012 Free Software Foundation, Inc. | 2 # Copyright (C) 2007-2012 Free Software Foundation, Inc. |
3 | 3 |
4 # This program is free software; you can redistribute it and/or modify | 4 # This program is free software; you can redistribute it and/or modify |
5 # it under the terms of the GNU General Public License as published by | 5 # it under the terms of the GNU General Public License as published by |
6 # the Free Software Foundation; either version 3 of the License, or | 6 # the Free Software Foundation; either version 3 of the License, or |
7 # (at your option) any later version. | 7 # (at your option) any later version. |
8 # | 8 # |
9 # This program is distributed in the hope that it will be useful, | 9 # This program is distributed in the hope that it will be useful, |
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of | 10 # but WITHOUT ANY WARRANTY; without even the implied warranty of |
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | 11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
12 # GNU General Public License for more details. | 12 # GNU General Public License for more details. |
13 # | 13 # |
14 # You should have received a copy of the GNU General Public License | 14 # You should have received a copy of the GNU General Public License |
15 # along with this program. If not, see <http://www.gnu.org/licenses/>. | 15 # along with this program. If not, see <http://www.gnu.org/licenses/>. |
16 | 16 |
17 set testfile "multi-create" | 17 standard_testfile |
18 set srcfile ${testfile}.c | |
19 set binfile ${objdir}/${subdir}/${testfile} | |
20 | 18 |
21 if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \ | 19 if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \ |
22 executable {debug}] != "" } { | 20 executable {debug}] != "" } { |
23 return -1 | 21 return -1 |
24 } | 22 } |
25 | 23 |
26 gdb_start | 24 clean_restart ${binfile} |
27 gdb_reinitialize_dir $srcdir/$subdir | |
28 gdb_load ${binfile} | |
29 runto_main | 25 runto_main |
30 | 26 |
31 # Run to the beginning of create_function several times. Make sure | 27 # Run to the beginning of create_function several times. Make sure |
32 # we always stop there, and not somewhere else in the guts of the | 28 # we always stop there, and not somewhere else in the guts of the |
33 # thread library. | 29 # thread library. |
34 | 30 |
35 set bp_location1 [gdb_get_line_number "set breakpoint 1 here"] | 31 set bp_location1 [gdb_get_line_number "set breakpoint 1 here"] |
36 gdb_breakpoint $srcfile:$bp_location1 | 32 gdb_breakpoint $srcfile:$bp_location1 |
37 for {set i 0} {$i < 32} {incr i} { | 33 for {set i 0} {$i < 32} {incr i} { |
38 gdb_test "continue" ".*Breakpoint $decimal,.*$srcfile:$bp_location1.*" \ | 34 gdb_test "continue" ".*Breakpoint $decimal,.*$srcfile:$bp_location1.*" \ |
39 "continue to breakpoint $i" | 35 "continue to breakpoint $i" |
40 } | 36 } |
OLD | NEW |