aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/s-taprop-linux.adb
diff options
context:
space:
mode:
authorThomas Quinot <quinot@adacore.com>2009-04-20 09:44:10 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2009-04-20 11:44:10 +0200
commit7e728b0f0d131c8f9016b89a08f77e4f6479cbbb (patch)
treeb49e8db45c4f24e5ecfeee5550af7e826a984c83 /gcc/ada/s-taprop-linux.adb
parent5e39baa64cbb9805c30d16d391b3ad446a36ffe7 (diff)
downloadgcc-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.adb10
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);