diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2009-09-24 13:36:24 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2009-09-24 13:36:24 +0000 |
| commit | 3f13dd777c1c0f76000172eb4426ccea1fd4d79d (patch) | |
| tree | c8a62fd130fec7119d983c7798a5e73a7f612bdb /gcc/ada/gcc-interface/ada.h | |
| parent | 6356f38faf789f0095575a9258f8d459917f7363 (diff) | |
| download | gcc-3f13dd777c1c0f76000172eb4426ccea1fd4d79d.zip gcc-3f13dd777c1c0f76000172eb4426ccea1fd4d79d.tar.gz gcc-3f13dd777c1c0f76000172eb4426ccea1fd4d79d.tar.bz2 | |
ada.h: Fix outdated comment.
* gcc-interface/ada.h: Fix outdated comment.
* gcc-interface/ada-tree.h (SET_TYPE_RM_VALUE): Use MARK_VISITED in
lieu of mark_visited.
* gcc-interface/gigi.h (mark_visited): Change type of parameter.
(MARK_VISITED): New macro.
(gnat_truthvalue_conversion): Delete.
* gcc-interface/decl.c (gnat_to_gnu_entity): Use MARK_VISITED in lieu
of mark_visited.
(annotate_rep): Fix formatting and tidy.
(compute_field_positions): Get rid of useless variable.
* gcc-interface/trans.c (gnat_to_gnu): Retrieve the Nkind of the GNAT
node only once. Use IN operator for the Nkind in more cases.
Remove calls to gnat_truthvalue_conversion.
(mark_visited): Change type of parameter and adjust.
(mark_visited_r): Dereference TP only once.
(add_decl_expr): Use MARK_VISITED in lieu of mark_visited.
* gcc-interface/utils2.c (gnat_truthvalue_conversion): Delete.
(build_binary_op): Remove calls to gnat_truthvalue_conversion.
(build_unary_op): Likewise.
From-SVN: r152121
Diffstat (limited to 'gcc/ada/gcc-interface/ada.h')
| -rw-r--r-- | gcc/ada/gcc-interface/ada.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/gcc-interface/ada.h b/gcc/ada/gcc-interface/ada.h index 6c2a141..095dec3 100644 --- a/gcc/ada/gcc-interface/ada.h +++ b/gcc/ada/gcc-interface/ada.h @@ -62,9 +62,9 @@ enum { CAT (SUBTYPE,__First) = FIRST, \ CAT (SUBTYPE,__Last) = LAST }; -/* The following definitions provide the equivalent of the Ada IN and NOT IN - operators, assuming that the subtype involved has been defined using the - SUBTYPE macro defined above. */ +/* The following definition provides the equivalent of the Ada IN operator, + assuming that the subtype involved has been defined using the SUBTYPE + macro defined above. */ #define IN(VALUE,SUBTYPE) \ (((VALUE) >= (SUBTYPE) CAT (SUBTYPE,__First)) \ |