OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

[Ada] Simplify dependency on System

Browse Source 
gcc/ada/

	* lib-writ.adb (Ensure_System_Dependency): Simplify by reusing a
	constant name.
This commit is contained in:
Piotr Trojanek 2021-05-10 18:55:37 +02:00 committed by Pierre-Marie de Rodat
parent c6d8890c7d
commit 3751af1e7b
1 changed files with 1 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gcc/ada/lib-writ.adb
View File

@ -158,9 +158,7 @@ package body Lib.Writ is
-- on system as a result of Targparm scanning the system.ads file to
-- determine the target dependent parameters for the compilation.
Name_Len := 6;
Name_Buffer (1 .. 6) := "system";
System_Uname := Name_To_Unit_Name (Name_Enter);
System_Uname := Name_To_Unit_Name (Name_System);
System_Fname := File_Name (System_Source_File_Index);
Units.Increment_Last;