Code clean up.

From-SVN: r177107

Code clean up.
From-SVN: r177107
e14cd9e5 · Arnaud Charlet · b9e48541 · e14cd9e5
Commit e14cd9e5 authored Aug 02, 2011 by Arnaud Charlet
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 1 deletions

gcc/ada/prj-nmsc.adb
+2 -1

No files found.
--- a/gcc/ada/prj-nmsc.adb
+++ b/gcc/ada/prj-nmsc.adb
@@ -3724,10 +3724,11 @@ package body Prj.Nmsc is

                  else
                     --  For a virtual project extending a library project,
-                     --  inherit library directory.
+                     --  inherit library directory and library kind.

                     Project.Library_Dir := Project.Extends.Library_Dir;
                     Library_Directory_Present := True;
+                     Project.Library_Kind := Project.Extends.Library_Kind;
                  end if;
               end if;
            end if;