procyberian/gcc
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

varray.h (VARRAY_CHECK): Const-ify.

Browse source 
* varray.h (VARRAY_CHECK): Const-ify.
	* ggc.h (ggc_mark_rtx, ggc_mark_tree, ggc_mark_nonnull_tree,
	ggc_mark_rtvec, ggc_mark): Const-ify.

From-SVN: r51677
This commit is contained in:
Kaveh R. Ghazi 2002-04-01 05:08:51 +00:00 • committed by Kaveh Ghazi
parent d544bc3983
commit d875078437
3 changed files with 10 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
gcc/ChangeLog
View file

@ -2,6 +2,9 @@
* rtl.h (RTL_CHECK1, RTL_CHECK2, RTL_CHECKC1, RTL_CHECKC2,
RTVEC_ELT): Const-ify.
* varray.h (VARRAY_CHECK): Const-ify.
* ggc.h (ggc_mark_rtx, ggc_mark_tree, ggc_mark_nonnull_tree,
ggc_mark_rtvec, ggc_mark): Const-ify.
2002-04-01 Neil Booth <neil@daikokuya.demon.co.uk>

10
gcc/ggc.h
View file

@ -88,35 +88,35 @@ extern void ggc_mark_rtvec_children PARAMS ((struct rtvec_def *));
#define ggc_mark_rtx(EXPR) \
do { \
rtx r__ = (EXPR); \
rtx const r__ = (EXPR); \
if (ggc_test_and_set_mark (r__)) \
ggc_mark_rtx_children (r__); \
} while (0)
#define ggc_mark_tree(EXPR) \
do { \
tree t__ = (EXPR); \
tree const t__ = (EXPR); \
if (ggc_test_and_set_mark (t__)) \
VARRAY_PUSH_TREE (ggc_pending_trees, t__); \
} while (0)
#define ggc_mark_nonnull_tree(EXPR) \
do { \
tree t__ = (EXPR); \
tree const t__ = (EXPR); \
if (! ggc_set_mark (t__)) \
VARRAY_PUSH_TREE (ggc_pending_trees, t__); \
} while (0)
#define ggc_mark_rtvec(EXPR) \
do { \
rtvec v__ = (EXPR); \
rtvec const v__ = (EXPR); \
if (ggc_test_and_set_mark (v__)) \
ggc_mark_rtvec_children (v__); \
} while (0)
#define ggc_mark(EXPR) \
do { \
const void *a__ = (EXPR); \
const void *const a__ = (EXPR); \
if (a__ != NULL) \
ggc_set_mark (a__); \
} while (0)

4
gcc/varray.h
View file

@ -177,8 +177,8 @@ extern void varray_check_failed PARAMS ((varray_type, size_t,
const char *, int,
const char *)) ATTRIBUTE_NORETURN;
#define VARRAY_CHECK(VA, N, T) __extension__ \
(*({ varray_type _va = VA; \
size_t _n = N; \
(*({ varray_type const _va = (VA); \
const size_t _n = (N); \
if (_n >= _va->num_elements) \
varray_check_failed (_va, _n, __FILE__, __LINE__, __FUNCTION__); \
&_va->data.T[_n]; }))