[multiple changes]

2009-09-18  Vincent Celier  <celier@adacore.com>

	* prj.ads, prj.adb (Project_Data): New component
	Imported_Directories_Switches.

2009-09-18  Pascal Obry  <obry@adacore.com>

	* mingw32.h: Include standard _mingw.h file.
	Define _WIN32_WINNT only if not already defined.

From-SVN: r151843

gcc/ada/ChangeLog

@@ -1,3 +1,13 @@
+2009-09-18  Vincent Celier  <celier@adacore.com>
+
+	* prj.ads, prj.adb (Project_Data): New component
+	Imported_Directories_Switches.
+
+2009-09-18  Pascal Obry  <obry@adacore.com>
+
+	* mingw32.h: Include standard _mingw.h file.
+	Define _WIN32_WINNT only if not already defined.
+
 2009-09-18  Thomas Quinot  <quinot@adacore.com>
 
 	* g-socket.adb (Is_Open): New function indicating whether a

gcc/ada/mingw32.h

@@ -36,6 +36,8 @@
 #ifndef _MINGW32_H
 #define _MINGW32_H
 
+#include <_mingw.h>
+
 /* The unicode support is activated by default starting with the 3.9 MingW
    version. It is not possible to use it with previous version due to a bug
    in the MingW runtime.  */
@@ -62,7 +64,9 @@
 #endif
 
 /* We need functionality available only starting with Windows XP */
+#ifndef _WIN32_WINNT
 #define _WIN32_WINNT 0x0501
+#endif
 
 #include <tchar.h>
 #include <windows.h>

gcc/ada/prj.adb

@@ -100,6 +100,7 @@ package body Prj is
                       Imported_Projects              => null,
                       All_Imported_Projects          => null,
                       Ada_Include_Path               => null,
+                      Imported_Directories_Switches  => null,
                       Ada_Objects_Path               => null,
                       Objects_Path                   => null,
                       Include_Path_File              => No_Path,

gcc/ada/prj.ads

@@ -1190,6 +1190,10 @@ package Prj is
       -- Miscellaneous --
       -------------------
 
+      Imported_Directories_Switches : Argument_List_Access := null;
+      --  List of the source search switches (-I<source dir>) to be used
+      --  when compiling.
+
       Ada_Objects_Path : String_Access := null;
       --  The cached value of ADA_OBJECTS_PATH for this project file. Do not
       --  use this field directly outside of the compiler, use