diff options
Diffstat (limited to 'gcc/ada/s-taspri-posix.ads')
| -rw-r--r-- | gcc/ada/s-taspri-posix.ads | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/s-taspri-posix.ads b/gcc/ada/s-taspri-posix.ads index 77f6321359b..f9205d82c71 100644 --- a/gcc/ada/s-taspri-posix.ads +++ b/gcc/ada/s-taspri-posix.ads @@ -44,6 +44,7 @@ package System.Task_Primitives is pragma Preelaborate; type Lock is limited private; + type RW_Lock is limited private; -- Should be used for implementation of protected objects type RTS_Lock is limited private; @@ -78,6 +79,7 @@ package System.Task_Primitives is private type Lock is new System.OS_Interface.pthread_mutex_t; + type RW_Lock is new System.OS_Interface.pthread_rwlock_t; type RTS_Lock is new System.OS_Interface.pthread_mutex_t; type Suspension_Object is record |