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

* missing typecast in indexchar0

Browse Source
This commit is contained in:
peter 2004-12-12 12:39:02 +00:00
parent abf1ace89f
commit f13ab0667c
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/inc/generic.inc
View File

@ -312,7 +312,7 @@ begin
I:=IndexByte(Buf,Len,0);
If (I=-1) then
I:=Len;
IndexChar0:=IndexByte(Buf,I,b);
IndexChar0:=IndexByte(Buf,I,byte(b));
end
else
IndexChar0:=0;
@ -1237,7 +1237,10 @@ end;
{
$Log$
Revision 1.88 2004-12-05 12:41:00 michael
Revision 1.89 2004-12-12 12:39:02 peter
* missing typecast in indexchar0
Revision 1.88 2004/12/05 12:41:00 michael
+ Fixed IndexChar0
Revision 1.87 2004/11/17 22:19:04 peter