Code clean up.

From-SVN: r177107

diff --git a/gcc/ada/prj-nmsc.adb b/gcc/ada/prj-nmsc.adb
index 5175d01ab50ed3b3104208e0650c347ad529f4a9..e29bc9d01f9580e38c1353d63a92e1583f24ec63 100644 (file)
--- 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;