summaryrefslogtreecommitdiff
path: root/gcc/ada/osint.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/osint.adb')
-rw-r--r--gcc/ada/osint.adb8
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/osint.adb b/gcc/ada/osint.adb
index 1856f16d6c9..27857d02f06 100644
--- a/gcc/ada/osint.adb
+++ b/gcc/ada/osint.adb
@@ -26,7 +26,7 @@
-- --
------------------------------------------------------------------------------
-with Fmap;
+with Fmap; use Fmap;
with Hostparm;
with Namet; use Namet;
with Opt; use Opt;
@@ -996,16 +996,16 @@ package body Osint is
-- directory where the user said it was.
elsif Look_In_Primary_Directory_For_Current_Main
- and then Current_Main = N then
+ and then Current_Main = N
+ then
return Locate_File (N, T, Primary_Directory, File_Name);
-- Otherwise do standard search for source file
else
-
-- Check the mapping of this file name
- File := Fmap.Path_Name_Of (N);
+ File := Mapped_Path_Name (N);
-- If the file name is mapped to a path name, return the
-- corresponding path name