OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.2/] [gdb/] [testsuite/] [gdb.python/] [py-symtab.exp] - Blame information for rev 357

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 330 jeremybenn
# Copyright (C) 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
# This file is part of the GDB testsuite.  It tests the mechanism
17
# exposing values to Python.
18
 
19
if $tracelevel then {
20
    strace $tracelevel
21
}
22
 
23
set testfile "py-symbol"
24
set srcfile ${testfile}.c
25
set binfile ${objdir}/${subdir}/${testfile}
26
if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != "" } {
27
    untested "Couldn't compile ${srcfile}"
28
    return -1
29
}
30
 
31
# Run a command in GDB, and report a failure if a Python exception is thrown.
32
# If report_pass is true, report a pass if no exception is thrown.
33
proc gdb_py_test_silent_cmd {cmd name report_pass} {
34
  global gdb_prompt
35
 
36
  gdb_test_multiple $cmd $name {
37
      -re "Traceback.*$gdb_prompt $"  { fail $name }
38
      -re "$gdb_prompt $"             { if $report_pass { pass $name } }
39
  }
40
}
41
 
42
# Start with a fresh gdb.
43
gdb_exit
44
gdb_start
45
gdb_reinitialize_dir $srcdir/$subdir
46
gdb_load ${binfile}
47
 
48
# Skip all tests if Python scripting is not enabled.
49
if { [skip_python_tests] } { continue }
50
 
51
if ![runto_main] then {
52
    fail "Can't run to main"
53
    return 0
54
}
55
 
56
global hex decimal
57
 
58
# Setup and get the symbol table.
59
gdb_breakpoint [gdb_get_line_number "Block break here."]
60
gdb_continue_to_breakpoint "Block break here."
61
gdb_py_test_silent_cmd "python frame = gdb.selected_frame()" "Get Frame" 0
62
gdb_py_test_silent_cmd "python sal = frame.find_sal()" "Get block" 0
63
gdb_py_test_silent_cmd "python symtab = sal.symtab" "Get block" 0
64
 
65
# Test sal.
66
gdb_test "python print sal.symtab" "gdb/testsuite/gdb.python/py-symbol.c.*" "Test symtab"
67
gdb_test "python print sal.pc" "${decimal}" "Test sal.pc"
68
gdb_test "python print sal.line" "42" "Test sal.line"
69
 
70
# Test symbol table.
71
gdb_test "python print symtab.filename" "testsuite/gdb.python/py-symbol.c.*" "Test symtab.filename"
72
gdb_test "python print symtab.objfile" "" "Test symtab.objfile"
73
gdb_test "python print symtab.fullname()" "testsuite/gdb.python/py-symbol.c.*" "Test symtab.fullname"

powered by: WebSVN 2.1.0

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