From b83266a0e1813b7f4891d5d6b0ed6b7302a3fe98 Mon Sep 17 00:00:00 2001 From: Stan Shebs Date: Wed, 5 May 1999 14:45:51 +0000 Subject: import gdb-19990504 snapshot --- gdb/testsuite/ChangeLog | 14 ++++++++++++++ gdb/testsuite/gdb.base/call-ar-st.exp | 20 +++++++++----------- 2 files changed, 23 insertions(+), 11 deletions(-) (limited to 'gdb/testsuite') diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 331c2af..4a5eec1 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,17 @@ +1999-05-04 Elena Zannoni + + * gdb.base/call-ar-st.exp: Fix one regular expression in test + output. + + * gdb.base/annota1.exp: New file. Annotation level 2 tests. + * gdb.base/annota2.exp: New file. More annotation tests. + * gdb.base/annota1.c: New file. Source file for annota1.exp. + * gdb.base/annota2.cc: New file. Source file for annota2.exp. + +1999-04-23 Angela Marie Thomas + + * config/cfdbug.exp: New file. + 1999-04-20 Jim Blandy * gdb.c++/demangle.exp (test_gnu_style_demangling): Add tests for diff --git a/gdb/testsuite/gdb.base/call-ar-st.exp b/gdb/testsuite/gdb.base/call-ar-st.exp index d408cf1..bc450fb 100644 --- a/gdb/testsuite/gdb.base/call-ar-st.exp +++ b/gdb/testsuite/gdb.base/call-ar-st.exp @@ -210,6 +210,7 @@ gdb_test continue "Continuing\\..*array_c.*array_f.*array_d.*HELLO WORLD.*main \ #call sum_array_print(10, *list1, *list2, *list3, *list4) + send_gdb "print sum_array_print(10, *list1, *list2, *list3, *list4)\n" gdb_expect { -re ".*Sum of 4 arrays, by element \\(add in seed as well\\):\[ \t\r\n\]+Seed: 10\[ \t\r\n\]+Element Index . Sum\[ \t\r\n\]+-------------------------\[ \t\r\n\]+.*\[ \t\]+0\[ \t\]+52\[ \t\r\n\]+1\[ \t\]+60\[ \t\r\n\]+2\[ \t\]+68\[ \t\r\n\]+3\[ \t\]+76\[ \t\r\n\]+4\[ \t\]+84\[ \t\r\n\]+5\[ \t\]+92\[ \t\r\n\]+6\[ \t\]+100\[ \t\r\n\]+7\[ \t\]+108\[ \t\r\n\]+8\[ \t\]+116\[ \t\r\n\]+9\[ \t\]+124\[ \t\r\n\]+.*$gdb_prompt $" { @@ -219,28 +220,25 @@ gdb_expect { timeout { fail "(timeout) print sum_array_print(10, *list1, *list2, *list3, *list4)" } } - -#step -over - send_gdb "next\n" - gdb_expect { - -re "BYE BYE FOR NOW\[ \t\r\n\]main.*+1035\[ \t\r\n\]+printf\\(.VERY GREEN GRASS.n.\\);\[ \t\r\n\]+.*$gdb_prompt $" { pass "next to 1035"} - -re ".*$gdb_prompt $" { fail "next to 1035" } - timeout { fail "next to 1035(timeout)" } - } +#step over +send_gdb "n\n" +gdb_expect { + -re ".*BYE BYE FOR NOW.*1035.*printf\\(.VERY GREEN GRASS.n.\\);.*$gdb_prompt $" { pass "next to 1035"} + -re ".*$gdb_prompt $" { fail "next to 1035" } + timeout { fail "next to 1035(timeout)" } +} #call print_array_rep(\*list1, \*list2, \*list3) send_gdb "print print_array_rep(\*list1, \*list2, \*list3)\n" gdb_expect { - -re ".*.*$gdb_prompt $" { + -re ".*$gdb_prompt $" { pass "print print_array_rep(*list1, *list2, *list3)" } -re ".*$gdb_prompt $" { fail "print print_array_rep(*list1, *list2, *list3)" } timeout { fail "(timeout) print print_array_rep(*list1, *list2, *list3)" } } - - #go -until 1039 gdb_test "tbreak 1039" \ "Breakpoint..* file .*$srcfile, line 1039.*" \ -- cgit v1.1