summaryrefslogtreecommitdiff
path: root/gcc/ada/s-mastop.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/s-mastop.adb')
-rw-r--r--gcc/ada/s-mastop.adb6
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/s-mastop.adb b/gcc/ada/s-mastop.adb
index 04906e4cd2c..e707aa693c3 100644
--- a/gcc/ada/s-mastop.adb
+++ b/gcc/ada/s-mastop.adb
@@ -7,7 +7,7 @@
-- B o d y --
-- (Dummy version) --
-- --
--- Copyright (C) 1999-2005 Free Software Foundation, Inc. --
+-- Copyright (C) 1999-2007, 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- --
@@ -35,6 +35,10 @@
-- This dummy version of System.Machine_State_Operations is used
-- on targets for which zero cost exception handling is not implemented.
+pragma Warnings (Off);
+pragma Compiler_Unit;
+pragma Warnings (On);
+
package body System.Machine_State_Operations is
-- Turn off warnings since many unused parameters