소스 검색

dbgllvm: fix infinite loop when writing multi-dimensional array info

Jonas Maebe 3 년 전
부모
커밋
8d2d91d505
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      compiler/llvm/dbgllvm.pas

+ 1 - 1
compiler/llvm/dbgllvm.pas

@@ -900,7 +900,7 @@ implementation
             subrangenode.addint64('lowerBound',tarraydef(nesteddef).lowrange);
             list.concat(subrangenode);
             arrayrangenode.addvalue(llvm_getmetadatareftypedconst(subrangenode));
-            nesteddef:=def.elementdef;
+            nesteddef:=tarraydef(nesteddef).elementdef;
           end;
         { the array definition }
         dinode:=def_set_meta_impl(def,tai_llvmspecialisedmetadatanode.create(tspecialisedmetadatanodekind.DICompositeType));