2007-08-14 Pascal Obry <obry@adacore.com>
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 14 Aug 2007 08:44:02 +0000 (08:44 +0000)
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>
Tue, 14 Aug 2007 08:44:02 +0000 (08:44 +0000)
commit89ce0207a2cbb8db3490005868cca90b94dc6e6e
treec0fcdfb991e1fa07e98bedeff17e18a4ec61598a
parent6925ea9f399f9d12d3de44754eec7d5af40e620c
2007-08-14  Pascal Obry  <obry@adacore.com>

* s-osinte-mingw.ads: Add support for Ada.Execution_Time on Windows.
(SYSTEM_INFO): New record.
(SetThreadIdealProcessor): New imported routine needed for supporting
task_info pragma on Windows.

* s-taprop-mingw.adb (Enter_Task): Check if CPU number given in task
info can be applied to the current host.
(Create_Task): Set the ideal processor if information is present.

* s-tasinf-mingw.adb, s-tasinf-mingw.ads,
a-exetim-mingw.adb, a-exetim-mingw.ads: New files.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127434 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/a-exetim-mingw.adb [new file with mode: 0755]
gcc/ada/a-exetim-mingw.ads [new file with mode: 0755]
gcc/ada/s-osinte-mingw.ads
gcc/ada/s-taprop-mingw.adb
gcc/ada/s-tasinf-mingw.adb [new file with mode: 0644]
gcc/ada/s-tasinf-mingw.ads [new file with mode: 0644]