- fixed check for determining whether requesting the size of an array is

an invalid operation after r42479, as regular arrays can have high=-1
    (mantis #35874, already checked by trange3)

git-svn-id: trunk@42482 -
This commit is contained in:
Jonas Maebe 2019-07-22 12:06:26 +00:00
parent 18dfdb423e
commit 6eafee72d7

View File

@ -4229,7 +4229,7 @@ implementation
end;
{ Tarraydef.size may never be called for an open array! }
if highrange=-1 then
if (highrange=-1) and (lowrange=0) then
internalerror(99080501);
if not (ado_IsBitPacked in arrayoptions) then
cachedelesize:=elesize