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

winnt.c (i386_pe_encode_section_info): Smash rtlname's XSTR in place, so we don't lose SYMBOL_REF_DECL info.

Browse source 
* config/i386/winnt.c (i386_pe_encode_section_info):  Smash rtlname's
	XSTR in place, so we don't lose SYMBOL_REF_DECL info.

From-SVN: r83893
This commit is contained in:
Per Bothner 2004-06-29 22:04:38 -07:00 • committed by Per Bothner
parent 8319dc8709
commit ce7f2acdd9
2 changed files with 14 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
gcc/ChangeLog
View file

@ -1,3 +1,8 @@
2004-06-29 Per Bothner <per@bothner.com>
* config/i386/winnt.c (i386_pe_encode_section_info): Smash rtlname's
XSTR in place, so we don't lose SYMBOL_REF_DECL info.
2004-06-29 Zack Weinberg <zack@codesourcery.com> 2004-06-29 Zack Weinberg <zack@codesourcery.com>
* config/ia64/hpux.h: Target does too support thread-local storage. * config/ia64/hpux.h: Target does too support thread-local storage.

18
gcc/config/i386/winnt.c
View file

@ -488,16 +488,16 @@ i386_pe_encode_section_info (tree decl, rtx rtl, int first)
{ {
default_encode_section_info (decl, rtl, first); default_encode_section_info (decl, rtl, first);
if (TREE_CODE (decl) == FUNCTION_DECL) if (first && TREE_CODE (decl) == FUNCTION_DECL)
{ {
if (lookup_attribute ("stdcall", tree type_attributes = TYPE_ATTRIBUTES (TREE_TYPE (decl));
TYPE_ATTRIBUTES (TREE_TYPE (decl)))) rtx rtlname = XEXP (rtl, 0);
XEXP (DECL_RTL (decl), 0) = if (GET_CODE (rtlname) == MEM)
gen_rtx_SYMBOL_REF (Pmode, gen_stdcall_suffix (decl)); rtlname = XEXP (rtlname, 0);
else if (lookup_attribute ("fastcall", if (lookup_attribute ("stdcall", type_attributes))
TYPE_ATTRIBUTES (TREE_TYPE (decl)))) XSTR (rtlname, 0) = gen_stdcall_suffix (decl);
XEXP (DECL_RTL (decl), 0) = else if (lookup_attribute ("fastcall", type_attributes))
gen_rtx_SYMBOL_REF (Pmode, gen_fastcall_suffix (decl)); XSTR (rtlname, 0) = gen_fastcall_suffix (decl);
} }
/* Mark the decl so we can tell from the rtl whether the object is /* Mark the decl so we can tell from the rtl whether the object is