OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-stable/] [gdb-7.2/] [gdb/] [testsuite/] [gdb.threads/] [threxit-hop-specific.exp] - Blame information for rev 841

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 330 jeremybenn
# Copyright (C) 2009, 2010 Free Software Foundation, Inc.
2
 
3
# This program is free software; you can redistribute it and/or modify
4
# it under the terms of the GNU General Public License as published by
5
# the Free Software Foundation; either version 3 of the License, or
6
# (at your option) any later version.
7
#
8
# This program is distributed in the hope that it will be useful,
9
# but WITHOUT ANY WARRANTY; without even the implied warranty of
10
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
11
# GNU General Public License for more details.
12
#
13
# You should have received a copy of the GNU General Public License
14
# along with this program.  If not, see .
15
 
16
# Test that GDB doesn't get stuck when thread hoping over a thread
17
# specific breakpoint when the selected thread has gone away.
18
 
19
set testfile "threxit-hop-specific"
20
set srcfile ${testfile}.c
21
set binfile ${objdir}/${subdir}/${testfile}
22
 
23
if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
24
         executable [list debug "incdir=${objdir}"]] != "" } {
25
    return -1
26
}
27
 
28
# Start with a fresh gdb.
29
 
30
gdb_exit
31
gdb_start
32
gdb_reinitialize_dir $srcdir/$subdir
33
 
34
gdb_load ${binfile}
35
 
36
runto_main
37
 
38
# Get ourselves to the thread that exits
39
gdb_breakpoint "thread_function"
40
gdb_test "continue" ".*thread_function.*" "continue to thread start"
41
 
42
# Set a thread specific breakpoint somewhere the main thread will pass
43
# by, but make it specific to the thread that is going to exit.  Step
44
# over the pthread_exit call.  GDB should still be able to step over
45
# the thread specific breakpoint, and reach the other breakpoint,
46
# which is not thread specific.
47
set bpthrline [gdb_get_line_number "set thread specific breakpoint here"]
48
gdb_test "break $bpthrline thread 2" \
49
    "Breakpoint .*$srcfile.*$bpthrline.*" \
50
    "set thread specific breakpoint"
51
 
52
set bpexitline [gdb_get_line_number "set exit breakpoint here"]
53
gdb_breakpoint "$bpexitline"
54
 
55
gdb_test "next" \
56
    ".*set exit breakpoint here.*" \
57
    "get past the thread specific breakpoint"
58
 
59
return 0

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.