summaryrefslogtreecommitdiff
path: root/gcc/ada/ali-util.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/ali-util.adb')
-rw-r--r--gcc/ada/ali-util.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/ali-util.adb b/gcc/ada/ali-util.adb
index a3369772d12..2ed90a70e18 100644
--- a/gcc/ada/ali-util.adb
+++ b/gcc/ada/ali-util.adb
@@ -137,6 +137,7 @@ package body ALI.Util is
function Get_File_Checksum (Fname : Name_Id) return Word is
Full_Name : Name_Id;
Source_Index : Source_File_Index;
+
begin
Full_Name := Find_File (Fname, Osint.Source);