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

- fixed bra #.label assembler errors hopefully

Browse Source 
git-svn-id: trunk@5492 -
This commit is contained in:
Károly Balogh 2006-11-26 16:19:54 +00:00
parent 0d97f9ab6c
commit 119cdbb772
1 changed files with 13 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/m68k/ag68kgas.pas
View File

@ -199,7 +199,7 @@ interface
if o.ref^.refaddr=addr_full then if o.ref^.refaddr=addr_full then
begin begin
if assigned(o.ref^.symbol) then if assigned(o.ref^.symbol) then
hs:='#'+o.ref^.symbol.name hs:=o.ref^.symbol.name
else else
hs:='#'; hs:='#';
if o.ref^.offset>0 then if o.ref^.offset>0 then