diff options
| -rw-r--r-- | gdb/testsuite/gdb.ada/assign_arr.exp | 2 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.ada/assign_arr/main_p324_051.adb | 2 | ||||
| -rw-r--r-- | gdb/testsuite/gdb.ada/assign_arr/target_wrapper.ads | 2 |
3 files changed, 3 insertions, 3 deletions
diff --git a/gdb/testsuite/gdb.ada/assign_arr.exp b/gdb/testsuite/gdb.ada/assign_arr.exp index 26e2dcd..3da07ba 100644 --- a/gdb/testsuite/gdb.ada/assign_arr.exp +++ b/gdb/testsuite/gdb.ada/assign_arr.exp @@ -26,5 +26,5 @@ clean_restart ${testfile} set bp_location [gdb_get_line_number "STOP" ${testdir}/main_p324_051.adb] runto "main_p324_051.adb:$bp_location" -gdb_test "print input.u2 := (0.25,0.5,0.75)" \ +gdb_test "print assign_arr_input.u2 := (0.25,0.5,0.75)" \ " = \\(0\\.25, 0\\.5, 0\\.75\\)" diff --git a/gdb/testsuite/gdb.ada/assign_arr/main_p324_051.adb b/gdb/testsuite/gdb.ada/assign_arr/main_p324_051.adb index d102dd3..60010cc 100644 --- a/gdb/testsuite/gdb.ada/assign_arr/main_p324_051.adb +++ b/gdb/testsuite/gdb.ada/assign_arr/main_p324_051.adb @@ -17,5 +17,5 @@ with target_wrapper; use target_wrapper; procedure Main_P324_051 is begin - input.u2 := (0.2,0.3,0.4); -- STOP + Assign_Arr_Input.u2 := (0.2,0.3,0.4); -- STOP end Main_P324_051; diff --git a/gdb/testsuite/gdb.ada/assign_arr/target_wrapper.ads b/gdb/testsuite/gdb.ada/assign_arr/target_wrapper.ads index a58c987..deb9e74 100644 --- a/gdb/testsuite/gdb.ada/assign_arr/target_wrapper.ads +++ b/gdb/testsuite/gdb.ada/assign_arr/target_wrapper.ads @@ -21,6 +21,6 @@ package target_wrapper is u2 : Float_Array_3; end record; - input : parameters; + Assign_Arr_Input : parameters; end target_wrapper; |