paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-16 04:50:51 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Fixed minor bug in Tenumdef.stabstring

Browse Source
This commit is contained in:
daniel 2004-02-22 18:49:03 +00:00
parent ad2eb603f2
commit efc644e349
1 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/symdef.pas
View File

@ -1696,8 +1696,8 @@ implementation
inc(stl,length(s));
p:=p.nextenum;
end;
st[stl]:=';';
st[stl+1]:=#0;
st[stl-1]:=';';
st[stl]:=#0;
reallocmem(st,stl+1);
stabstring:=st;
end;
@ -6118,7 +6118,10 @@ implementation
end.
{
$Log$
Revision 1.220 2004-02-19 17:07:42 florian
Revision 1.221 2004-02-22 18:49:03 daniel
* Fixed minor bug in Tenumdef.stabstring
Revision 1.220 2004/02/19 17:07:42 florian
* fixed arg. area calculation
Revision 1.219 2004/02/17 15:57:49 peter