diff mbox series

[COMMITTED] ada: Cleanup WITH clauses after switching from obsolescent Ada 83 unit

Message ID 20221107083940.150593-1-poulhies@adacore.com
State Repeat Merge
Headers
Series [COMMITTED] ada: Cleanup WITH clauses after switching from obsolescent Ada 83 unit |

Checks

Context Check Description
snail/gcc-patch-check warning Git am fail log

Commit Message

Marc Poulhiès Nov. 7, 2022, 8:39 a.m. UTC 
  From: Piotr Trojanek <trojanek@adacore.com>

Cleanup after replacing Unchecked_Conversion with
Ada.Unchecked_Conversion.

gcc/ada/

	* libgnarl/s-interr.adb: Reorder context items and pragmas.

Tested on x86_64-pc-linux-gnu, committed on master.

---
 gcc/ada/libgnarl/s-interr.adb | 17 ++++++-----------
 1 file changed, 6 insertions(+), 11 deletions(-)
diff mbox series

Patch

diff --git a/gcc/ada/libgnarl/s-interr.adb b/gcc/ada/libgnarl/s-interr.adb
index a3d28d6055c..94e572d482b 100644
--- a/gcc/ada/libgnarl/s-interr.adb
+++ b/gcc/ada/libgnarl/s-interr.adb
@@ -54,27 +54,22 @@ 
 
 with Ada.Exceptions;
 with Ada.Task_Identification;
+with Ada.Unchecked_Conversion;
 
-with System.Task_Primitives;
 with System.Interrupt_Management;
-
 with System.Interrupt_Management.Operations;
-pragma Elaborate_All (System.Interrupt_Management.Operations);
-
 with System.IO;
-
+with System.Parameters;
+with System.Task_Primitives;
 with System.Task_Primitives.Operations;
 with System.Task_Primitives.Interrupt_Operations;
 with System.Storage_Elements;
+with System.Tasking.Initialization;
 with System.Tasking.Utilities;
-
 with System.Tasking.Rendezvous;
-pragma Elaborate_All (System.Tasking.Rendezvous);
-
-with System.Tasking.Initialization;
-with System.Parameters;
 
-with Ada.Unchecked_Conversion;
+pragma Elaborate_All (System.Interrupt_Management.Operations);
+pragma Elaborate_All (System.Tasking.Rendezvous);
 
 package body System.Interrupts is