]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
[Ada] Replace low-level condition with a high-level call
authorPiotr Trojanek <trojanek@adacore.com>
Tue, 25 May 2021 15:40:38 +0000 (17:40 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 8 Jul 2021 13:34:20 +0000 (13:34 +0000)
gcc/ada/

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

gcc/ada/lib-writ.adb

index 1b2912a53b2ce8654ac3f7e38784cff870baa24e..738a91e5ae1ec6db270da7288da475659c6c3f21 100644 (file)
@@ -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;