Skip to content

R
riscv-gcc-1
Commit f5da72ce by Arnaud Charlet
Options

s-vaflop.adb: Add pragma Warnings (Off) to eliminate infinite recursion warnings when... 

	* s-vaflop.adb: Add pragma Warnings (Off) to eliminate infinite
	recursion warnings when compiled with -gnatdm.

From-SVN: r94824
parent e05be4b4
Showing with 3 additions and 1 deletions
gcc/ada/s-vaflop.adb
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
-- -- -- --
-- B o d y -- -- B o d y --
-- -- -- --
-- Copyright (C) 1997-2001 Free Software Foundation, Inc. -- -- Copyright (C) 1997-2005 Free Software Foundation, Inc. --
-- -- -- --
-- GNAT is free software; you can redistribute it and/or modify it under -- -- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- -- -- terms of the GNU General Public License as published by the Free Soft- --
...@@ -40,6 +40,8 @@ ...@@ -40,6 +40,8 @@
with System.IO; use System.IO; with System.IO; use System.IO;
package body System.Vax_Float_Operations is package body System.Vax_Float_Operations is
pragma Warnings (Off);
-- Warnings about infinite recursion when the -gnatdm switch is used.
----------- -----------
-- Abs_F -- -- Abs_F --
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment