diff options
Diffstat (limited to 'gcc/ada/makeutl.adb')
| -rw-r--r-- | gcc/ada/makeutl.adb | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/makeutl.adb b/gcc/ada/makeutl.adb index 4b68280..c8cbd05 100644 --- a/gcc/ada/makeutl.adb +++ b/gcc/ada/makeutl.adb @@ -1562,11 +1562,16 @@ package body Makeutl is Main_Id := Create_Name (Base); else declare + -- Always resolve links here, so that users + -- can be specify any name on the command line. + -- If the project itself uses links, the user + -- will be using -eL anyway, and thus files are + -- also stored with resolved names. Absolute : constant String := Normalize_Pathname (Name => Main, Directory => "", - Resolve_Links => False, + Resolve_Links => True, Case_Sensitive => False); begin File.File := Create_Name (Absolute); |