Commit 8aca3c86 authored by yoogx's avatar yoogx
Browse files

* Correct path to be displayed

parent f17fd02e
...@@ -303,8 +303,10 @@ package body Ocarina.Backends.PO_HI_C is ...@@ -303,8 +303,10 @@ package body Ocarina.Backends.PO_HI_C is
for J in for J in
Name_Tables.First .. Name_Tables.Last (User_Source_Dirs) loop Name_Tables.First .. Name_Tables.Last (User_Source_Dirs) loop
Write_Space; Write_Space;
Write_Name (User_Source_Dirs.Table (J)); Write_Str ("""-I");
Write_Name (Remove_Directory_Separator
(User_Source_Dirs.Table (J)));
Write_Str ("""");
exit when J = Name_Tables.Last (User_Source_Dirs); exit when J = Name_Tables.Last (User_Source_Dirs);
Write_Space; Write_Space;
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment