r137923 - in /trunk/gcc: ada/ChangeLog ada/util...

[hainque@gcc.gnu.org]

Author: hainque
Date: Thu Jul 17 14:18:27 2008
New Revision: 137923

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=137923
Log:
	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.


Added:
    trunk/gcc/testsuite/gnat.dg/decl_ctx_def.ads
    trunk/gcc/testsuite/gnat.dg/decl_ctx_use.adb
    trunk/gcc/testsuite/gnat.dg/decl_ctx_use.ads
    trunk/gcc/testsuite/gnat.dg/tree_static_def.adb
    trunk/gcc/testsuite/gnat.dg/tree_static_def.ads
    trunk/gcc/testsuite/gnat.dg/tree_static_use.adb
Modified:
    trunk/gcc/ada/ChangeLog
    trunk/gcc/ada/utils.c
    trunk/gcc/testsuite/ChangeLog