extern tree get_default_ctor (tree);
extern tree get_dtor (tree, tsubst_flags_t);
extern tree build_stub_object (tree);
+extern bool is_stub_object (tree);
extern tree build_invoke (tree, const_tree,
tsubst_flags_t);
extern tree strip_inheriting_ctors (tree);
dump_expr (pp, CALL_EXPR_FN (t), flags | TFF_EXPR_IN_PARENS);
dump_call_expr_args (pp, t, flags, true);
}
+ else if (is_stub_object (t))
+ {
+ pp_string (pp, "std::declval<");
+ if (lvalue_p (t)) /* T& */
+ dump_type (pp, TREE_TYPE (STRIP_REFERENCE_REF (t)), flags);
+ else /* T */
+ dump_type (pp, TREE_TYPE (t), flags);
+ pp_string (pp, ">()");
+ }
else
{
if (TREE_OPERAND (t,0) != NULL_TREE
return convert_from_reference (stub);
}
+/* True iff EXPR is the result of build_stub_object. */
+
+bool
+is_stub_object (tree expr)
+{
+ if (!REFERENCE_REF_P (expr))
+ return false;
+ expr = TREE_OPERAND (expr, 0);
+ return (TREE_CODE (expr) == CONVERT_EXPR
+ && TREE_OPERAND (expr, 0) == integer_one_node);
+}
+
/* Build a std::declval<TYPE>() expression and return it. */
tree
void fn19 (E, int);
-#pragma omp declare variant (fn19)match(user={condition(0)}) // { dg-error {could not convert '[^']*' from 'int' to 'E'} }
+#pragma omp declare variant (fn19)match(user={condition(0)}) // { dg-error {could not convert 'std::declval<int>\(\)' from 'int' to 'E'} }
void fn20 (int, E);
struct F { operator int () const { return 42; } int f; };
#pragma omp declare variant ( fn21 ) match (user = { condition ( 1 - 1 ) } ) // { dg-error "variant 'void fn21\\\(int, F\\\)' and base 'void fn22\\\(F, F\\\)' have incompatible types" }
void fn22 (F, F);
-#pragma omp declare variant (fn19) match (user={condition(0)}) // { dg-error {could not convert '[^']*' from 'F' to 'E'} }
+#pragma omp declare variant (fn19) match (user={condition(0)}) // { dg-error {could not convert 'std::declval<F>\(\)' from 'F' to 'E'} }
void fn23 (F, int);
void fn24 (int);
void fn19 (E, int) {}
-#pragma omp declare variant (fn19)match(user={condition(0)}) // { dg-error {could not convert '[^']*' from 'int' to 'E'} }
+#pragma omp declare variant (fn19)match(user={condition(0)}) // { dg-error {could not convert 'std::declval<int>\(\)' from 'int' to 'E'} }
void fn20 (int, E) {}
struct F { operator int () const { return 42; } int f; };
#pragma omp declare variant ( fn21 ) match (user = { condition ( 1 - 1 ) } ) // { dg-error "variant 'void fn21\\\(int, F\\\)' and base 'void fn22\\\(F, F\\\)' have incompatible types" }
void fn22 (F, F) {}
-#pragma omp declare variant (fn19) match (user={condition(0)}) // { dg-error {could not convert '[^']*' from 'F' to 'E'} }
+#pragma omp declare variant (fn19) match (user={condition(0)}) // { dg-error {could not convert 'std::declval<F>\(\)' from 'F' to 'E'} }
void fn23 (F, int) {}
void fn24 (int);