1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/fmap.adb b/gcc/ada/fmap.adb
index dc5d10df974..8f286b3b6f7 100644
--- a/gcc/ada/fmap.adb
+++ b/gcc/ada/fmap.adb
@@ -490,7 +490,7 @@ package body Fmap is
          if Last_In_Table = 0 then
             declare
                Discard : Boolean;
-
+               pragma Warnings (Off, Discard);
             begin
                Delete_File (File_Name, Discard);
             end;