From 3aac5551307840a5063d13759922cf334db2caeb Mon Sep 17 00:00:00 2001 From: Robert Dewar Date: Wed, 30 Jul 2014 13:48:04 +0000 Subject: exp_ch7.adb, [...]: Minor reformatting. 2014-07-30 Robert Dewar * exp_ch7.adb, s-tataat.adb, s-tataat.ads, s-parame-vms-alpha.ads, inline.adb, s-parame-hpux.ads, exp_smem.adb, s-tasini.adb, s-tasini.ads, s-parame-vms-ia64.ads, s-parame.ads, s-taskin.ads, s-parame-vxworks.ads, a-tasatt.adb, a-tasatt.ads: Minor reformatting. * a-suenco.adb (Convert): Handle overlong encodings in UTF8-UTF8 conversion. From-SVN: r213268 --- gcc/ada/s-tasini.adb | 1 + 1 file changed, 1 insertion(+) (limited to 'gcc/ada/s-tasini.adb') diff --git a/gcc/ada/s-tasini.adb b/gcc/ada/s-tasini.adb index 66734b1..b8e0362 100644 --- a/gcc/ada/s-tasini.adb +++ b/gcc/ada/s-tasini.adb @@ -814,6 +814,7 @@ package body System.Tasking.Initialization is procedure Finalize_Attributes (T : Task_Id) is Attr : Atomic_Address; + begin for J in T.Attributes'Range loop Attr := T.Attributes (J); -- cgit v1.1