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

* fixed erroneous asm line directive

Browse Source
This commit is contained in:
olle 2005-02-08 22:46:00 +00:00
parent e90d15bd5e
commit 1a87bc0ff3
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/powerpc/agppcmpw.pas
View File

@ -756,7 +756,7 @@ var
AsmWriteLn(#9'.stabd'#9+tostr(n_line)+',0,'+tostr(fileinfo.line));
*)
if isInFunction then
AsmWriteln(#9'line '+ tostr(fileinfo.line - firstLineInFunction - 1));
AsmWriteln(#9'line '+ tostr(fileinfo.line - firstLineInFunction + 1));
end;
stabslastfileinfo:=fileinfo;
end;
@ -1462,7 +1462,10 @@ initialization
end.
{
$Log$
Revision 1.42 2004-10-31 21:45:03 peter
Revision 1.43 2005-02-08 22:46:00 olle
* fixed erroneous asm line directive
Revision 1.42 2004/10/31 21:45:03 peter
* generic tlocation
* move tlocation to cgutils