From 2671885430ef8e938206bf41d907cfd40f6852db Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Tue, 25 Apr 2017 11:37:00 +0200 Subject: [PATCH] Minor reformatting. From-SVN: r247164 --- gcc/ada/lib.adb | 1 + 1 file changed, 1 insertion(+) diff --git a/gcc/ada/lib.adb b/gcc/ada/lib.adb index ae9e29aa927..ea8b061eaff 100644 --- a/gcc/ada/lib.adb +++ b/gcc/ada/lib.adb @@ -905,6 +905,7 @@ package body Lib is function In_Internal_Unit (S : Source_Ptr) return Boolean is Unit : constant Unit_Number_Type := Get_Source_Unit (S); File : constant File_Name_Type := Unit_File_Name (Unit); + begin return Is_Internal_File_Name (File); end In_Internal_Unit; -- 2.30.2