瀏覽代碼

* cfi for avr needs 32 bit pc begin and range

florian 2 年之前
父節點
當前提交
9e9b38d0cf
共有 1 個文件被更改,包括 4 次插入0 次删除
  1. 4 0
      compiler/cfidwarf.pas

+ 4 - 0
compiler/cfidwarf.pas

@@ -470,7 +470,11 @@ implementation
                   current_asmdata.getlabel(curpos,alt_dbgframe);
                   list.concat(tai_label.create(curpos));
                   list.concat(tai_const.Create_sym(hp.oper[0].beginsym));
+{$if defined(avr)}
+                  list.concat(tai_const.create_rel_sym(aitconst_32bit,hp.oper[0].beginsym,hp.oper[0].endsym));
+{$else defined(avr)}
                   list.concat(tai_const.create_rel_sym(aitconst_ptr,hp.oper[0].beginsym,hp.oper[0].endsym));
+{$endif defined(avr)}
 
                   { we wrote a 'z' into the CIE augmentation data }
                   if datatype=dt_eh_frame then