ada/
authorhainque <hainque@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 17 Jul 2008 14:18:27 +0000 (14:18 +0000)
committerhainque <hainque@138bc75d-0d04-0410-961f-82ee72b054a4>
Thu, 17 Jul 2008 14:18:27 +0000 (14:18 +0000)
commit3b4d2ae2647a847b41e9af20707a1627a602e0b9
tree3b74d3ff953a20ee785835248912fbefebafef7c
parent4e4968182203cdcc62922d799ea2f6f7c5955183
ada/
* utils.c (create_var_decl_1): Relax expectations on the PUBLIC_FLAG
argument, to apply to references in addition to definitions.  Prevent
setting TREE_STATIC on externals.
(gnat_pushdecl): Always clear DECL_CONTEXT on public externals.

testsuite/
* gnat.dg/tree_static_def.ad[bs]: Support for ...
* gnat.dg/tree_static_use.adb: New test.
* gnat.dg/decl_ctx_def.ads: Support for ...
* gnat.dg/decl_ctx_use.ad[bs]: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@137923 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/ChangeLog
gcc/ada/utils.c
gcc/testsuite/ChangeLog
gcc/testsuite/gnat.dg/decl_ctx_def.ads [new file with mode: 0644]
gcc/testsuite/gnat.dg/decl_ctx_use.adb [new file with mode: 0644]
gcc/testsuite/gnat.dg/decl_ctx_use.ads [new file with mode: 0644]
gcc/testsuite/gnat.dg/tree_static_def.adb [new file with mode: 0644]
gcc/testsuite/gnat.dg/tree_static_def.ads [new file with mode: 0644]
gcc/testsuite/gnat.dg/tree_static_use.adb [new file with mode: 0644]