mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 18:07:56 +02:00
* Guard against empty source, fixes build of docs
This commit is contained in:
parent
3ed5a4a022
commit
cc195c649a
@ -248,6 +248,7 @@ var
|
||||
var
|
||||
StringLength: Integer;
|
||||
begin
|
||||
if Source=Nil then exit;
|
||||
dp := 0;
|
||||
LastSHPos := 0;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user