paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-07 16:10:41 +02:00
Code Issues Packages Projects Releases Wiki Activity

- remove generation of the _FPCDummy symbol; for now this leads to more trouble than it has uses (namely none so far)

Browse Source 
git-svn-id: trunk@34230 -
This commit is contained in:
svenbarth 2016-07-29 16:06:35 +00:00
parent 3596809ab4
commit 839d82d9c6
1 changed files with 1 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/pmodules.pas
View File

@ -1617,14 +1617,10 @@ type
if target_info.system in systems_windows then
begin
new_section(current_asmdata.asmlists[al_globals],sec_data,'_FPCDummy',4);
current_asmdata.asmlists[al_globals].concat(tai_symbol.createname_global('_FPCDummy',AT_DATA,0,u32inttype));
current_asmdata.asmlists[al_globals].concat(tai_const.create_32bit(0));
{ ToDo: generate an entry dummy using higher level functionality }
new_section(current_asmdata.asmlists[al_procedures],sec_code,'',0);
current_asmdata.asmlists[al_procedures].concat(tai_symbol.createname_global('_DLLMainCRTStartup',AT_FUNCTION,0,voidcodepointertype));
gen_fpc_dummy(current_asmdata.asmlists[al_procedures]);
current_asmdata.asmlists[al_procedures].concat(tai_const.createname('_FPCDummy',0));
end;
{ leave when we got an error }