mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-21 20:09:25 +02:00
Derefedata length can be zero if there are no references in PPU
git-svn-id: trunk@32584 -
This commit is contained in:
parent
0e056ece03
commit
8ca036c3b6
@ -860,7 +860,8 @@ begin
|
||||
derefdatalen:=ppufile.entrysize;
|
||||
if derefdatalen=0 then
|
||||
begin
|
||||
WriteError('!! Error: derefdatalen=0');
|
||||
Writeln(['No Derefdata length=0']);
|
||||
derefdata:=nil;
|
||||
exit;
|
||||
end;
|
||||
Writeln(['Derefdata length: ',derefdatalen]);
|
||||
|
Loading…
Reference in New Issue
Block a user