소스 검색

Avoid problems on implicit functions for gas

git-svn-id: trunk@27634 -
pierre 11 년 전
부모
커밋
9a40ff19a1
1개의 변경된 파일7개의 추가작업 그리고 0개의 파일을 삭제
  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 ? }