mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-17 13:49:11 +02:00
* fixed copy&paste bug in strecopy
This commit is contained in:
parent
238a764a6e
commit
2b1eb5cf69
@ -132,7 +132,7 @@ LStrECopyAlignedLoop:
|
|||||||
{ test for zero byte }
|
{ test for zero byte }
|
||||||
add r10,r0,r8
|
add r10,r0,r8
|
||||||
andc r10,r10,r0
|
andc r10,r10,r0
|
||||||
and. r10,r10,r9
|
and. r10,r10,r7
|
||||||
bne LStrECopyEndFound
|
bne LStrECopyEndFound
|
||||||
stwu r0,4(r3)
|
stwu r0,4(r3)
|
||||||
b LStrECopyAlignedLoop
|
b LStrECopyAlignedLoop
|
||||||
@ -464,7 +464,10 @@ end ['R0','R9','R10','CR0','CR1'];
|
|||||||
|
|
||||||
{
|
{
|
||||||
$Log$
|
$Log$
|
||||||
Revision 1.15 2003-05-17 00:01:13 jonas
|
Revision 1.16 2003-05-17 12:55:30 florian
|
||||||
|
* fixed copy&paste bug in strecopy
|
||||||
|
|
||||||
|
Revision 1.15 2003/05/17 00:01:13 jonas
|
||||||
* fixed strcopy
|
* fixed strcopy
|
||||||
|
|
||||||
Revision 1.14 2002/09/11 07:49:40 jonas
|
Revision 1.14 2002/09/11 07:49:40 jonas
|
||||||
|
Loading…
Reference in New Issue
Block a user