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
This commit is contained in:
Arnaud Charlet 2005-02-10 14:56:44 +01:00
parent e05be4b4c7
commit f5da72ceab
1 changed files with 3 additions and 1 deletions

View File

@ -6,7 +6,7 @@
-- --
-- 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 --
-- terms of the GNU General Public License as published by the Free Soft- --
@ -40,6 +40,8 @@
with System.IO; use System.IO;
package body System.Vax_Float_Operations is
pragma Warnings (Off);
-- Warnings about infinite recursion when the -gnatdm switch is used.
-----------
-- Abs_F --