diff --git a/compiler/cfidwarf.pas b/compiler/cfidwarf.pas index 25d321457e..961d2cd7d8 100644 --- a/compiler/cfidwarf.pas +++ b/compiler/cfidwarf.pas @@ -341,7 +341,7 @@ implementation } generate_initial_instructions(list); - list.concat(cai_align.create_zeros(4)); + list.concat(cai_align.create_zeros(sizeof(pint))); list.concat(tai_label.create(lenendlabel)); lenstartlabel:=nil; lenendlabel:=nil; @@ -377,7 +377,7 @@ implementation end; DW_CFA_End_Frame : begin - list.concat(cai_align.create_zeros(4)); + list.concat(cai_align.create_zeros(sizeof(pint))); list.concat(tai_label.create(lenendlabel)); lenstartlabel:=nil; lenendlabel:=nil;