diff options
Diffstat (limited to 'gcc/ada/5vinterr.adb')
-rw-r--r-- | gcc/ada/5vinterr.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/5vinterr.adb b/gcc/ada/5vinterr.adb index f41f6542f92..f302ead12e3 100644 --- a/gcc/ada/5vinterr.adb +++ b/gcc/ada/5vinterr.adb @@ -951,7 +951,7 @@ package body System.Interrupts is ----------------- task body Server_Task is - Self_ID : Task_ID := Self; + Self_ID : constant Task_ID := Self; Tmp_Handler : Parameterless_Handler; Tmp_ID : Task_ID; Tmp_Entry_Index : Task_Entry_Index; |