diff options
| -rw-r--r-- | gcc/ada/ChangeLog | 8 | ||||
| -rw-r--r-- | gcc/ada/gcc-interface/misc.c | 4 |
2 files changed, 8 insertions, 4 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 686aad137fd..a0490596d93 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2011-07-07 Eric Botcazou <ebotcazou@adacore.com> + + * gcc-interface/misc.c (gnat_init): Tweak previous change. + 2011-07-07 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> PR target/39150 @@ -5,8 +9,8 @@ 2011-07-06 Richard Guenther <rguenther@suse.de> - * gcc-interface/misc.c (gnat_init): - Merge calls to build_common_tree_nodes and build_common_tree_nodes_2. + * gcc-interface/misc.c (gnat_init): Merge calls to + build_common_tree_nodes and build_common_tree_nodes_2. Re-initialize boolean_false_node. 2011-07-02 Eric Botcazou <ebotcazou@adacore.com> diff --git a/gcc/ada/gcc-interface/misc.c b/gcc/ada/gcc-interface/misc.c index 22516522d4d..70218578046 100644 --- a/gcc/ada/gcc-interface/misc.c +++ b/gcc/ada/gcc-interface/misc.c @@ -315,11 +315,11 @@ gnat_init (void) SET_TYPE_RM_MAX_VALUE (boolean_type_node, build_int_cst (boolean_type_node, 1)); SET_TYPE_RM_SIZE (boolean_type_node, bitsize_int (1)); + boolean_true_node = TYPE_MAX_VALUE (boolean_type_node); + boolean_false_node = TYPE_MIN_VALUE (boolean_type_node); sbitsize_one_node = sbitsize_int (1); sbitsize_unit_node = sbitsize_int (BITS_PER_UNIT); - boolean_true_node = TYPE_MAX_VALUE (boolean_type_node); - boolean_false_node = TYPE_MIN_VALUE (boolean_type_node); ptr_void_type_node = build_pointer_type (void_type_node); |