Skip to content

R
riscv-gcc-1
Commit 77011afe by Jakub Jelinek
Options

ada-tree.h (TYPE_OBJECT_RECORD_TYPE, [...]): Use TYPE_MIN_VALUE_RAW instead of TYPE_MINVAL. 

	* gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE,
	TYPE_GCC_MIN_VALUE): Use TYPE_MIN_VALUE_RAW instead of TYPE_MINVAL.
	(TYPE_GCC_MAX_VALUE): Use TYPE_MAX_VALUE_RAW instead of TYPE_MAXVAL.

From-SVN: r250355
parent de742204
Showing with 13 additions and 4 deletions
gcc/ada/ChangeLog
2017-07-19 Jakub Jelinek <jakub@redhat.com>
* gcc-interface/ada-tree.h (TYPE_OBJECT_RECORD_TYPE,
TYPE_GCC_MIN_VALUE): Use TYPE_MIN_VALUE_RAW instead of TYPE_MINVAL.
(TYPE_GCC_MAX_VALUE): Use TYPE_MAX_VALUE_RAW instead of TYPE_MAXVAL.
2017-07-18 Mike Frysinger <vapier@chromium.org> 2017-07-18 Mike Frysinger <vapier@chromium.org>
* gcc-interface/Makefile.in ($(P)): Delete * gcc-interface/Makefile.in ($(P)): Delete.
2017-07-15 John Paul Adrian Glaubitz <glaubitz@physik.fu-berlin.de> 2017-07-15 John Paul Adrian Glaubitz <glaubitz@physik.fu-berlin.de>
......
gcc/ada/gcc-interface/ada-tree.h
...@@ -209,21 +209,24 @@ do { \ ...@@ -209,21 +209,24 @@ do { \
this is a conflict on the minval field, but there doesn't seem to be this is a conflict on the minval field, but there doesn't seem to be
simple fix, so we'll live with this kludge for now. */ simple fix, so we'll live with this kludge for now. */
#define TYPE_OBJECT_RECORD_TYPE(NODE) \ #define TYPE_OBJECT_RECORD_TYPE(NODE) \
(TYPE_MINVAL (TREE_CHECK2 ((NODE), UNCONSTRAINED_ARRAY_TYPE, ENUMERAL_TYPE))) (TYPE_MIN_VALUE_RAW (TREE_CHECK2 ((NODE), UNCONSTRAINED_ARRAY_TYPE, \
ENUMERAL_TYPE)))
/* For numerical types, this is the GCC lower bound of the type. The GCC /* For numerical types, this is the GCC lower bound of the type. The GCC
type system is based on the invariant that an object X of a given type type system is based on the invariant that an object X of a given type
cannot hold at run time a value smaller than its lower bound; otherwise cannot hold at run time a value smaller than its lower bound; otherwise
the behavior is undefined. The optimizer takes advantage of this and the behavior is undefined. The optimizer takes advantage of this and
considers that the assertion X >= LB is always true. */ considers that the assertion X >= LB is always true. */
#define TYPE_GCC_MIN_VALUE(NODE) (TYPE_MINVAL (NUMERICAL_TYPE_CHECK (NODE))) #define TYPE_GCC_MIN_VALUE(NODE) \
(TYPE_MIN_VALUE_RAW (NUMERICAL_TYPE_CHECK (NODE)))
/* For numerical types, this is the GCC upper bound of the type. The GCC /* For numerical types, this is the GCC upper bound of the type. The GCC
type system is based on the invariant that an object X of a given type type system is based on the invariant that an object X of a given type
cannot hold at run time a value larger than its upper bound; otherwise cannot hold at run time a value larger than its upper bound; otherwise
the behavior is undefined. The optimizer takes advantage of this and the behavior is undefined. The optimizer takes advantage of this and
considers that the assertion X <= UB is always true. */ considers that the assertion X <= UB is always true. */
#define TYPE_GCC_MAX_VALUE(NODE) (TYPE_MAXVAL (NUMERICAL_TYPE_CHECK (NODE))) #define TYPE_GCC_MAX_VALUE(NODE) \
(TYPE_MAX_VALUE_RAW (NUMERICAL_TYPE_CHECK (NODE)))
/* For a FUNCTION_TYPE, if the subprogram has parameters passed by copy in/ /* For a FUNCTION_TYPE, if the subprogram has parameters passed by copy in/
copy out, this is the list of nodes used to specify the return values of copy out, this is the list of nodes used to specify the return values of
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment