diff options
author | Thomas Quinot <quinot@adacore.com> | 2009-04-20 09:44:10 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-20 11:44:10 +0200 |
commit | 7e728b0f0d131c8f9016b89a08f77e4f6479cbbb (patch) | |
tree | b49e8db45c4f24e5ecfeee5550af7e826a984c83 /gcc/ada/s-taprop-linux.adb | |
parent | 5e39baa64cbb9805c30d16d391b3ad446a36ffe7 (diff) | |
download | gcc-7e728b0f0d131c8f9016b89a08f77e4f6479cbbb.zip gcc-7e728b0f0d131c8f9016b89a08f77e4f6479cbbb.tar.gz gcc-7e728b0f0d131c8f9016b89a08f77e4f6479cbbb.tar.bz2 |
s-taprop-irix.adb, [...]: Minor reformatting.
2009-04-20 Thomas Quinot <quinot@adacore.com>
* s-taprop-irix.adb, s-taprop-tru64.adb, s-taprop-vms.adb,
output.adb, output.ads, s-taprop-hpux-dce.adb,
s-taprop-linux.adb, s-taprop-solaris.adb, s-taprop-posix.adb: Minor
reformatting.
From-SVN: r146388
Diffstat (limited to 'gcc/ada/s-taprop-linux.adb')
-rw-r--r-- | gcc/ada/s-taprop-linux.adb | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/s-taprop-linux.adb b/gcc/ada/s-taprop-linux.adb index b9c3c5e..6d197f7 100644 --- a/gcc/ada/s-taprop-linux.adb +++ b/gcc/ada/s-taprop-linux.adb @@ -1085,11 +1085,11 @@ package body System.Task_Primitives.Operations is S.Waiting := True; loop - -- loop in case pthread_cond_wait returns earlier than - -- expected (e.g. in case of EINTR caused by a signal). - -- This should not happen on current implementation of pthread - -- under Linux, but POSIX does not guarantee it, so this may - -- change in the future. + -- Loop in case pthread_cond_wait returns earlier than expected + -- (e.g. in case of EINTR caused by a signal). This should not + -- happen with the current Linux implementation of pthread, but + -- POSIX does not guarantee it, so this may change in the + -- future. Result := pthread_cond_wait (S.CV'Access, S.L'Access); pragma Assert (Result = 0 or else Result = EINTR); |