Pārlūkot izejas kodu

- 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 -

Jonas Maebe 6 gadi atpakaļ
vecāks
revīzija
6eafee72d7
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      compiler/symdef.pas

+ 1 - 1
compiler/symdef.pas

@@ -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