Bläddra i källkod

Merged revisions 6493 via svnmerge from
svn+ssh://[email protected]/FPC/svn/fpc/trunk

........
r6493 | jonas | 2007-02-15 19:32:10 +0100 (Thu, 15 Feb 2007) | 4 lines

* reset flag to generate dummy line info after each module
compilation, since the debuginfo class isn't destroyed/
created all the time

........

git-svn-id: branches/fpc_2_3@6501 -

Jonas Maebe 18 år sedan
förälder
incheckning
19e8959f33
1 ändrade filer med 5 tillägg och 1 borttagningar
  1. 5 1
      compiler/dbgdwarf.pas

+ 5 - 1
compiler/dbgdwarf.pas

@@ -2501,7 +2501,11 @@ implementation
       begin
         { only needed if no line info at all has been generated }
         if generated_lineinfo then
-          exit;
+          begin
+            { reset for next module compilation }
+            generated_lineinfo:=false;
+            exit;
+          end;
         { at least the Darwin linker is annoyed if you do not }
         { finish the lineinfo section, or if it doesn't       }
         { contain at least one file name and set_address      }