]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
ada: Ada version used to compile runtime is constant
authorPiotr Trojanek <trojanek@adacore.com>
Sun, 14 Jan 2024 20:15:37 +0000 (21:15 +0100)
committerMarc Poulhiès <dkm@gcc.gnu.org>
Mon, 6 Jan 2025 09:14:47 +0000 (10:14 +0100)
Code cleanup.

gcc/ada/ChangeLog:

* opt.ads (Ada_Version_Runtime): Now a constant, since it cannot
and should never be modified.

gcc/ada/opt.ads

index aea52f3ad697c93d3a1d0535b68ed1b1a70c9f20..a09a1ccffa6f159809b82071f9ba881970182d23 100644 (file)
@@ -127,7 +127,7 @@ package Opt is
    --  remains set to Ada_Version_Default). This is used in the rare cases
    --  (notably pragma Obsolescent) where we want the explicit version set.
 
-   Ada_Version_Runtime : Ada_Version_Type := Ada_With_All_Extensions;
+   Ada_Version_Runtime : constant Ada_Version_Type := Ada_With_All_Extensions;
    --  GNAT
    --  Ada version used to compile the runtime. Used to set Ada_Version (but
    --  not Ada_Version_Explicit) when compiling predefined or internal units.