Browse Source

* Add moe information about libgdb.a and examples from tests directory

git-svn-id: trunk@24031 -
pierre 12 years ago
parent
commit
2da4a7b3d9
1 changed files with 19 additions and 5 deletions
  1. 19 5
      packages/gdbint/fpmake.pp

+ 19 - 5
packages/gdbint/fpmake.pp

@@ -24,13 +24,20 @@ begin
 
   // First try the environment setting GDBLIBDIR
   GdbLibDir := GetEnvironmentVariable('GDBLIBDIR');
-  if (GdbLibDir<>'') and DirectoryExists(GdbLibDir) then
+  if (GdbLibDir<>'') then
     begin
-      GdbLibFile:=IncludeTrailingPathDelimiter(GdbLibDir)+GdbLibName;
-      if not FileExists(GdbLibFile) then
-        Installer.BuildEngine.Log(vlCommand,'GDBLIBDIR environment variable set, but libgdb not found. ('+GdbLibFile+')')
+      if DirectoryExists(GdbLibDir) then
+        begin
+          GdbLibFile:=IncludeTrailingPathDelimiter(GdbLibDir)+GdbLibName;
+          if not FileExists(GdbLibFile) then
+            Installer.BuildEngine.Log(vlCommand,
+              'GDBLIBDIR environment variable set, but libgdb not found. ('+GdbLibFile+')')
+          else
+            GdbLibFound:=true;
+        end
       else
-        GdbLibFound:=true;
+        Installer.BuildEngine.Log(vlCommand,
+          'GDBLIBDIR environment variable set, but directory does not exist. ('+GdbLibDir+')');
     end;
 
   // Try the default locations
@@ -54,6 +61,10 @@ begin
 
   GdbVerTarget:=TTarget(p.Targets.ItemByName('gdbver'));
 
+  if GdbLibFound then
+    Installer.BuildEngine.Log(vlCommand,'File libgdb.a found ('+GdbLibFile+')')
+  else
+    Installer.BuildEngine.Log(vlCommand,'File libgdb.a not found');
   // When we're cross-compiling, running the gdbver executable to detect the
   // gdb-version is not possible, unless a i386-win32 to i386-go32v2 compilation
   // is performed.
@@ -168,6 +179,9 @@ begin
         begin
           AddInclude('gdbver.inc');
         end;
+    P.ExamplePath.add('tests');
+    P.Targets.AddExampleProgram('testgdb.pp');
+    P.Targets.AddExampleProgram('simify.pp');
     end;
 end;