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

* fixed bug in strscan :(

Browse Source
This commit is contained in:
Jonas Maebe 2000-06-23 11:13:56 +00:00
parent 618dd3c91c
commit 9aae9228e2
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/i386/strings.inc
View File

@ -279,6 +279,7 @@ asm
movl p,%edi
subl %eax,%esi
jz .LSTRSCANLOOP
xorl %eax,%eax
.LSTRSCANALIGNLOOP:
movb (%edi),%al
// at .LSTRSCANFOUND, one is substracted from edi to calculate the position,
@ -414,7 +415,10 @@ end ['EAX','ESI','EDI'];
{
$Log$
Revision 1.10 2000-06-12 19:53:32 peter
Revision 1.11 2000-06-23 11:13:56 jonas
* fixed bug in strscan :(
Revision 1.10 2000/06/12 19:53:32 peter
* change .align to .balign
Revision 1.9 2000/06/11 14:25:23 jonas