diff options
| author | sam <sam@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-11-13 14:11:18 +0000 |
|---|---|---|
| committer | sam <sam@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-11-13 14:11:18 +0000 |
| commit | 62e369b3a7e2a62037d4b22f55f96530b76bb9f8 (patch) | |
| tree | a7388969b7b7d55321236be189bce2e515b7ec52 /gcc/ada/a-tasatt.adb | |
| parent | b102f13a667d36b720e2f1ea0f6cdc07311bfdb3 (diff) | |
| download | ppe42-gcc-62e369b3a7e2a62037d4b22f55f96530b76bb9f8.tar.gz ppe42-gcc-62e369b3a7e2a62037d4b22f55f96530b76bb9f8.zip | |
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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@130139 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/a-tasatt.adb')
| -rw-r--r-- | gcc/ada/a-tasatt.adb | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/a-tasatt.adb b/gcc/ada/a-tasatt.adb index 97e024c0657..cc6977fd8c0 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; |
