paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-12 11:06:19 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Fix bug ID #36303, change russian comment with english

Browse Source 
git-svn-id: trunk@43468 -
This commit is contained in:
michael 2019-11-15 11:33:19 +00:00
parent 450b52686f
commit b37ab4034a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/regexpr/src/regexpr.pas
View File

@ -3692,7 +3692,7 @@ procedure TRegExpr.SetInputString (const AInputString : RegExprString);
fInputStart := PChar (fInputString); fInputStart := PChar (fInputString);
Len := length (fInputString); Len := length (fInputString);
fInputEnd := PRegExprChar (integer (fInputStart) + Len); ?? fInputEnd := PRegExprChar (integer (fInputStart) + Len); ??
!! startp/endp все равно будет опасно использовать ? !! startp/endp still dangerous to use ?
} }
end; { of procedure TRegExpr.SetInputString end; { of procedure TRegExpr.SetInputString
--------------------------------------------------------------} --------------------------------------------------------------}