diff options
Diffstat (limited to 'gcc/ada/libgnat/g-binenv.adb')
| -rw-r--r-- | gcc/ada/libgnat/g-binenv.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/libgnat/g-binenv.adb b/gcc/ada/libgnat/g-binenv.adb index e10fb96..4bf39cd 100644 --- a/gcc/ada/libgnat/g-binenv.adb +++ b/gcc/ada/libgnat/g-binenv.adb @@ -40,7 +40,7 @@ package body GNAT.Bind_Environment is function Get (Key : String) return String is use type System.Address; - Bind_Env_Addr : System.Address; + Bind_Env_Addr : constant System.Address; pragma Import (C, Bind_Env_Addr, "__gl_bind_env_addr"); -- Variable provided by init.c/s-init.ads, and initialized by -- the binder generated file. |