mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-01-27 10:54:14 +08:00
Code Issues Packages Projects Releases Wiki Activity

c-common.c (decl_attributes): Issue an error if the argument to alias is not a string.

Browse Source 
* c-common.c (decl_attributes): Issue an error if the argument
to alias is not a string.

From-SVN: r21824
This commit is contained in:
Richard Henderson 1998-08-18 05:40:52 -07:00 committed by Richard Henderson
parent eaa41c8dd3
commit 2004545263
2 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ChangeLog
View File

@ -1,3 +1,8 @@
Tue Aug 18 12:40:27 1998 Richard Henderson <rth@cygnus.com>
* c-common.c (decl_attributes): Issue an error if the argument
to alias is not a string.
Tue Aug 18 10:33:30 1998 Jeffrey A Law (law@cygnus.com)
* Makefile.in (cplus-dem.o): Provide explicit rules for building

12
gcc/c-common.c
View File

@ -855,8 +855,16 @@ decl_attributes (node, attributes, prefix_attributes)
"`%s' defined both normally and as an alias");
else if (decl_function_context (decl) == 0)
{
tree id = get_identifier (TREE_STRING_POINTER
(TREE_VALUE (args)));
tree id;
id = TREE_VALUE (args);
if (TREE_CODE (id) != STRING_CST)
{
error ("alias arg not a string");
break;
}
id = get_identifier (TREE_STRING_POINTER (id));
if (TREE_CODE (decl) == FUNCTION_DECL)
DECL_INITIAL (decl) = error_mark_node;
else