Procházet zdrojové kódy

* fix writing of augmentation size

git-svn-id: branches/debug_eh@42254 -
florian před 6 roky
rodič
revize
adb8e1b76c
1 změnil soubory, kde provedl 1 přidání a 1 odebrání
  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}