diff options
| author | Samuel Tardieu <sam@rfc1149.net> | 2007-11-13 14:11:18 +0000 |
|---|---|---|
| committer | Samuel Tardieu <sam@gcc.gnu.org> | 2007-11-13 14:11:18 +0000 |
| commit | 0e506c4b4f1efe03e05b80fbc09bb77f474372a1 (patch) | |
| tree | a7388969b7b7d55321236be189bce2e515b7ec52 | |
| parent | c28e913a8b864a85fc60cebea86ee45b9ea4b34a (diff) | |
| download | gcc-0e506c4b4f1efe03e05b80fbc09bb77f474372a1.zip gcc-0e506c4b4f1efe03e05b80fbc09bb77f474372a1.tar.gz gcc-0e506c4b4f1efe03e05b80fbc09bb77f474372a1.tar.bz2 | |
a-tasatt.adb: Add a comment at the beginning of the package explaining why in general...
gcc/ada/
* a-tasatt.adb: Add a comment at the beginning of the package
explaining why in general 'Unchecked_Access must be used instead
of 'Access.
From-SVN: r130139
| -rw-r--r-- | gcc/ada/ChangeLog | 6 | ||||
| -rw-r--r-- | gcc/ada/a-tasatt.adb | 4 |
2 files changed, 10 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 1ea33a6..1e8cd52 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,9 @@ +2007-11-13 Samuel Tardieu <sam@rfc1149.net> + + * a-tasatt.adb: Add a comment at the beginning of the package + explaining why in general 'Unchecked_Access must be used instead + of 'Access. + 2007-11-10 Samuel Tardieu <sam@rfc1149.net> * a-tasatt.adb: Revert previous change for this file as it will diff --git a/gcc/ada/a-tasatt.adb b/gcc/ada/a-tasatt.adb index 97e024c..cc6977f 100644 --- a/gcc/ada/a-tasatt.adb +++ b/gcc/ada/a-tasatt.adb @@ -217,6 +217,10 @@ -- "passed" in via access discriminants. GNAT was having trouble with access -- discriminants, so all this work was moved to the package body. +-- Note that references to objects declared in this package body must in +-- general use 'Unchecked_Access instead of 'Access as the package can be +-- instantiated from within a local context. + with System.Error_Reporting; -- Used for Shutdown; |