tree-streamer-in.c (unpack_ts_type_common_value_fields): Stream in TYPE_NONALIASED_COMPONENT flag.
* tree-streamer-in.c (unpack_ts_type_common_value_fields): Stream in TYPE_NONALIASED_COMPONENT flag. * tree-streamer-out.c (pack_ts_type_common_value_fields): Stream out TYPE_NONALIASED_COMPONENT flag. From-SVN: r191662
This commit is contained in:
parent
548e68fc23
commit
04208228d8
3 changed files with 11 additions and 0 deletions
|
@ -1,3 +1,10 @@
|
|||
2012-09-24 Eric Botcazou <ebotcazou@adacore.com>
|
||||
|
||||
* tree-streamer-in.c (unpack_ts_type_common_value_fields): Stream in
|
||||
TYPE_NONALIASED_COMPONENT flag.
|
||||
* tree-streamer-out.c (pack_ts_type_common_value_fields): Stream out
|
||||
TYPE_NONALIASED_COMPONENT flag.
|
||||
|
||||
2012-09-24 Jia Liu <proljc@gmail.com>
|
||||
|
||||
* doc/lto.texi: Separate sections.
|
||||
|
|
|
@ -334,6 +334,8 @@ unpack_ts_type_common_value_fields (struct bitpack_d *bp, tree expr)
|
|||
TYPE_NEEDS_CONSTRUCTING (expr) = (unsigned) bp_unpack_value (bp, 1);
|
||||
if (RECORD_OR_UNION_TYPE_P (expr))
|
||||
TYPE_TRANSPARENT_AGGR (expr) = (unsigned) bp_unpack_value (bp, 1);
|
||||
else if (TREE_CODE (expr) == ARRAY_TYPE)
|
||||
TYPE_NONALIASED_COMPONENT (expr) = (unsigned) bp_unpack_value (bp, 1);
|
||||
TYPE_PACKED (expr) = (unsigned) bp_unpack_value (bp, 1);
|
||||
TYPE_RESTRICT (expr) = (unsigned) bp_unpack_value (bp, 1);
|
||||
TYPE_CONTAINS_PLACEHOLDER_INTERNAL (expr)
|
||||
|
|
|
@ -279,6 +279,8 @@ pack_ts_type_common_value_fields (struct bitpack_d *bp, tree expr)
|
|||
bp_pack_value (bp, TYPE_NEEDS_CONSTRUCTING (expr), 1);
|
||||
if (RECORD_OR_UNION_TYPE_P (expr))
|
||||
bp_pack_value (bp, TYPE_TRANSPARENT_AGGR (expr), 1);
|
||||
else if (TREE_CODE (expr) == ARRAY_TYPE)
|
||||
bp_pack_value (bp, TYPE_NONALIASED_COMPONENT (expr), 1);
|
||||
bp_pack_value (bp, TYPE_PACKED (expr), 1);
|
||||
bp_pack_value (bp, TYPE_RESTRICT (expr), 1);
|
||||
bp_pack_value (bp, TYPE_CONTAINS_PLACEHOLDER_INTERNAL (expr), 2);
|
||||
|
|
Loading…
Add table
Reference in a new issue