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

* fixed small bug in stricomp

Browse Source
This commit is contained in:
Jonas Maebe 2001-07-21 15:51:50 +00:00
parent 7504c62e6e
commit 2d433814ef
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
rtl/powerpc/strings.inc
View File

@ -318,7 +318,7 @@ LStriCompEqual:
{ if they are equal and one is zero, then the other one is zero too }
{ and we're done as well (r3 also contains 0 then) }
{ otherwise loop }
bne LStriCompLoop
bne cr1,LStriCompLoop
LStriCompDone:
end ['r3','r4','r26','r27','r28','r29','r30','cr0','cr1'];
@ -470,7 +470,10 @@ end ['r28','r29','r30','cr0','cr1'];
{
$Log$
Revision 1.7 2001-07-07 12:46:12 jonas
Revision 1.8 2001-07-21 15:51:50 jonas
* fixed small bug in stricomp
Revision 1.7 2001/07/07 12:46:12 jonas
* some small bugfixes and cache optimizations
Revision 1.6 2001/02/23 14:05:33 jonas