* gdb.dwarf2/implptrconst.exp: Create a CU with 4 byte address

	size and change type sizes to 4 bytes.

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index fc74fbb6d5e6cc9c281c15813209bf7212836153..39a4b8beba51fc44472128278cb8a768e245e2fb 100644 (file)
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2013-05-13  Tom Tromey  <tromey@redhat.com>
+
+       * gdb.dwarf2/implptrconst.exp: Create a CU with 4 byte address
+       size and change type sizes to 4 bytes.
+
 2013-05-13  Tom Tromey  <tromey@redhat.com>
 
        * gdb.base/exprs.exp (test_expr): Add regression test.

diff --git a/gdb/testsuite/gdb.dwarf2/implptrconst.exp b/gdb/testsuite/gdb.dwarf2/implptrconst.exp
index 4ce171350366d3682f7f17926a4d3edd13434273..7eca600d3cd8a26d294f89722442bff9be6e3773 100644 (file)
--- a/gdb/testsuite/gdb.dwarf2/implptrconst.exp
+++ b/gdb/testsuite/gdb.dwarf2/implptrconst.exp
@@ -27,7 +27,9 @@ standard_testfile .c implptrconst-dw.S
 # Make some DWARF for the test.
 set asm_file [standard_output_file $srcfile2]
 Dwarf::assemble $asm_file {
-    cu 0 2 8 {
+    # Creating a CU with 4-byte addresses lets this test link on both
+    # 32- and 64-bit machines.
+    cu 0 2 4 {
        compile_unit {} {
            declare_labels byte_label size_type_label array_label
            declare_labels var_label ptr_label
@@ -41,7 +43,7 @@ Dwarf::assemble $asm_file {
            size_type_label: base_type {
                {name sizetype}
                {encoding @DW_ATE_unsigned}
-               {byte_size 8 DW_FORM_sdata}
+               {byte_size 4 DW_FORM_sdata}
            }
 
            array_label: array_type {
@@ -60,7 +62,7 @@ Dwarf::assemble $asm_file {
            }
 
            ptr_label: pointer_type {
-               {byte_size 8 DW_FORM_sdata}
+               {byte_size 4 DW_FORM_sdata}
                {type :$byte_label}
            }