MatCat.OpenSource/8sa1-gcc
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

(expand_builtin, case BUILT_IN_CONSTANT_P): A pointer to a string

Browse Source 
constant is a constant.

From-SVN: r9475
This commit is contained in:
Richard Kenner 1995-04-26 12:29:48 -04:00
parent ccafc85b7f
commit 33cf5823a5
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
gcc/expr.c
View File

@ -7505,8 +7505,15 @@ expand_builtin (exp, target, subtarget, mode, ignore)
if (arglist == 0)
return const0_rtx;
else
return (TREE_CODE_CLASS (TREE_CODE (TREE_VALUE (arglist))) == 'c'
? const1_rtx : const0_rtx);
{
tree arg = TREE_VALUE (arglist);
STRIP_NOPS (arg);
return (TREE_CODE_CLASS (TREE_CODE (arg)) == 'c'
|| (TREE_CODE (arg) == ADDR_EXPR
&& TREE_CODE (TREE_OPERAND (arg, 0)) == STRING_CST)
? const1_rtx : const0_rtx);
}
case BUILT_IN_FRAME_ADDRESS:
/* The argument must be a nonnegative integer constant.