mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-12 20:29:23 +02:00
* Fix error in TReadr.ReadString. Fixes issue #40652
This commit is contained in:
parent
f6ce76b638
commit
9000f8742d
@ -1729,7 +1729,7 @@ end;
|
|||||||
function TReader.ReadString: rawbytestring;
|
function TReader.ReadString: rawbytestring;
|
||||||
|
|
||||||
begin
|
begin
|
||||||
DoReadString(FDriver.ReadValue);
|
Result:=DoReadString(FDriver.ReadValue);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user