Merge GDB 7.5.1

gdb/testsuite/gdb.mi/var-cmd.c

 /* Copyright 1999, 2004, 2007-2012 Free Software Foundation, Inc.
 
    This file is part of GDB.
 
    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,
@@ skipping 73 matching lines @@
   } s2;
 } weird_struct;
 
 struct _struct_n_pointer {
   char ****char_ptr;
   long ****long_ptr;
   struct _struct_n_pointer *ptrs[3];
   struct _struct_n_pointer *next;
 };
 
+struct anonymous {
+  int a;
+  struct {
+    int b;
+    char *c;
+    union {
+      int d;
+      void *e;
+      char f;
+      struct {
+        char g;
+        const char **h;
+        simpleton ***simple;
+      };
+    };
+  };
+};
+
 void do_locals_tests (void);
 void do_block_tests (void);
 void subroutine1 (int, long *);
 void nothing (void);
 void do_children_tests (void);
 void do_special_tests (void);
 void incr_a (char);
 
 void incr_a (char a)
 {
@@ skipping 11 matching lines @@
   int linteger = 0;
   int *lpinteger = 0;
   char lcharacter[2] = { 0, 0 };
   char *lpcharacter = 0;
   long llong = 0;
   long *lplong = 0;
   float lfloat = 0;
   float *lpfloat = 0;
   double ldouble = 0;
   double *lpdouble = 0;
-  struct _simple_struct lsimple;
-  struct _simple_struct *lpsimple;
-  void (*func) (void);
+  struct _simple_struct lsimple = { 0 };
+  struct _simple_struct *lpsimple = 0;
+  void (*func) (void) = 0;
 
   /* Simple assignments */
   linteger = 1234;
   lpinteger = &linteger;
   lcharacter[0] = 'a';
   lpcharacter = lcharacter;
   llong = 2121L;
   lplong = &llong;
   lfloat = 2.1;
   lpfloat = &lfloat;
@@ skipping 357 matching lines @@
     mi_list_varobj_children "V" {
         {"V.alloc" "alloc" "0" "int"}
         {"V.sharable" "sharable" "0" "uint_for_mi_testing"}
     } "list children of Data"
     mi_check_varobj_value V.sharable 3 "access bitfield"
     :*/
   return;
   /*: END: bitfield :*/  
 }
 
+void
+do_anonymous_type_tests (void)
+{
+  struct anonymous *anon;
+  struct anonymous **ptr;
+  struct
+  {
+    int x;
+    struct
+    {
+      int a;
+    };
+    struct
+    {
+      int b;
+    };
+  } v = {1, {2}, {3}};
+
+  anon = malloc (sizeof (struct anonymous));
+  anon->a = 1;
+  anon->b = 2;
+  anon->c = (char *) 3;
+  anon->d = 4;
+  anon->g = '5';
+  anon->h = (const char **) 6;
+  anon->simple = (simpleton ***) 7;
+
+  ptr = &anon;
+  free (anon);
+  return; /* anonymous type tests breakpoint */
+}
+
 int
 main (int argc, char *argv [])
 {
   do_locals_tests ();
   do_block_tests ();
   do_children_tests ();
   do_special_tests ();
   do_frozen_tests ();
   do_at_tests ();
   do_bitfield_tests ();
+  do_anonymous_type_tests ();
   exit (0);
 }