diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-08-14 09:05:23 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-08-14 09:05:23 +0000 |
| commit | 1d46fb333071b3df51b326aeb246ac0d34611e02 (patch) | |
| tree | bb35111f12e456c355aa3af1ccaeea7734adc296 /gcc/ada/s-inmaop-posix.adb | |
| parent | 501afbd65eaf138011030efde9abe9b289710b4e (diff) | |
| download | gcc-1d46fb333071b3df51b326aeb246ac0d34611e02.tar.gz | |
Minor reformatting.
Update comments.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127475 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-inmaop-posix.adb')
| -rw-r--r-- | gcc/ada/s-inmaop-posix.adb | 9 |
1 files changed, 2 insertions, 7 deletions
diff --git a/gcc/ada/s-inmaop-posix.adb b/gcc/ada/s-inmaop-posix.adb index e9da380f851..5cee6255e40 100644 --- a/gcc/ada/s-inmaop-posix.adb +++ b/gcc/ada/s-inmaop-posix.adb @@ -8,7 +8,7 @@ -- B o d y -- -- -- -- Copyright (C) 1991-1994, Florida State University -- --- Copyright (C) 1995-2006, AdaCore -- +-- Copyright (C) 1995-2007, AdaCore -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -316,12 +316,7 @@ begin (Storage_Elements.Integer_Address (SIG_IGN)); for J in Interrupt_ID loop - - -- We need to check whether J is in Keep_Unmasked because - -- the index type of the Keep_Unmasked array is not always - -- Interrupt_ID; it may be a subtype of Interrupt_ID. - - if J in Keep_Unmasked'Range and then Keep_Unmasked (J) then + if Keep_Unmasked (J) then Result := sigaddset (mask'Access, Signal (J)); pragma Assert (Result = 0); Result := sigdelset (allmask'Access, Signal (J)); |