diff options
Diffstat (limited to 'gdb/testsuite/gdb.ada/operator_call.exp')
| -rw-r--r-- | gdb/testsuite/gdb.ada/operator_call.exp | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.ada/operator_call.exp b/gdb/testsuite/gdb.ada/operator_call.exp index e96107b..8f2a268 100644 --- a/gdb/testsuite/gdb.ada/operator_call.exp +++ b/gdb/testsuite/gdb.ada/operator_call.exp @@ -20,7 +20,7 @@ require allow_ada_tests standard_ada_testfile opcall if {[gdb_compile_ada "${srcfile}" "${binfile}" executable {debug}] != ""} { - return -1 + return } clean_restart ${testfile} @@ -71,6 +71,12 @@ proc test_with_menu {command result} { fail $command } } + "Argument to arithmetic operation not a number or boolean." { + fail $command + } + -re "No definition of \".*\" in current context." { + fail $command + } timeout { fail "$command (timeout)" } |