paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-11 13:45:58 +02:00
Code Issues Packages Projects Releases Wiki Activity

* set sizes needs to be passes in bits not bytes to stabs info

Browse Source
This commit is contained in:
pierre 2003-01-21 14:36:44 +00:00
parent 5ecba7a95a
commit 2a17241d66
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/symdef.pas
View File

@ -2469,7 +2469,7 @@ implementation
if settype=smallset then
stabstring := strpnew('r'+s32bittype^.numberstring+';0;0xffffffff;')
else }
stabstring := strpnew('S'+tstoreddef(elementtype.def).numberstring);
stabstring := strpnew('@s'+tostr(savesize*8)+';S'+tstoreddef(elementtype.def).numberstring);
end;
@ -5648,7 +5648,10 @@ implementation
end.
{
$Log$
Revision 1.126 2003-01-16 22:11:33 peter
Revision 1.127 2003-01-21 14:36:44 pierre
* set sizes needs to be passes in bits not bytes to stabs info
Revision 1.126 2003/01/16 22:11:33 peter
* fixed tprocdef.is_addressonly
Revision 1.125 2003/01/15 01:44:33 peter