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

* fixed final fillchar error (tfillchr passes now)

Browse Source
This commit is contained in:
Jonas Maebe 2003-05-12 19:39:33 +00:00
parent a2dc1e7a9d
commit d6a589bcd7
1 changed files with 6 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/powerpc/powerpc.inc
View File

@ -389,6 +389,8 @@ LFillChar32ByteLoop:
bdnz LFillChar32ByteLoop
{ if there was no rest, we're finished }
beq LFillCharDone
{ make r3 point again to the actual next byte that must be written }
addi r3,r3,8
b LFillCharVerySmall
LFillCharSmall:
{ when we arrive here, we're already 4 byte aligned }
@ -894,7 +896,10 @@ end ['R3','R10'];
{
$Log$
Revision 1.42 2003-05-12 19:00:50 jonas
Revision 1.43 2003-05-12 19:39:33 jonas
* fixed final fillchar error (tfillchr passes now)
Revision 1.42 2003/05/12 19:00:50 jonas
* fixed bug in fillchar
Revision 1.41 2003/05/10 20:33:39 jonas