From 807bf718af49820cca054a70a54f2db06d10d9f0 Mon Sep 17 00:00:00 2001 From: jason Date: Wed, 18 Feb 2009 21:01:03 +0000 Subject: PR target/39179 * tree-ssa-ccp.c (get_symbol_constant_value): Don't assume zero value if DECL_EXTERNAL. * tree-sra.c (sra_walk_gimple_assign): Likewise. * target.h (gcc_target::binds_local_p): Clarify module. * tree.h (TREE_PUBLIC): Clarify module. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@144270 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/cp/ptree.c | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) (limited to 'gcc/cp/ptree.c') diff --git a/gcc/cp/ptree.c b/gcc/cp/ptree.c index c91cb15dc74..2452abc4622 100644 --- a/gcc/cp/ptree.c +++ b/gcc/cp/ptree.c @@ -44,7 +44,23 @@ cxx_print_decl (FILE *file, tree node, int indent) if (!CODE_CONTAINS_STRUCT (TREE_CODE (node), TS_DECL_COMMON) || !DECL_LANG_SPECIFIC (node)) return; + if (TREE_CODE (node) == FUNCTION_DECL) + { + int flags = TFF_DECL_SPECIFIERS|TFF_RETURN_TYPE + |TFF_FUNCTION_DEFAULT_ARGUMENTS|TFF_EXCEPTION_SPECIFICATION ; + indent_to (file, indent + 3); + fprintf (file, " full-name \"%s\"", decl_as_string (node, flags)); + } + else if (TREE_CODE (node) == TEMPLATE_DECL) + { + indent_to (file, indent + 3); + fprintf (file, " full-name \"%s\"", + decl_as_string (node, TFF_TEMPLATE_HEADER)); + } + indent_to (file, indent + 3); + if (DECL_EXTERNAL (node) && DECL_NOT_REALLY_EXTERN (node)) + fprintf (file, " not-really-extern"); if (TREE_CODE (node) == FUNCTION_DECL && DECL_PENDING_INLINE_INFO (node)) fprintf (file, " pending-inline-info %p", @@ -81,6 +97,9 @@ cxx_print_type (FILE *file, tree node, int indent) case RECORD_TYPE: case UNION_TYPE: + indent_to (file, indent + 4); + fprintf (file, "full-name \"%s\"", + type_as_string (node, TFF_CLASS_KEY_OR_ENUM)); break; default: @@ -97,7 +116,7 @@ cxx_print_type (FILE *file, tree node, int indent) indent_to (file, indent + 3); if (TYPE_NEEDS_CONSTRUCTING (node)) - fputs ( "needs-constructor", file); + fputs ( " needs-constructor", file); if (TYPE_HAS_NONTRIVIAL_DESTRUCTOR (node)) fputs (" needs-destructor", file); if (TYPE_HAS_DEFAULT_CONSTRUCTOR (node)) -- cgit v1.2.1