~ubuntu-branches/debian/jessie/gdb/jessie

« back to all changes in this revision

Viewing changes to gdb/testsuite/gdb.trace/packetlen.exp

  • Committer: Bazaar Package Importer
  • Author(s): Daniel Jacobowitz
  • Date: 2010-03-20 01:21:29 UTC
  • mfrom: (1.3.4 upstream)
  • Revision ID: james.westby@ubuntu.com-20100320012129-t7h25y8zgr8c2369
Tags: 7.1-1
* New upstream release, including:
  - PIE support (Closes: #346409).
  - C++ improvements, including static_cast<> et al, namespace imports,
    and bug fixes in printing virtual base classes.
  - Multi-program debugging.  One GDB can now debug multiple programs
    at the same time.
  - Python scripting improvements, including gdb.parse_and_eval.
  - Updated MIPS Linux signal frame layout (Closes: #570875).
  - No internal error stepping over _dl_debug_state (Closes: #569551).
* Update to Standards-Version: 3.8.4 (no changes required).
* Include more relevant (and smaller) docs in the gdbserver package
  (Closes: #571132).
* Do not duplicate documentation in gdb64, gdb-source, and libgdb-dev.
* Fix crash when switching into TUI mode (Closes: #568489).

Show diffs side-by-side

added added

removed removed

Lines of Context:
1
 
#   Copyright 1998, 2007, 2008, 2009 Free Software Foundation, Inc.
 
1
#   Copyright 1998, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
2
2
#
3
3
# This program is free software; you can redistribute it and/or modify
4
4
# it under the terms of the GNU General Public License as published by
27
27
gdb_exit
28
28
gdb_start
29
29
 
30
 
if [istarget "m68k-*-elf"] then {
31
 
    load_lib "emc-support.exp"
32
 
    set srcfile gdb_c_test.c
33
 
    set binfile [board_info target d490_binfile];
34
 
    gdb_test "set remotetimeout 6" "" ""
35
 
    set timeout 500
36
 
    gdb_target_monitor "$binfile"
37
 
    # Give a TSTOP and ignore errors, to make sure any previous trace is off
38
 
    gdb_test "tstop" "" ""
39
 
    gdb_test "tfind none"  "" ""
40
 
    send_gdb "compare-sections CS\n"
41
 
    gdb_expect {
42
 
        -re "MIS-MATCHED.*$gdb_prompt $" {
43
 
            untested packetlen.exp
44
 
            return -1
45
 
            all tests in this module will fail.";
46
 
        }
47
 
        -re ".*$gdb_prompt $" { }
48
 
    }
49
 
} else {
50
 
    set testfile "actions"
51
 
    set srcfile ${testfile}.c
52
 
    set binfile $objdir/$subdir/packetlen
53
 
    if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
54
 
            executable {debug nowarnings}] != "" } {
55
 
        untested packetlen.exp
56
 
        return -1
57
 
    }
58
 
    gdb_load $binfile
59
 
    gdb_test "tstop"       "" ""
60
 
    gdb_test "tfind none"  "" ""
61
 
    runto_main
 
30
set testfile "actions"
 
31
set srcfile ${testfile}.c
 
32
set binfile $objdir/$subdir/packetlen
 
33
if { [gdb_compile "$srcdir/$subdir/$srcfile" $binfile \
 
34
          executable {debug nowarnings}] != "" } {
 
35
    untested packetlen.exp
 
36
    return -1
62
37
}
 
38
gdb_load $binfile
 
39
gdb_test "tstop"       "" ""
 
40
gdb_test "tfind none"  "" ""
 
41
runto_main
63
42
gdb_reinitialize_dir $srcdir/$subdir
64
43
 
65
44
# If testing on a remote host, download the source file.
84
63
        "end" ""
85
64
 
86
65
gdb_test "tstart" "" "survive the long packet send"
87
 
if [istarget "m68k-*-elf"] then {
88
 
    gdb_emclaptop_command "85,1,2,3,4,5,6"
89
 
    sleep 5
90
 
} else {
91
 
    gdb_test "break end" "" ""
92
 
    gdb_test "continue" \
93
 
            "Continuing.*Breakpoint $decimal, end.*" \
94
 
            "run trace experiment"
95
 
}
 
66
gdb_test "break end" "" ""
 
67
gdb_test "continue" \
 
68
    "Continuing.*Breakpoint $decimal, end.*" \
 
69
    "run trace experiment"
96
70
 
97
71
gdb_test "tstop" "" "confirm: survived the long packet send"
98
72