aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/system-linux-armeb.ads
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/system-linux-armeb.ads')
-rw-r--r--gcc/ada/system-linux-armeb.ads3
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/system-linux-armeb.ads b/gcc/ada/system-linux-armeb.ads
index 355108f2e7f..e855eb20cf3 100644
--- a/gcc/ada/system-linux-armeb.ads
+++ b/gcc/ada/system-linux-armeb.ads
@@ -40,6 +40,9 @@ package System is
-- this unit Pure instead of Preelaborable; see RM 13.7.1(15). In Ada
-- 2005, this is Pure in any case (AI-362).
+ pragma No_Elaboration_Code_All;
+ -- Allow the use of that restriction in units that WITH this unit
+
type Name is (SYSTEM_NAME_GNAT);
System_Name : constant Name := SYSTEM_NAME_GNAT;