瀏覽代碼

* fix writing of augmentation size

git-svn-id: branches/debug_eh@42254 -
florian 6 年之前
父節點
當前提交
adb8e1b76c
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/cfidwarf.pas

+ 1 - 1
compiler/cfidwarf.pas

@@ -426,7 +426,7 @@ implementation
                   if use_eh_frame then
                     begin
                       { size of augmentation }
-                      list.concat(tai_const.create_8bit(4));
+                      list.concat(tai_const.create_8bit(sizeof(pint)));
 {$ifdef debug_eh}
                       list.concat(tai_comment.Create(strpnew('LSDA')));
 {$endif debug_eh}