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

utils.c (handle_pure_attribute, [...]): Rename DECL_IS_PURE to DECL_PURE_P.

Browse source 
* utils.c (handle_pure_attribute, init_gigi_decls): Rename
DECL_IS_PURE to DECL_PURE_P.

From-SVN: r135078
This commit is contained in:
Andreas Schwab 2008-05-08 11:11:05 +00:00 • committed by Andreas Schwab
parent 5611cf0bf5
commit a1b6607115
2 changed files with 8 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/ada/ChangeLog
View file

@ -1,3 +1,8 @@
2008-05-08 Andreas Schwab <schwab@suse.de>
* utils.c (handle_pure_attribute, init_gigi_decls): Rename
DECL_IS_PURE to DECL_PURE_P.
2008-05-05 Eric Botcazou <ebotcazou@adacore.com>
* decl.c (maybe_pad_type): Add ??? comment.

6
gcc/ada/utils.c
View file

@ -635,7 +635,7 @@ init_gigi_decls (tree long_long_float_type, tree exception_type)
NULL_TREE, build_function_type (jmpbuf_ptr_type, NULL_TREE),
NULL_TREE, false, true, true, NULL, Empty);
/* Avoid creating superfluous edges to __builtin_setjmp receivers. */
DECL_IS_PURE (get_jmpbuf_decl) = 1;
DECL_PURE_P (get_jmpbuf_decl) = 1;
set_jmpbuf_decl
= create_subprog_decl
@ -653,7 +653,7 @@ init_gigi_decls (tree long_long_float_type, tree exception_type)
build_function_type (build_pointer_type (except_type_node), NULL_TREE),
NULL_TREE, false, true, true, NULL, Empty);
/* Avoid creating superfluous edges to __builtin_setjmp receivers. */
DECL_IS_PURE (get_excptr_decl) = 1;
DECL_PURE_P (get_excptr_decl) = 1;
/* Functions that raise exceptions. */
raise_nodefer_decl
@ -4467,7 +4467,7 @@ handle_pure_attribute (tree *node, tree name, tree ARG_UNUSED (args),
int ARG_UNUSED (flags), bool *no_add_attrs)
{
if (TREE_CODE (*node) == FUNCTION_DECL)
DECL_IS_PURE (*node) = 1;
DECL_PURE_P (*node) = 1;
/* ??? TODO: Support types. */
else
{