paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-22 11:49:42 +02:00
Code Issues Packages Projects Releases Wiki Activity

* ifdef cpupowerpc -> ifdef cpupowerpc32

Browse Source 
git-svn-id: trunk@9056 -
This commit is contained in:
Jonas Maebe 2007-11-02 09:51:23 +00:00
parent 1ea7d58a61
commit 7453e2a72d
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tests/test/opt/tretopt.pp
View File

@ -243,7 +243,7 @@ begin
end; end;
{$if defined(cpupowerpc) or defined(cpupowerpc64) or defined(cpui386)} {$if defined(cpupowerpc32) or defined(cpupowerpc64) or defined(cpui386)}
function f11: tr; function f11: tr;
begin begin
fillchar(result,sizeof(result),0); fillchar(result,sizeof(result),0);
@ -257,7 +257,7 @@ var
t: tr; t: tr;
begin begin
asm asm
{$ifdef cpupowerpc} {$ifdef cpupowerpc32}
la r3,t la r3,t
{$ifndef macos} {$ifndef macos}
lis r4,p3@ha lis r4,p3@ha
@ -296,7 +296,7 @@ var
begin begin
inlined:=true; inlined:=true;
asm asm
{$ifdef cpupowerpc} {$ifdef cpupowerpc32}
la r3,t la r3,t
{$ifndef macos} {$ifndef macos}
lis r4,p3@ha lis r4,p3@ha
@ -423,7 +423,7 @@ begin
testrecinl5; testrecinl5;
testrec2a; testrec2a;
testrec2ainl; testrec2ainl;
{$if defined(cpupowerpc) or defined(cpui386) or defined(cpupowerpc64)} {$if defined(cpupowerpc32) or defined(cpui386) or defined(cpupowerpc64)}
testrec3a; testrec3a;
testrec3ainl; testrec3ainl;
{$endif} {$endif}