diff options
| author | Joel Sherrill <joel.sherrill@oarcorp.com> | 2009-10-16 13:33:53 +0000 |
|---|---|---|
| committer | Joel Sherrill <joel@gcc.gnu.org> | 2009-10-16 13:33:53 +0000 |
| commit | ac2b9bbbd51f78c2b42122df733f9fa84d48fcc9 (patch) | |
| tree | cc70a4f10770580207f56d0f0cd6b3ac6782641f /gcc | |
| parent | f798226d9dbeb88bac9e97b3c3bfef6a42bb4ecf (diff) | |
| download | gcc-ac2b9bbbd51f78c2b42122df733f9fa84d48fcc9.zip gcc-ac2b9bbbd51f78c2b42122df733f9fa84d48fcc9.tar.gz gcc-ac2b9bbbd51f78c2b42122df733f9fa84d48fcc9.tar.bz2 | |
s-osinte-rtems.ads: Add mutex type to pthread_mutexattr_t
2009-10-16 Joel Sherrill <joel.sherrill@oarcorp.com>
* s-osinte-rtems.ads: Add mutex type to pthread_mutexattr_t
* s-stchop-rtems.adb: Correct binding to rtems_stack_checker_is_blown.
From-SVN: r152900
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/s-osinte-rtems.ads | 1 | ||||
| -rw-r--r-- | gcc/ada/s-stchop-rtems.adb | 5 |
3 files changed, 9 insertions, 2 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 5ca33c8..2e65233 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2009-10-16 Joel Sherrill <joel.sherrill@oarcorp.com> + + * s-osinte-rtems.ads: Add mutex type to pthread_mutexattr_t + * s-stchop-rtems.adb: Correct binding to rtems_stack_checker_is_blown. + 2009-10-13 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE> * env.c [__alpha__ && __osf__] (AES_SOURCE): Define. diff --git a/gcc/ada/s-osinte-rtems.ads b/gcc/ada/s-osinte-rtems.ads index 5e3d919..70e4a27 100644 --- a/gcc/ada/s-osinte-rtems.ads +++ b/gcc/ada/s-osinte-rtems.ads @@ -625,6 +625,7 @@ private process_shared : int; prio_ceiling : int; protocol : int; + mutex_type : int; recursive : int; end record; pragma Convention (C, pthread_mutexattr_t); diff --git a/gcc/ada/s-stchop-rtems.adb b/gcc/ada/s-stchop-rtems.adb index 615950e..ac0cfd0 100644 --- a/gcc/ada/s-stchop-rtems.adb +++ b/gcc/ada/s-stchop-rtems.adb @@ -80,8 +80,9 @@ package body System.Stack_Checking.Operations is is pragma Unreferenced (Stack_Address); - -- RTEMS has a routine to check this. So use it. - function rtems_stack_checker_is_blown return Interfaces.C.int; + -- RTEMS has a routine to check if the stack is blown. + -- It returns a C99 bool. + function rtems_stack_checker_is_blown return Interfaces.C.unsigned_char; pragma Import (C, rtems_stack_checker_is_blown, "rtems_stack_checker_is_blown"); |