OSDN Git Service

Revert fix of PR c++/
[pf3gnuchains/gcc-fork.git] / gcc / cp / error.c
index 25a0580..e0e5ae5 100644 (file)
@@ -84,7 +84,7 @@ static void dump_template_bindings (tree, tree, VEC(tree,gc) *);
 static void dump_scope (tree, int);
 static void dump_template_parms (tree, int, int);
 
-static int count_non_default_template_args (tree, tree);
+static int count_non_default_template_args (tree, tree, int);
 
 static const char *function_category (tree);
 static void maybe_print_instantiation_context (diagnostic_context *);
@@ -163,13 +163,20 @@ dump_template_argument (tree arg, int flags)
    match the (optional) default template parameter in PARAMS  */
 
 static int
-count_non_default_template_args (tree args, tree params)
+count_non_default_template_args (tree args, tree params, int flags)
 {
   tree inner_args = INNERMOST_TEMPLATE_ARGS (args);
   int n = TREE_VEC_LENGTH (inner_args);
   int last;
 
-  if (params == NULL_TREE || !flag_pretty_templates)
+  if (params == NULL_TREE
+      /* We use this flag when generating debug information.  We don't
+        want to expand templates at this point, for this may generate
+        new decls, which gets decl counts out of sync, which may in
+        turn cause codegen differences between compilations with and
+        without -g.  */
+      || (flags & TFF_NO_OMIT_DEFAULT_TEMPLATE_ARGUMENTS) != 0
+      || !flag_pretty_templates)
     return n;
 
   for (last = n - 1; last >= 0; --last)
@@ -201,7 +208,7 @@ count_non_default_template_args (tree args, tree params)
 static void
 dump_template_argument_list (tree args, tree parms, int flags)
 {
-  int n = count_non_default_template_args (args, parms);
+  int n = count_non_default_template_args (args, parms, flags);
   int need_comma = 0;
   int i;
 
@@ -304,7 +311,13 @@ dump_template_bindings (tree parms, tree args, VEC(tree,gc)* typenames)
          pp_equal (cxx_pp);
          pp_cxx_whitespace (cxx_pp);
          if (arg)
-           dump_template_argument (arg, TFF_PLAIN_IDENTIFIER);
+           {
+             if (ARGUMENT_PACK_P (arg))
+               pp_cxx_left_brace (cxx_pp);
+             dump_template_argument (arg, TFF_PLAIN_IDENTIFIER);
+             if (ARGUMENT_PACK_P (arg))
+               pp_cxx_right_brace (cxx_pp);
+           }
          else
            pp_string (cxx_pp, M_("<missing>"));
 
@@ -453,8 +466,11 @@ dump_type (tree t, int flags)
       break;
 
     case UNBOUND_CLASS_TEMPLATE:
-      dump_type (TYPE_CONTEXT (t), flags);
-      pp_cxx_colon_colon (cxx_pp);
+      if (! (flags & TFF_UNQUALIFIED_NAME))
+       {
+         dump_type (TYPE_CONTEXT (t), flags);
+         pp_cxx_colon_colon (cxx_pp);
+       }
       pp_cxx_ws_string (cxx_pp, "template");
       dump_type (DECL_NAME (TYPE_NAME (t)), flags);
       break;
@@ -552,10 +568,11 @@ dump_aggr_type (tree t, int flags)
     {
       typdef = !DECL_ARTIFICIAL (name);
 
-      if (typdef
-         && ((flags & TFF_CHASE_TYPEDEF)
-             || (!flag_pretty_templates && DECL_LANG_SPECIFIC (name)
-                 && DECL_TEMPLATE_INFO (name))))
+      if ((typdef
+          && ((flags & TFF_CHASE_TYPEDEF)
+              || (!flag_pretty_templates && DECL_LANG_SPECIFIC (name)
+                  && DECL_TEMPLATE_INFO (name))))
+         || DECL_SELF_REFERENCE_P (name))
        {
          t = TYPE_MAIN_VARIANT (t);
          name = TYPE_NAME (t);
@@ -590,6 +607,15 @@ dump_aggr_type (tree t, int flags)
       else
        pp_printf (pp_base (cxx_pp), M_("<anonymous %s>"), variety);
     }
+  else if (LAMBDANAME_P (name))
+    {
+      /* A lambda's "type" is essentially its signature.  */
+      pp_string (cxx_pp, M_("<lambda"));
+      if (lambda_function (t))
+       dump_parameters (FUNCTION_FIRST_USER_PARMTYPE (lambda_function (t)),
+                        flags);
+      pp_character(cxx_pp, '>');
+    }
   else
     pp_cxx_tree_identifier (cxx_pp, name);
   if (tmplate)
@@ -883,7 +909,8 @@ dump_decl (tree t, int flags)
          dump_type (TREE_TYPE (t), flags);
          break;
        }
-      if (flags & TFF_DECL_SPECIFIERS)
+      if ((flags & TFF_DECL_SPECIFIERS)
+         && !DECL_SELF_REFERENCE_P (t))
        pp_cxx_ws_string (cxx_pp, "typedef");
       dump_simple_decl (t, DECL_ORIGINAL_TYPE (t)
                        ? DECL_ORIGINAL_TYPE (t) : TREE_TYPE (t),
@@ -925,7 +952,9 @@ dump_decl (tree t, int flags)
       break;
 
     case SCOPE_REF:
-      pp_expression (cxx_pp, t);
+      dump_type (TREE_OPERAND (t, 0), flags);
+      pp_string (cxx_pp, "::");
+      dump_decl (TREE_OPERAND (t, 1), flags|TFF_UNQUALIFIED_NAME);
       break;
 
     case ARRAY_REF:
@@ -1152,7 +1181,8 @@ dump_template_decl (tree t, int flags)
 }
 
 /* find_typenames looks through the type of the function template T
-   and returns a VEC containing any typedefs or TYPENAME_TYPEs it finds.  */
+   and returns a VEC containing any typedefs, decltypes or TYPENAME_TYPEs
+   it finds.  */
 
 struct find_typenames_t
 {
@@ -1169,7 +1199,8 @@ find_typenames_r (tree *tp, int *walk_subtrees ATTRIBUTE_UNUSED, void *data)
   if (TYPE_P (*tp) && is_typedef_decl (TYPE_NAME (*tp)))
     /* Add the type of the typedef without any additional cv-quals.  */
     mv = TREE_TYPE (TYPE_NAME (*tp));
-  else if (TREE_CODE (*tp) == TYPENAME_TYPE)
+  else if (TREE_CODE (*tp) == TYPENAME_TYPE
+          || TREE_CODE (*tp) == DECLTYPE_TYPE)
     /* Add the typename without any cv-qualifiers.  */
     mv = TYPE_MAIN_VARIANT (*tp);
 
@@ -1215,6 +1246,14 @@ dump_function_decl (tree t, int flags)
   tree exceptions;
   VEC(tree,gc) *typenames = NULL;
 
+  if (LAMBDA_FUNCTION_P (t))
+    {
+      /* A lambda's signature is essentially its "type", so defer.  */
+      gcc_assert (LAMBDA_TYPE_P (DECL_CONTEXT (t)));
+      dump_type (DECL_CONTEXT (t), flags);
+      return;
+    }
+
   flags &= ~TFF_UNQUALIFIED_NAME;
   if (TREE_CODE (t) == TEMPLATE_DECL)
     t = DECL_TEMPLATE_RESULT (t);
@@ -1392,7 +1431,12 @@ dump_function_name (tree t, int flags)
   /* Don't let the user see __comp_ctor et al.  */
   if (DECL_CONSTRUCTOR_P (t)
       || DECL_DESTRUCTOR_P (t))
-    name = constructor_name (DECL_CONTEXT (t));
+    {
+      if (LAMBDA_TYPE_P (DECL_CONTEXT (t)))
+       name = get_identifier ("<lambda>");
+      else
+       name = constructor_name (DECL_CONTEXT (t));
+    }
 
   if (DECL_DESTRUCTOR_P (t))
     {
@@ -1448,7 +1492,7 @@ dump_template_parms (tree info, int primary, int flags)
                     ? DECL_INNERMOST_TEMPLATE_PARMS (TI_TEMPLATE (info))
                     : NULL_TREE);
 
-      len = count_non_default_template_args (args, params);
+      len = count_non_default_template_args (args, params, flags);
 
       args = INNERMOST_TEMPLATE_ARGS (args);
       for (ix = 0; ix != len; ix++)
@@ -2182,6 +2226,9 @@ dump_expr (tree t, int flags)
       break;
 
     case SCOPE_REF:
+      dump_decl (t, flags);
+      break;
+
     case EXPR_PACK_EXPANSION:
     case TYPEID_EXPR:
     case MEMBER_REF:
@@ -2331,7 +2378,10 @@ lang_decl_name (tree decl, int v, bool translate)
 
   reinit_cxx_pp ();
   pp_translate_identifiers (cxx_pp) = translate;
-  if (v == 1 && DECL_CLASS_SCOPE_P (decl))
+  if (v == 1
+      && (DECL_CLASS_SCOPE_P (decl)
+         || (DECL_NAMESPACE_SCOPE_P (decl)
+             && CP_DECL_CONTEXT (decl) != global_namespace)))
     {
       dump_type (CP_DECL_CONTEXT (decl), TFF_PLAIN_IDENTIFIER);
       pp_cxx_colon_colon (cxx_pp);
@@ -2664,6 +2714,8 @@ function_category (tree fn)
        return _("In constructor %qs");
       else if (DECL_DESTRUCTOR_P (fn))
        return _("In destructor %qs");
+      else if (LAMBDA_FUNCTION_P (fn))
+       return _("In lambda function");
       else
        return _("In member function %qs");
     }
@@ -2834,20 +2886,57 @@ cp_printer (pretty_printer *pp, text_info *text, const char *spec,
 \f
 /* Warn about the use of C++0x features when appropriate.  */
 void
-maybe_warn_cpp0x (const char* str)
+maybe_warn_cpp0x (cpp0x_warn_str str)
 {
   if ((cxx_dialect == cxx98) && !in_system_header)
     /* We really want to suppress this warning in system headers,
        because libstdc++ uses variadic templates even when we aren't
        in C++0x mode. */
-    pedwarn (input_location, 0, "%s only available with -std=c++0x or -std=gnu++0x", str);
+    switch (str)
+      {
+      case CPP0X_INITIALIZER_LISTS:
+       pedwarn (input_location, 0, 
+                "extended initializer lists "
+                "only available with -std=c++0x or -std=gnu++0x");
+       break;
+      case CPP0X_EXPLICIT_CONVERSION:
+       pedwarn (input_location, 0,
+                "explicit conversion operators "
+                "only available with -std=c++0x or -std=gnu++0x"); 
+       break;
+      case CPP0X_VARIADIC_TEMPLATES:
+       pedwarn (input_location, 0,
+                "variadic templates "
+                "only available with -std=c++0x or -std=gnu++0x");
+       break;
+      case CPP0X_LAMBDA_EXPR:
+       pedwarn (input_location, 0,
+                "lambda expressions "
+                 "only available with -std=c++0x or -std=gnu++0x");
+       break;
+      case CPP0X_AUTO:
+       pedwarn (input_location, 0,
+                "C++0x auto only available with -std=c++0x or -std=gnu++0x");
+       break;
+      case CPP0X_SCOPED_ENUMS:
+       pedwarn (input_location, 0,
+                "scoped enums only available with -std=c++0x or -std=gnu++0x");
+       break;
+      case CPP0X_DEFAULTED_DELETED:
+       pedwarn (input_location, 0,
+                "defaulted and deleted functions "
+                "only available with -std=c++0x or -std=gnu++0x");
+       break;  
+      default:
+       gcc_unreachable();
+      }
 }
 
 /* Warn about the use of variadic templates when appropriate.  */
 void
 maybe_warn_variadic_templates (void)
 {
-  maybe_warn_cpp0x ("variadic templates");
+  maybe_warn_cpp0x (CPP0X_VARIADIC_TEMPLATES);
 }