Browse Source

Only add gdbver.inc if needed

git-svn-id: trunk@29154 -
pierre 10 years ago
parent
commit
8ea4e575f2
1 changed files with 6 additions and 5 deletions
  1. 6 5
      packages/gdbint/fpmake.pp

+ 6 - 5
packages/gdbint/fpmake.pp

@@ -16,7 +16,7 @@ var
   P : TPackage;
   GdbLibDir, GdbLibFile: string;
   GdbLibFound: boolean;
-  GdbVerTarget: TTarget;
+  GdbintTarget, GdbVerTarget: TTarget;
 begin
   P := Sender as TPackage;
   // Search for a libgdb file.
@@ -60,6 +60,7 @@ begin
     end;
 
   GdbVerTarget:=TTarget(p.Targets.ItemByName('gdbver'));
+  GdbintTarget:=TTarget(p.Targets.ItemByName('gdbint'));
 
   if GdbLibFound then
     Installer.BuildEngine.Log(vlCommand,'File libgdb.a found ('+GdbLibFile+')')
@@ -94,6 +95,8 @@ begin
         AddProgramExtension('gdbver',Defaults.BuildOS),'-o ' +
         Installer.BuildEngine.AddPathPrefix(p,'src'+PathDelim+'gdbver.inc'));
 
+      with GdbintTarget.Dependencies do
+        AddInclude('gdbver.inc');
       // Pass -dUSE_MINGW_GDB to the compiler when a MinGW gdb is used
       if FileExists(GdbLibDir+PathDelim+MinGWGdbLibName) then
         begin
@@ -119,6 +122,8 @@ begin
         else
           L.values['src'+DirectorySeparator+'gdbver_nogdb.inc'] := 'src'+DirectorySeparator+'gdbver.inc';
         Installer.BuildEngine.cmdcopyfiles(L, Installer.BuildEngine.StartDir, nil);
+        with GdbintTarget.Dependencies do
+          AddInclude('gdbver.inc');
       finally
         L.Free;
       end;
@@ -181,10 +186,6 @@ begin
           AddUnit('gdbint');
         end;
     T:=P.Targets.AddUnit('gdbint.pp');
-      with T.Dependencies do
-        begin
-          AddInclude('gdbver.inc');
-        end;
     P.ExamplePath.add('examples');
     P.Targets.AddExampleProgram('testgdb.pp');
     P.Targets.AddExampleProgram('symify.pp');