From f6bbabf05407ec9e8efb75d31fedf122bc2fdc90 Mon Sep 17 00:00:00 2001 From: Phil Muldoon Date: Wed, 24 Feb 2010 11:11:17 +0000 Subject: 2010-02-24 Phil Muldoon PR python/11314 * lib/gdb.exp (skip_python_tests): New function. * gdb.python/py-cmd.exp: Use skip_python_tests. * gdb.python/py-frame.exp: Likewise. * gdb.python/py-function.exp: Likewise. * gdb.python/py-prettyprint.exp: Likewise. * gdb.python/py-template.exp: Likewise. * gdb.python/py-type.exp: Likewise. * gdb.python/py-value.exp: Likewise. --- gdb/testsuite/gdb.python/py-type.exp | 23 +++++++++++------------ 1 file changed, 11 insertions(+), 12 deletions(-) (limited to 'gdb/testsuite/gdb.python/py-type.exp') diff --git a/gdb/testsuite/gdb.python/py-type.exp b/gdb/testsuite/gdb.python/py-type.exp index ef74d87..63117ad 100644 --- a/gdb/testsuite/gdb.python/py-type.exp +++ b/gdb/testsuite/gdb.python/py-type.exp @@ -34,8 +34,8 @@ proc build_inferior {lang} { } } -# Restart GDB, set breakpoint and run to that breakpoint. -proc restart_gdb {bp} { +# Restart GDB. +proc restart_gdb {} { global srcdir subdir srcfile binfile testfile hex gdb_exit @@ -47,12 +47,14 @@ proc restart_gdb {bp} { perror "couldn't run to breakpoint" return } +} +# Set breakpoint and run to that breakpoint. +proc runto_bp {bp} { gdb_breakpoint [gdb_get_line_number $bp] gdb_continue_to_breakpoint $bp } - # Run a command in GDB, and report a failure if a Python exception is thrown. # If report_pass is true, report a pass if no exception is thrown. proc gdb_py_test_silent_cmd {cmd name report_pass} { @@ -127,21 +129,18 @@ proc test_range {} { # Perform C Tests. build_inferior "c" -restart_gdb "break to inspect struct and array." +restart_gdb -gdb_test_multiple "python print 'hello, world!'" "verify python support" { - -re "not supported.*$gdb_prompt $" { - unsupported "python support is disabled" - return -1 - } - -re "$gdb_prompt $" {} -} +# Skip all tests if Python scripting is not enabled. +if { [skip_python_tests] } { continue } +runto_bp "break to inspect struct and array." test_fields "c" # Perform C++ Tests. build_inferior "c++" -restart_gdb "break to inspect struct and array." +restart_gdb +runto_bp "break to inspect struct and array." test_fields "c++" test_base_class test_range -- cgit v1.1