paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-14 20:39:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

* applied patch by Cyrax to fix #24722, revertes partially r25054 which was wrong

Browse Source 
git-svn-id: trunk@25282 -
This commit is contained in:
florian 2013-08-18 16:05:43 +00:00
parent dc95ba5b07
commit 38f3448e22
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/dbgdwarf.pas
View File

@ -2383,7 +2383,7 @@ implementation
else
begin
templist.concat(tai_const.create_8bit(ord(DW_OP_addr)));
templist.concat(tai_const.Create_type_name(offsetabstype,sym.mangledname,offset));
templist.concat(tai_const.Create_type_name(aitconst_ptr,sym.mangledname,offset));
blocksize:=1+sizeof(puint);
end;
end;
@ -2844,7 +2844,7 @@ implementation
toasm :
begin
templist.concat(tai_const.create_8bit(3));
templist.concat(tai_const.create_type_name(offsetabstype,sym.mangledname,0));
templist.concat(tai_const.create_type_name(aitconst_ptr,sym.mangledname,0));
blocksize:=1+sizeof(puint);
end;
tovar: