diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-20 12:43:59 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2008-05-20 12:43:59 +0000 |
| commit | 114aa1adb85d9e526c3bf6793e7fe9fbef9b7616 (patch) | |
| tree | 45fb3eaf8b4aa8894e4570e078599e2115f87ca8 | |
| parent | caab00e1a68f526629146aeffcc90b8d1cf802e2 (diff) | |
| download | ppe42-gcc-114aa1adb85d9e526c3bf6793e7fe9fbef9b7616.tar.gz ppe42-gcc-114aa1adb85d9e526c3bf6793e7fe9fbef9b7616.zip | |
2008-05-20 Arnaud Charlet <charlet@adacore.com>
* s-linux-hppa.ads (atomic_lock_t): Put back proper alignment now that
the underlying issue with malloc/free has been fixed. Remove associated
comments.
Minor reformatting.
Related to PR ada/24533
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@135614 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/ada/s-linux-hppa.ads | 13 |
1 files changed, 5 insertions, 8 deletions
diff --git a/gcc/ada/s-linux-hppa.ads b/gcc/ada/s-linux-hppa.ads index 3c746de3a92..72d1673d832 100644 --- a/gcc/ada/s-linux-hppa.ads +++ b/gcc/ada/s-linux-hppa.ads @@ -97,21 +97,18 @@ package System.Linux is -- struct_sigaction offsets - sa_flags_pos : constant := Standard'Address_Size / 8; - sa_mask_pos : constant := sa_flags_pos * 2; + sa_flags_pos : constant := Standard'Address_Size / 8; + sa_mask_pos : constant := sa_flags_pos * 2; - SA_SIGINFO : constant := 16#10#; - SA_ONSTACK : constant := 16#01#; + SA_SIGINFO : constant := 16#10#; + SA_ONSTACK : constant := 16#01#; type lock_array is array (1 .. 4) of Integer; type atomic_lock_t is record lock : lock_array; end record; pragma Convention (C, atomic_lock_t); - -- ??? Alignment should be 16 but this is larger than BIGGEST_ALIGNMENT. - -- This causes an erroneous pointer value to sometimes be passed to free - -- during deallocation. See PR ada/24533 for more details. - for atomic_lock_t'Alignment use 8; + for atomic_lock_t'Alignment use 16; type struct_pthread_fast_lock is record spinlock : atomic_lock_t; |
