diff options
Diffstat (limited to 'gdb/testsuite/gdb.chill/result.exp')
-rw-r--r-- | gdb/testsuite/gdb.chill/result.exp | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/gdb/testsuite/gdb.chill/result.exp b/gdb/testsuite/gdb.chill/result.exp index 9708db7..64ca335 100644 --- a/gdb/testsuite/gdb.chill/result.exp +++ b/gdb/testsuite/gdb.chill/result.exp @@ -46,31 +46,31 @@ proc do_tests {} { gdb_reinitialize_dir $srcdir/$subdir gdb_load $binfile - gdb_test "set language chill "" + gdb_test "set language chill" "" - gdb_test "set width 0 "" - gdb_test "set print sevenbit-strings "" - gdb_test "set print address off "" + gdb_test "set width 0" "" + gdb_test "set print sevenbit-strings" "" + gdb_test "set print address off" "" # simple function runto simple_func - gdb_test "step 2 "" + gdb_test "step 2" "" gdb_test "print j" "= 5" gdb_test "p RESULT" "= 10" - gdb_test "continue "" + gdb_test "continue" "" gdb_test "print i" "= 7" - gdb_test "step 4 "" - gdb_test "set RESULT := 50 "" - gdb_test "finish "" - gdb_test "step "" + gdb_test "step 4" "" + gdb_test "set RESULT := 50" "" + gdb_test "finish" "" + gdb_test "step" "" gdb_test "print i" "= 50" # returning a structure runto ret_struct - gdb_test "step 2 "" + gdb_test "step 2" "" gdb_test "p result" {\[.l: 33, .b: FALSE\]} - gdb_test "set var result := \[383, TRUE\] "" - gdb_test "finish "" + gdb_test "set var result := \[383, TRUE\]" "" + gdb_test "finish" "" gdb_test "p v_struct" {\[.l: 383, .b: TRUE\]} } |