diff options
| author | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-07-07 09:50:59 +0000 |
|---|---|---|
| committer | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-07-07 09:50:59 +0000 |
| commit | eca04deb976889c9aa09542d9683d41c292e9849 (patch) | |
| tree | 428c04c73c482c100e3a52bf03decb35c3a05493 /gcc/ada | |
| parent | 14f27bc62d31edd462a7fc10cfb684a36b9e124e (diff) | |
| download | gcc-eca04deb976889c9aa09542d9683d41c292e9849.tar.gz | |
* gcc-interface/misc.c (gnat_init): Tweak previous change.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@175960 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada')
| -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); |