aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/lib-writ.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/lib-writ.adb b/gcc/ada/lib-writ.adb
index 1b2912a..738a91e 100644
--- 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;