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

* fixed relabeling properly now :)

Browse Source
This commit is contained in:
Jonas Maebe 2004-07-22 10:09:10 +00:00
parent 038a5dde80
commit 1d846baf9e
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/aasmbase.pas
View File

@ -835,8 +835,7 @@ implementation
begin
if not assigned(p.altsymbol) then
begin
p.altsymbol:=tasmsymbol.create(name+'_'+tostr(nextaltnr),p.defbind,p.typ);
inc(nextaltnr);
p.altsymbol:=tasmsymbol.create(p.name+'_'+tostr(nextaltnr),p.defbind,p.typ);
symbolsearch.insert(p.altsymbol);
{ add also the original sym to the usedasmsymbollist,
that list is used to reset the altsymbol }
@ -950,7 +949,10 @@ implementation
end.
{
$Log$
Revision 1.20 2004-07-22 10:07:09 jonas
Revision 1.21 2004-07-22 10:09:10 jonas
* fixed relabeling properly now :)
Revision 1.20 2004/07/22 10:07:09 jonas
* fixed relabeling (nextaltnr was never increased)
* fixed inlining of case statements at the node level