Bladeren bron

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

Jonas Maebe 3 jaren geleden
bovenliggende
commit
8d2d91d505
1 gewijzigde bestanden met toevoegingen van 1 en 1 verwijderingen
  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));