Browse Source

Avoid problems on implicit functions for gas

git-svn-id: trunk@27634 -
pierre 11 years ago
parent
commit
9a40ff19a1
1 changed files with 7 additions and 0 deletions
  1. 7 0
      compiler/dbgstabx.pas

+ 7 - 0
compiler/dbgstabx.pas

@@ -395,6 +395,13 @@ implementation
 
                 end;
 
+              { implicit functions have no file information }
+              if nextlineisfunstart then
+                begin
+                  list.insertbefore(Tai_stab.Create_str(stabx_bf,tostr(currfileinfo.line)),hp);
+                  inc(stabx_func_level);
+                  nextlineisfunstart:=false;
+                end;
               if nolineinfolevel=0 then
                 begin
                   { line changed ? }