OSDN Git Service

* gcc-interface/gigi.h (standard_datatypes): Add ADT_parent_name_id.
[pf3gnuchains/gcc-fork.git] / gcc / ada / gcc-interface / decl.c
index 3a6ed26..330adee 100644 (file)
@@ -2855,7 +2855,7 @@ gnat_to_gnu_entity (Entity_Id gnat_entity, tree gnu_expr, int definition)
            /* ...and reference the _Parent field of this record.  */
            gnu_field
              = create_field_decl (parent_name_id,
-                                  gnu_parent, gnu_type,
+                                  gnu_parent, gnu_type, 0,
                                   has_rep
                                   ? TYPE_SIZE (gnu_parent) : NULL_TREE,
                                   has_rep