ソースを参照

- 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 年 前
コミット
6eafee72d7
1 ファイル変更1 行追加1 行削除
  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