diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-27 10:59:55 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-27 10:59:55 +0000 |
| commit | 274bad55a9584affcf26ed40c4b57eae603a7bfe (patch) | |
| tree | 8d9460bf6a9614caea2141e0ca54195eb64063db /gcc/ada/s-tasinf-mingw.adb | |
| parent | 3d32477f4910a9333e8be9ab891ad842ee64accb (diff) | |
| download | ppe42-gcc-274bad55a9584affcf26ed40c4b57eae603a7bfe.tar.gz ppe42-gcc-274bad55a9584affcf26ed40c4b57eae603a7bfe.zip | |
* bindgen.adb: Update comments.
* s-tasinf-mingw.adb: Add "with" of System.OS_Interface
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@136007 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-tasinf-mingw.adb')
| -rw-r--r-- | gcc/ada/s-tasinf-mingw.adb | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/ada/s-tasinf-mingw.adb b/gcc/ada/s-tasinf-mingw.adb index 33b9c739853..644192b0a94 100644 --- a/gcc/ada/s-tasinf-mingw.adb +++ b/gcc/ada/s-tasinf-mingw.adb @@ -33,6 +33,12 @@ -- This is the Windows (native) version of this module +with System.OS_Interface; +pragma Unreferenced (System.OS_Interface); +-- System.OS_Interface is not used today, but the protocol between the +-- run-time and the binder is that any tasking application uses +-- System.OS_Interface, so notify the binder with this "with" clause. + package body System.Task_Info is N_CPU : Natural := 0; |
