paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-09 19:28:55 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Removed a leftover of my code. It is not needed anymore.

Browse Source 
git-svn-id: trunk@31755 -
This commit is contained in:
yury 2015-09-18 10:34:27 +00:00
parent 7c62aadf65
commit 61a1976e09
1 changed files with 0 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/arm/cgcpu.pas
View File

@ -2127,12 +2127,6 @@ unit cgcpu;
paddingreg: TSuperRegister; paddingreg: TSuperRegister;
imm1, imm2: DWord; imm1, imm2: DWord;
begin begin
{ Release PIC register }
if (cs_create_pic in current_settings.moduleswitches) and
(tf_pic_uses_got in target_info.flags) and
(pi_needs_got in current_procinfo.flags)
then
list.concat(tai_regalloc.dealloc(current_procinfo.got,nil));
if not(nostackframe) then if not(nostackframe) then
begin begin
registerarea:=0; registerarea:=0;