paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2026-02-04 09:14:52 +01:00
Code Issues Packages Projects Releases Wiki Activity

Remove more TABs in sources

Browse Source 
git-svn-id: trunk@22336 -
This commit is contained in:
pierre 2012-09-06 08:11:59 +00:00
parent bf46526cc7
commit a3ef2b42a8
7 changed files with 15 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
compiler/mips/cpubase.pas
View File

@ -184,13 +184,13 @@ unit cpubase;
{ PIC Code }
NR_GP = NR_R28;
NR_PIC_FUNC = NR_R25;
NR_PIC_FUNC = NR_R25;
RS_GP = RS_R28;
RS_PIC_FUNC = RS_R25;
RS_PIC_FUNC = RS_R25;
{ VMT code }
NR_VMT = NR_R24;
RS_VMT = RS_R24;
{ VMT code }
NR_VMT = NR_R24;
RS_VMT = RS_R24;
NR_SP = NR_R29;
NR_S8 = NR_R30;

2
compiler/mips/cpunode.pas
View File

@ -37,6 +37,6 @@ implementation
after the generic one (FK)
}
ncpuadd,ncpucall,ncpumat,ncpuinln,
ncpuld,ncpucnv,ncpuset;
ncpuld,ncpucnv,ncpuset;
end.

4
compiler/mips/cpupi.pas
View File

@ -81,8 +81,8 @@ implementation
{ for testing }
needs_frame_pointer := true;//false;
computed_local_size:=-1;
{ pi_needs_got is not yet set correctly
so include it always if creating PIC code }
{ pi_needs_got is not yet set correctly
so include it always if creating PIC code }
if (cs_create_pic in current_settings.moduleswitches) then
begin
include(flags, pi_needs_got);

2
compiler/mips/hlcgcpu.pas
View File

@ -67,7 +67,7 @@ implementation
reference_reset(ref,sizeof(aint));
ref.symbol:=current_asmdata.RefAsmSymbol(s);
ref.base:=NR_GP;
ref.refaddr:=addr_pic;
ref.refaddr:=addr_pic;
cg.a_loadaddr_ref_reg(list,ref,NR_PIC_FUNC);
cg.a_call_reg(list,NR_PIC_FUNC);
end

4
compiler/mips/ncpucall.pas
View File

@ -49,8 +49,8 @@ begin
pass_1 := inherited pass_1;
if assigned(current_procinfo) and
assigned(procdefinition) and
(procdefinition.proccalloption=pocall_cdecl) then
include(current_procinfo.flags,pi_needs_got);
(procdefinition.proccalloption=pocall_cdecl) then
include(current_procinfo.flags,pi_needs_got);
end;
procedure tMIPSELcallnode.extra_call_code;

2
compiler/mips/ncpucnv.pas
View File

@ -294,7 +294,7 @@ begin
location.register64.reghi:=cg.getintregister(current_asmdata.CurrAsmList,OS_32);
if (is_cbool(resultdef)) then
{ reglo is either 0 or -1 -> reghi has to become the same }
cg.a_load_reg_reg(current_asmdata.CurrAsmList,OS_32,OS_32,location.register64.reglo,location.register64.reghi)
cg.a_load_reg_reg(current_asmdata.CurrAsmList,OS_32,OS_32,location.register64.reglo,location.register64.reghi)
else
{ unsigned }
cg.a_load_const_reg(current_asmdata.CurrAsmList,OS_32,0,location.register64.reghi);

6
compiler/mips/racpugas.pas
View File

@ -100,11 +100,11 @@ Interface
begin
Inherited handledollar;
if (c in ['0'..'9','a'..'z']) then
begin
begin
Consume(AS_DOLLAR);
if (actasmtoken=AS_INTNUM) or (actasmtoken=AS_ID) then
begin
{ Try to convert to std register }
begin
{ Try to convert to std register }
if actasmtoken=AS_INTNUM then
actasmregister:=gas_regnum_search('$'+actasmpattern)
else