diff options
Diffstat (limited to 'gcc/ada/gnatcmd.adb')
| -rw-r--r-- | gcc/ada/gnatcmd.adb | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/gnatcmd.adb b/gcc/ada/gnatcmd.adb index 93f7d1c6b93..855a08dcf0a 100644 --- a/gcc/ada/gnatcmd.adb +++ b/gcc/ada/gnatcmd.adb @@ -1668,8 +1668,9 @@ begin elsif Argv'Length > 3 and then Argv (Argv'First + 1 .. Argv'First + 2) = "aP" then - Add_Search_Project_Directory - (Project_Node_Tree, Argv (Argv'First + 3 .. Argv'Last)); + Prj.Env.Add_Directories + (Project_Node_Tree.Project_Path, + Argv (Argv'First + 3 .. Argv'Last)); Remove_Switch (Arg_Num); |