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

* fixed some label names

Browse Source
This commit is contained in:
Jonas Maebe 2003-11-23 17:34:27 +00:00
parent 9b38228c7e
commit 805df8c05f
2 changed files with 11 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rtl/powerpc/powerpc.inc
View File

@ -226,7 +226,7 @@ asm
{ count div 4 for number of dwords to copy }
srwi r0,r5,2
{ if 11 <= count < 63, copy using dwords }
blt cr7,LMoveDWords
blt cr7,.LMoveDWords
{$ifndef ppc603}
{ # of dwords to copy to reach 32 byte alignment (*4) }
@ -456,7 +456,7 @@ asm
{ FillCharSmall or FillCharVerySmall) }
cmpl cr7,r4,11
{ if filling with zero, only use dcbz }
bne cr1, LFillCharNoZero
bne cr1, .LFillCharNoZero
{ make r3 point again to the actual store position }
addi r3,r3,4
.LFillCharDCBZLoop:
@ -1004,7 +1004,10 @@ end;
{
$Log$
Revision 1.55 2003-11-15 19:01:27 florian
Revision 1.56 2003-11-23 17:34:27 jonas
* fixed some label names
Revision 1.55 2003/11/15 19:01:27 florian
* fixed rtl to work with the integrated fpc ppc assembler reader
Revision 1.54 2003/09/14 20:33:28 jonas

7
rtl/powerpc/strlen.inc
View File

@ -22,7 +22,7 @@ asm
{ empty/invalid string? }
cmplwi cr0,r3,0
{ if yes, do nothing }
beq LStrLenDone
beq .LStrLenDone
subi r29,r3,1
.LStrLenLoop:
lbzu r30,1(r29)
@ -34,7 +34,10 @@ end;
{
$Log$
Revision 1.7 2003-11-15 19:01:27 florian
Revision 1.8 2003-11-23 17:34:27 jonas
* fixed some label names
Revision 1.7 2003/11/15 19:01:27 florian
* fixed rtl to work with the integrated fpc ppc assembler reader
Revision 1.6 2003/06/14 12:41:09 jonas