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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.1/] [gdb/] [testsuite/] [gdb.threads/] [sigthread.exp] - Blame information for rev 227

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 227 jeremybenn
# sigthread.exp -- Expect script to test thread and signal interaction
2
# Copyright (C) 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
3
 
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
6
# the Free Software Foundation; either version 3 of the License, or
7
# (at your option) any later version.
8
#
9
# This program is distributed in the hope that it will be useful,
10
# but WITHOUT ANY WARRANTY; without even the implied warranty of
11
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12
# GNU General Public License for more details.
13
#
14
# You should have received a copy of the GNU General Public License
15
# along with this program.  If not, see .  */
16
 
17
set testfile sigthread
18
set srcfile ${testfile}.c
19
set binfile ${objdir}/${subdir}/${testfile}
20
 
21
if {[gdb_compile_pthreads "${srcdir}/${subdir}/${srcfile}" "${binfile}" \
22
         executable { debug }] != "" } {
23
    return -1
24
}
25
 
26
gdb_exit
27
gdb_start
28
gdb_reinitialize_dir $srcdir/$subdir
29
gdb_load ${binfile}
30
 
31
if ![runto_main] then {
32
   fail "Can't run to main"
33
   return 0
34
}
35
 
36
gdb_test "handle SIGUSR1 nostop noprint pass"
37
gdb_test "handle SIGUSR2 nostop noprint pass"
38
 
39
send_gdb "continue\n"
40
gdb_expect {
41
    -re "Continuing" {
42
        pass "continue"
43
    }
44
    timeout {
45
        fail "continue (timeout)"
46
    }
47
}
48
 
49
# For this to work we must be sure to consume the "Continuing."
50
# message first, or GDB's signal handler may not be in place.
51
after 500 {send_gdb "\003"}
52
 
53
# Make sure we do not get an internal error from hitting Control-C
54
# while many signals are flying back and forth.
55
gdb_test "" "Program received signal SIGINT.*" "stop with control-c"

powered by: WebSVN 2.1.0

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