diff options
author | Piotr Trojanek <trojanek@adacore.com> | 2021-06-09 01:04:35 +0200 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-07-09 12:35:27 +0000 |
commit | 1f72ec808b2a6f95f969bc9a1a13af1f310e1678 (patch) | |
tree | 09d0f3bc4e91d314c85844c9ff50e70fcd6f08a8 | |
parent | e347e6c92769196408720a027618bc67450abe61 (diff) | |
download | gcc-1f72ec808b2a6f95f969bc9a1a13af1f310e1678.zip gcc-1f72ec808b2a6f95f969bc9a1a13af1f310e1678.tar.gz gcc-1f72ec808b2a6f95f969bc9a1a13af1f310e1678.tar.bz2 |
[Ada] Initialize local variables related to static expression functions
gcc/ada/
* sem_ch6.adb (Analyze_Expression_Function): Initialize Orig_N
and Typ variables.
-rw-r--r-- | gcc/ada/sem_ch6.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch6.adb b/gcc/ada/sem_ch6.adb index d543253..78a076c 100644 --- a/gcc/ada/sem_ch6.adb +++ b/gcc/ada/sem_ch6.adb @@ -298,9 +298,9 @@ package body Sem_Ch6 is Asp : Node_Id; New_Body : Node_Id; New_Spec : Node_Id; - Orig_N : Node_Id; + Orig_N : Node_Id := Empty; Ret : Node_Id; - Typ : Entity_Id; + Typ : Entity_Id := Empty; Def_Id : Entity_Id := Empty; Prev : Entity_Id; |