paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-31 04:50:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

* fixed powerpc32 compilation after r9331

Browse Source 
git-svn-id: trunk@9336 -
This commit is contained in:
Jonas Maebe 2007-11-26 11:14:07 +00:00
parent 26930be303
commit 2a767fc893
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/powerpc/agppcmpw.pas
View File

@ -759,8 +759,8 @@ interface
;
ait_section:
begin
{if LasTSec<>sec_none then
AsmWriteLn('_'+target_asm.secnames[LasTSec]+#9#9'ENDS');}
{if LastSecType<>sec_none then
AsmWriteLn('_'+target_asm.secnames[LastSecType]+#9#9'ENDS');}
if tai_section(hp).sectype<>sec_none then
begin
@ -780,7 +780,7 @@ interface
AsmLn;
AsmWriteLn(#9+secnames[tai_section(hp).sectype]+' '+cur_CSECT_name+cur_CSECT_class);
end;
LasTSec:=tai_section(hp).sectype;
LastSecType:=tai_section(hp).sectype;
end;
ait_align:
begin