diff mbox series

[Ada] Replace low-level condition with a high-level call

Message ID 20210708135018.GA2465762@adacore.com
State New
Headers show
Series [Ada] Replace low-level condition with a high-level call | expand

Commit Message

Pierre-Marie de Rodat July 8, 2021, 1:50 p.m. UTC 
Code cleanup; semantics is unaffected.

Tested on x86_64-pc-linux-gnu, committed on trunk

gcc/ada/

	* lib-writ.adb (Ensure_System_Dependency): Simplify condition.
diff mbox series

Patch

diff --git a/gcc/ada/lib-writ.adb b/gcc/ada/lib-writ.adb
--- a/gcc/ada/lib-writ.adb
+++ b/gcc/ada/lib-writ.adb
@@ -147,7 +147,7 @@  package body Lib.Writ is
    begin
       --  Nothing to do if we already compiled System
 
-      if Unit_Names.Get (System_Uname) /= No_Unit then
+      if Is_Loaded (System_Uname) then
          return;
       end if;