Skip to content

R
riscv-gcc-1
Commit 592b9a75 by Arnaud Charlet
Options

* prj-nmsc.adb: Minor reformatting 

From-SVN: r136024
parent 07736171
Showing with 2 additions and 5 deletions
gcc/ada/prj-nmsc.adb
...@@ -4692,7 +4692,7 @@ package body Prj.Nmsc is ...@@ -4692,7 +4692,7 @@ package body Prj.Nmsc is
Data.Other_Sources_Present := False; Data.Other_Sources_Present := False;
else else
-- If the configuration file does not define a language either -- Fail if there is no default language defined
if Def_Lang.Default then if Def_Lang.Default then
if not Default_Language_Is_Ada then if not Default_Language_Is_Ada then
...@@ -4707,8 +4707,6 @@ package body Prj.Nmsc is ...@@ -4707,8 +4707,6 @@ package body Prj.Nmsc is
end if; end if;
else else
-- ??? Are we supporting a single default language in the
-- configuration file ?
Get_Name_String (Def_Lang.Value); Get_Name_String (Def_Lang.Value);
To_Lower (Name_Buffer (1 .. Name_Len)); To_Lower (Name_Buffer (1 .. Name_Len));
Def_Lang_Id := Name_Find; Def_Lang_Id := Name_Find;
...@@ -5208,8 +5206,7 @@ package body Prj.Nmsc is ...@@ -5208,8 +5206,7 @@ package body Prj.Nmsc is
In_Tree.Sources.Table (Source).Other_Part /= In_Tree.Sources.Table (Source).Other_Part /=
No_Source No_Source
then then
Source := Source := In_Tree.Sources.Table (Source).Other_Part;
In_Tree.Sources.Table (Source).Other_Part;
end if; end if;
String_Element_Table.Increment_Last String_Element_Table.Increment_Last
......
Markdown is supported
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