mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-03 13:29:26 +01:00
* fixed double writing of "<var> located in register" in assembler
source after previous patch git-svn-id: trunk@2104 -
This commit is contained in:
parent
365d2892f4
commit
9603f4bf82
@ -2053,18 +2053,6 @@ implementation
|
||||
if cs_asm_source in aktglobalswitches then
|
||||
begin
|
||||
case localloc.loc of
|
||||
LOC_REGISTER,
|
||||
LOC_CREGISTER :
|
||||
begin
|
||||
if (st.symtabletype <> parasymtable) then
|
||||
begin
|
||||
if (cs_no_regalloc in aktglobalswitches) then
|
||||
list.concat(Tai_comment.Create(strpnew('Var '+realname+' located in register '+
|
||||
std_regname(localloc.register))))
|
||||
else
|
||||
list.concat(Tai_comment.Create(strpnew('Var '+realname+' located in register')));
|
||||
end;
|
||||
end;
|
||||
LOC_REFERENCE :
|
||||
begin
|
||||
if not assigned(localloc.reference.symbol) then
|
||||
|
||||
Loading…
Reference in New Issue
Block a user