summaryrefslogtreecommitdiff
path: root/gcc/ada/s-rident.ads
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2012-07-12 12:19:13 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2012-07-12 12:19:13 +0200
commitcd20e505e752c0434869baec3ac4fe7ac55a32b9 (patch)
tree3f3cf576d4f28db8d3db474fab9bab784ed55f9c /gcc/ada/s-rident.ads
parent381ec0f4cd325bdab94621649483c993f8f4139f (diff)
downloadgcc-cd20e505e752c0434869baec3ac4fe7ac55a32b9.tar.gz
[multiple changes]
2012-07-12 Robert Dewar <dewar@adacore.com> * make.adb, sem_ch9.adb, prj.adb, s-rident.ads, snames.ads-tmpl: Minor reformatting. 2012-07-12 Javier Miranda <miranda@adacore.com> * exp_ch3.adb (Is_User_Defined_Equality): New subprogram. (Make_Neq_Body): New subprogram. (Make_Predefined_Primitive_Specs): Adding local variable Has_Predef_Eq_ Renaming to ensure that we enable the machinery which handles renamings of predefined primitive operators. From-SVN: r189432
Diffstat (limited to 'gcc/ada/s-rident.ads')
-rw-r--r--gcc/ada/s-rident.ads19
1 files changed, 10 insertions, 9 deletions
diff --git a/gcc/ada/s-rident.ads b/gcc/ada/s-rident.ads
index d067f3d7f4f..11943f074c3 100644
--- a/gcc/ada/s-rident.ads
+++ b/gcc/ada/s-rident.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2011, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2012, 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- --
@@ -30,16 +30,17 @@
------------------------------------------------------------------------------
-- This package defines the set of restriction identifiers. It is a generic
--- package that is instantiated by the compiler/binder in package Rident, and
--- is instantiated in package System.Restrictions for use at run-time.
+-- package that is instantiated by the binder for output of the restrictions
+-- structure, and is instantiated in package System.Restrictions for use at
+-- run-time.
-- The reason that we make this a generic package is so that in the case of
--- the instantiation in Rident for use at compile time and bind time, we can
--- generate normal image tables for the enumeration types, which are needed
--- for diagnostic and informational messages. At run-time we really do not
--- want to waste the space for these image tables, and they are not needed,
--- so we can do the instantiation under control of Discard_Names to remove
--- the tables.
+-- the instantiation in the binder, we can generate normal image tables for
+-- the enumeration types, which are needed for diagnostic and informational
+-- messages as well as for identification of restrictions. At run-time we
+-- really do not want to waste the space for these image tables, and they are
+-- not needed, so we can do the instantiation under control of Discard_Names
+-- to remove the tables.
pragma Compiler_Unit;