gdb
authorTom Tromey <tromey@redhat.com>
Thu, 30 Sep 2010 18:58:08 +0000 (18:58 +0000)
committerTom Tromey <tromey@redhat.com>
Thu, 30 Sep 2010 18:58:08 +0000 (18:58 +0000)
* value.c (value_primitive_field): Take 'offset' into account for
packed field.
gdb/testsuite
* gdb.base/anon.exp: New file.
* gdb.base/anon.c: New file.

gdb/ChangeLog
gdb/testsuite/ChangeLog
gdb/testsuite/gdb.base/anon.c [new file with mode: 0644]
gdb/testsuite/gdb.base/anon.exp [new file with mode: 0644]
gdb/value.c

index dfbae8b08b1e11904f51e74d9975f0e31206c10e..ed211797faf6f5532e691049b2573e97b4d0ceb6 100644 (file)
@@ -1,3 +1,8 @@
+2010-09-30  Tom Tromey  <tromey@redhat.com>
+
+       * value.c (value_primitive_field): Take 'offset' into account for
+       packed field.
+
 2010-09-30  Tom Tromey  <tromey@redhat.com>
 
        * completer.c (count_struct_fields): Handle anonymous structs and
index 56ee414d82131f2ace885d90fed1493344efc65d..6bd5a8727632d4e0760591ec5055989afdba603f 100644 (file)
@@ -1,3 +1,8 @@
+2010-09-30  Tom Tromey  <tromey@redhat.com>
+
+       * gdb.base/anon.exp: New file.
+       * gdb.base/anon.c: New file.
+
 2010-09-30  Tom Tromey  <tromey@redhat.com>
 
        * gdb.base/completion.exp: Test completion through anonymous
diff --git a/gdb/testsuite/gdb.base/anon.c b/gdb/testsuite/gdb.base/anon.c
new file mode 100644 (file)
index 0000000..ca86ce5
--- /dev/null
@@ -0,0 +1,32 @@
+/* Test of anonymous union in a struct.  */
+
+#include <string.h>
+
+struct outer
+{
+  int one;
+  int two;
+
+  struct
+  {
+    union {
+      int three : 3;
+      int four : 4;
+    };
+
+    union {
+      int five : 3;
+      int six : 4;
+    };
+  } data;
+};
+
+int main ()
+{
+  struct outer val;
+
+  memset (&val, 0, sizeof (val));
+  val.data.six = 6;
+
+  return 0;                    /* break here */
+}
diff --git a/gdb/testsuite/gdb.base/anon.exp b/gdb/testsuite/gdb.base/anon.exp
new file mode 100644 (file)
index 0000000..09d9912
--- /dev/null
@@ -0,0 +1,32 @@
+# Copyright 2010 Free Software Foundation, Inc.
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+#
+
+set testfile "anon"
+set srcfile $testfile.c
+if { [prepare_for_testing $testfile.exp $testfile $srcfile {debug}] } {
+    return -1
+}
+
+if { ![runto main] } then {
+    fail "run to main"
+    return
+}
+
+set loc [gdb_get_line_number "break here"]
+gdb_test "break $loc" ".*Breakpoint 2 .*" "set breakpoint in anon.c"
+gdb_continue_to_breakpoint "continue to breakpoint in anon.c"
+
+gdb_test "print val.data.six" " = 6" "print val.data.six"
index c189930e967ce17dcfdca724d3ea1e028022e619..55fcd38a41206e0779430a441a312cb7b056d809 100644 (file)
@@ -1973,8 +1973,9 @@ value_primitive_field (struct value *arg1, int offset,
        v->bitpos = bitpos % container_bitsize;
       else
        v->bitpos = bitpos % 8;
-      v->offset = value_embedded_offset (arg1)
-       + (bitpos - v->bitpos) / 8;
+      v->offset = (value_embedded_offset (arg1)
+                  + offset
+                  + (bitpos - v->bitpos) / 8);
       v->parent = arg1;
       value_incref (v->parent);
       if (!value_lazy (arg1))