diff --git a/compiler/dbgdwarf.pas b/compiler/dbgdwarf.pas index 863a2fe836..0e1b9f3bb4 100644 --- a/compiler/dbgdwarf.pas +++ b/compiler/dbgdwarf.pas @@ -2750,8 +2750,8 @@ implementation else begin AddConstToAbbrev(ord(DW_FORM_block)); - current_asmdata.asmlists[al_dwarf_info].concat(tai_const.create_uleb128bit(sym.value.len+sizeof(pint))); - current_asmdata.asmlists[al_dwarf_info].concat(tai_const.create_pint_unaligned(sym.value.len)); + current_asmdata.asmlists[al_dwarf_info].concat(tai_const.create_uleb128bit(sym.value.len+sizesinttype.size)); + current_asmdata.asmlists[al_dwarf_info].concat(tai_const.Create_sizeint_unaligned(sym.value.len)); end; i:=0; size:=sym.value.len;