aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/exp_prag.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/exp_prag.adb')
-rw-r--r--gcc/ada/exp_prag.adb10
1 files changed, 10 insertions, 0 deletions
diff --git a/gcc/ada/exp_prag.adb b/gcc/ada/exp_prag.adb
index cc59620..340f2dc 100644
--- a/gcc/ada/exp_prag.adb
+++ b/gcc/ada/exp_prag.adb
@@ -3083,6 +3083,16 @@ package body Exp_Prag is
end Expand_Pragma_Loop_Variant;
--------------------------------
+ -- Expand_Pragma_Program_Exit --
+ --------------------------------
+
+ procedure Expand_Pragma_Program_Exit (Prag : Node_Id) is
+ pragma Unreferenced (Prag);
+ begin
+ null;
+ end Expand_Pragma_Program_Exit;
+
+ --------------------------------
-- Expand_Pragma_Psect_Object --
--------------------------------