ada: Fix user extension support

1 files changed, 6 insertions, 6 deletions

diff --git a/cpukit/include/adainclude/rtems.ads b/cpukit/include/adainclude/rtems.ads
index 2b59c74186..17ce1ab1d2 100644
--- a/cpukit/include/adainclude/rtems.ads
+++ b/cpukit/include/adainclude/rtems.ads
@@ -274,11 +274,6 @@ pragma Elaborate_Body (RTEMS);
    );
    pragma Convention (C, Thread_Switch_Extension);
 
-   type Thread_Post_Switch_Extension is access procedure (
-      Current_Task : in     RTEMS.TCB_Pointer
-   );
-   pragma Convention (C, Thread_Post_Switch_Extension);
-
    type Thread_Begin_Extension is access procedure (
       Current_Task : in     RTEMS.TCB_Pointer
    );
@@ -289,6 +284,11 @@ pragma Elaborate_Body (RTEMS);
    );
    pragma Convention (C, Thread_Exitted_Extension);
 
+   type Thread_Terminate_Extension is access procedure (
+      Current_Task : in     RTEMS.TCB_Pointer
+   );
+   pragma Convention (C, Thread_Terminate_Extension);
+
    type Fatal_Error_Extension is access procedure (
       Error : in     RTEMS.Unsigned32
    );
@@ -301,10 +301,10 @@ pragma Elaborate_Body (RTEMS);
          Thread_Restart     : RTEMS.Thread_Restart_Extension;
          Thread_Delete      : RTEMS.Thread_Delete_Extension;
          Thread_Switch      : RTEMS.Thread_Switch_Extension;
-         Thread_Post_Switch : RTEMS.Thread_Post_Switch_Extension;
          Thread_Begin       : RTEMS.Thread_Begin_Extension;
          Thread_Exitted     : RTEMS.Thread_Exitted_Extension;
          Fatal              : RTEMS.Fatal_Error_Extension;
+         Thread_Terminate   : RTEMS.Thread_Terminate_Extension;
       end record;
 
    type Extensions_Table_Pointer is access all Extensions_Table;