1 /* Handle parameterized types (templates) for GNU C++.
2 Copyright (C) 1992-2013 Free Software Foundation, Inc.
3 Written by Ken Raeburn (raeburn@cygnus.com) while at Watchmaker Computing.
4 Rewritten by Jason Merrill (jason@cygnus.com).
6 This file is part of GCC.
8 GCC is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3, or (at your option)
13 GCC is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with GCC; see the file COPYING3. If not see
20 <http://www.gnu.org/licenses/>. */
22 /* Known bugs or deficiencies include:
24 all methods must be provided in header files; can't use a source
25 file that contains only the method templates and "just win". */
29 #include "coretypes.h"
33 #include "pointer-set.h"
36 #include "c-family/c-common.h"
37 #include "c-family/c-objc.h"
38 #include "cp-objcp-common.h"
39 #include "tree-inline.h"
43 #include "tree-iterator.h"
45 /* The type of functions taking a tree, and some additional data, and
47 typedef int (*tree_fn_t
) (tree
, void*);
49 /* The PENDING_TEMPLATES is a TREE_LIST of templates whose
50 instantiations have been deferred, either because their definitions
51 were not yet available, or because we were putting off doing the work. */
52 struct GTY ((chain_next ("%h.next"))) pending_template
{
53 struct pending_template
*next
;
54 struct tinst_level
*tinst
;
57 static GTY(()) struct pending_template
*pending_templates
;
58 static GTY(()) struct pending_template
*last_pending_template
;
60 int processing_template_parmlist
;
61 static int template_header_count
;
63 static GTY(()) tree saved_trees
;
64 static vec
<int> inline_parm_levels
;
66 static GTY(()) struct tinst_level
*current_tinst_level
;
68 static GTY(()) tree saved_access_scope
;
70 /* Live only within one (recursive) call to tsubst_expr. We use
71 this to pass the statement expression node from the STMT_EXPR
72 to the EXPR_STMT that is its result. */
73 static tree cur_stmt_expr
;
75 /* A map from local variable declarations in the body of the template
76 presently being instantiated to the corresponding instantiated
78 static struct pointer_map_t
*local_specializations
;
80 /* True if we've recursed into fn_type_unification too many times. */
81 static bool excessive_deduction_depth
;
83 typedef struct GTY(()) spec_entry
90 static GTY ((param_is (spec_entry
)))
91 htab_t decl_specializations
;
93 static GTY ((param_is (spec_entry
)))
94 htab_t type_specializations
;
96 /* Contains canonical template parameter types. The vector is indexed by
97 the TEMPLATE_TYPE_IDX of the template parameter. Each element is a
98 TREE_LIST, whose TREE_VALUEs contain the canonical template
99 parameters of various types and levels. */
100 static GTY(()) vec
<tree
, va_gc
> *canonical_template_parms
;
102 #define UNIFY_ALLOW_NONE 0
103 #define UNIFY_ALLOW_MORE_CV_QUAL 1
104 #define UNIFY_ALLOW_LESS_CV_QUAL 2
105 #define UNIFY_ALLOW_DERIVED 4
106 #define UNIFY_ALLOW_INTEGER 8
107 #define UNIFY_ALLOW_OUTER_LEVEL 16
108 #define UNIFY_ALLOW_OUTER_MORE_CV_QUAL 32
109 #define UNIFY_ALLOW_OUTER_LESS_CV_QUAL 64
111 enum template_base_result
{
113 tbr_ambiguous_baseclass
,
117 static void push_access_scope (tree
);
118 static void pop_access_scope (tree
);
119 static bool resolve_overloaded_unification (tree
, tree
, tree
, tree
,
120 unification_kind_t
, int,
122 static int try_one_overload (tree
, tree
, tree
, tree
, tree
,
123 unification_kind_t
, int, bool, bool);
124 static int unify (tree
, tree
, tree
, tree
, int, bool);
125 static void add_pending_template (tree
);
126 static tree
reopen_tinst_level (struct tinst_level
*);
127 static tree
tsubst_initializer_list (tree
, tree
);
128 static tree
get_class_bindings (tree
, tree
, tree
, tree
);
129 static tree
coerce_template_parms (tree
, tree
, tree
, tsubst_flags_t
,
131 static tree
coerce_innermost_template_parms (tree
, tree
, tree
, tsubst_flags_t
,
133 static void tsubst_enum (tree
, tree
, tree
);
134 static tree
add_to_template_args (tree
, tree
);
135 static tree
add_outermost_template_args (tree
, tree
);
136 static bool check_instantiated_args (tree
, tree
, tsubst_flags_t
);
137 static int maybe_adjust_types_for_deduction (unification_kind_t
, tree
*, tree
*,
139 static int type_unification_real (tree
, tree
, tree
, const tree
*,
140 unsigned int, int, unification_kind_t
, int,
141 vec
<deferred_access_check
, va_gc
> **,
143 static void note_template_header (int);
144 static tree
convert_nontype_argument_function (tree
, tree
);
145 static tree
convert_nontype_argument (tree
, tree
, tsubst_flags_t
);
146 static tree
convert_template_argument (tree
, tree
, tree
,
147 tsubst_flags_t
, int, tree
);
148 static int for_each_template_parm (tree
, tree_fn_t
, void*,
149 struct pointer_set_t
*, bool);
150 static tree
expand_template_argument_pack (tree
);
151 static tree
build_template_parm_index (int, int, int, tree
, tree
);
152 static bool inline_needs_template_parms (tree
);
153 static void push_inline_template_parms_recursive (tree
, int);
154 static tree
retrieve_local_specialization (tree
);
155 static void register_local_specialization (tree
, tree
);
156 static hashval_t
hash_specialization (const void *p
);
157 static tree
reduce_template_parm_level (tree
, tree
, int, tree
, tsubst_flags_t
);
158 static int mark_template_parm (tree
, void *);
159 static int template_parm_this_level_p (tree
, void *);
160 static tree
tsubst_friend_function (tree
, tree
);
161 static tree
tsubst_friend_class (tree
, tree
);
162 static int can_complete_type_without_circularity (tree
);
163 static tree
get_bindings (tree
, tree
, tree
, bool);
164 static int template_decl_level (tree
);
165 static int check_cv_quals_for_unify (int, tree
, tree
);
166 static void template_parm_level_and_index (tree
, int*, int*);
167 static int unify_pack_expansion (tree
, tree
, tree
,
168 tree
, unification_kind_t
, bool, bool);
169 static tree
tsubst_template_arg (tree
, tree
, tsubst_flags_t
, tree
);
170 static tree
tsubst_template_args (tree
, tree
, tsubst_flags_t
, tree
);
171 static tree
tsubst_template_parms (tree
, tree
, tsubst_flags_t
);
172 static void regenerate_decl_from_template (tree
, tree
);
173 static tree
most_specialized_class (tree
, tsubst_flags_t
);
174 static tree
tsubst_aggr_type (tree
, tree
, tsubst_flags_t
, tree
, int);
175 static tree
tsubst_arg_types (tree
, tree
, tree
, tsubst_flags_t
, tree
);
176 static tree
tsubst_function_type (tree
, tree
, tsubst_flags_t
, tree
);
177 static bool check_specialization_scope (void);
178 static tree
process_partial_specialization (tree
);
179 static void set_current_access_from_decl (tree
);
180 static enum template_base_result
get_template_base (tree
, tree
, tree
, tree
,
182 static tree
try_class_unification (tree
, tree
, tree
, tree
, bool);
183 static int coerce_template_template_parms (tree
, tree
, tsubst_flags_t
,
185 static bool template_template_parm_bindings_ok_p (tree
, tree
);
186 static int template_args_equal (tree
, tree
);
187 static void tsubst_default_arguments (tree
, tsubst_flags_t
);
188 static tree
for_each_template_parm_r (tree
*, int *, void *);
189 static tree
copy_default_args_to_explicit_spec_1 (tree
, tree
);
190 static void copy_default_args_to_explicit_spec (tree
);
191 static int invalid_nontype_parm_type_p (tree
, tsubst_flags_t
);
192 static bool dependent_template_arg_p (tree
);
193 static bool any_template_arguments_need_structural_equality_p (tree
);
194 static bool dependent_type_p_r (tree
);
195 static tree
tsubst_expr (tree
, tree
, tsubst_flags_t
, tree
, bool);
196 static tree
tsubst_copy (tree
, tree
, tsubst_flags_t
, tree
);
197 static tree
tsubst_pack_expansion (tree
, tree
, tsubst_flags_t
, tree
);
198 static tree
tsubst_decl (tree
, tree
, tsubst_flags_t
);
199 static void perform_typedefs_access_check (tree tmpl
, tree targs
);
200 static void append_type_to_template_for_access_check_1 (tree
, tree
, tree
,
202 static tree
listify (tree
);
203 static tree
listify_autos (tree
, tree
);
204 static tree
template_parm_to_arg (tree t
);
205 static tree
current_template_args (void);
206 static tree
tsubst_template_parm (tree
, tree
, tsubst_flags_t
);
207 static tree
instantiate_alias_template (tree
, tree
, tsubst_flags_t
);
209 /* Make the current scope suitable for access checking when we are
210 processing T. T can be FUNCTION_DECL for instantiated function
211 template, VAR_DECL for static member variable, or TYPE_DECL for
212 alias template (needed by instantiate_decl). */
215 push_access_scope (tree t
)
217 gcc_assert (TREE_CODE (t
) == FUNCTION_DECL
218 || TREE_CODE (t
) == TYPE_DECL
219 || TREE_CODE (t
) == VAR_DECL
);
221 if (DECL_FRIEND_CONTEXT (t
))
222 push_nested_class (DECL_FRIEND_CONTEXT (t
));
223 else if (DECL_CLASS_SCOPE_P (t
))
224 push_nested_class (DECL_CONTEXT (t
));
226 push_to_top_level ();
228 if (TREE_CODE (t
) == FUNCTION_DECL
)
230 saved_access_scope
= tree_cons
231 (NULL_TREE
, current_function_decl
, saved_access_scope
);
232 current_function_decl
= t
;
236 /* Restore the scope set up by push_access_scope. T is the node we
240 pop_access_scope (tree t
)
242 if (TREE_CODE (t
) == FUNCTION_DECL
)
244 current_function_decl
= TREE_VALUE (saved_access_scope
);
245 saved_access_scope
= TREE_CHAIN (saved_access_scope
);
248 if (DECL_FRIEND_CONTEXT (t
) || DECL_CLASS_SCOPE_P (t
))
251 pop_from_top_level ();
254 /* Do any processing required when DECL (a member template
255 declaration) is finished. Returns the TEMPLATE_DECL corresponding
256 to DECL, unless it is a specialization, in which case the DECL
257 itself is returned. */
260 finish_member_template_decl (tree decl
)
262 if (decl
== error_mark_node
)
263 return error_mark_node
;
265 gcc_assert (DECL_P (decl
));
267 if (TREE_CODE (decl
) == TYPE_DECL
)
271 type
= TREE_TYPE (decl
);
272 if (type
== error_mark_node
)
273 return error_mark_node
;
274 if (MAYBE_CLASS_TYPE_P (type
)
275 && CLASSTYPE_TEMPLATE_INFO (type
)
276 && !CLASSTYPE_TEMPLATE_SPECIALIZATION (type
))
278 tree tmpl
= CLASSTYPE_TI_TEMPLATE (type
);
279 check_member_template (tmpl
);
284 else if (TREE_CODE (decl
) == FIELD_DECL
)
285 error ("data member %qD cannot be a member template", decl
);
286 else if (DECL_TEMPLATE_INFO (decl
))
288 if (!DECL_TEMPLATE_SPECIALIZATION (decl
))
290 check_member_template (DECL_TI_TEMPLATE (decl
));
291 return DECL_TI_TEMPLATE (decl
);
297 error ("invalid member template declaration %qD", decl
);
299 return error_mark_node
;
302 /* Create a template info node. */
305 build_template_info (tree template_decl
, tree template_args
)
307 tree result
= make_node (TEMPLATE_INFO
);
308 TI_TEMPLATE (result
) = template_decl
;
309 TI_ARGS (result
) = template_args
;
313 /* Return the template info node corresponding to T, whatever T is. */
316 get_template_info (const_tree t
)
318 tree tinfo
= NULL_TREE
;
320 if (!t
|| t
== error_mark_node
)
323 if (DECL_P (t
) && DECL_LANG_SPECIFIC (t
))
324 tinfo
= DECL_TEMPLATE_INFO (t
);
326 if (!tinfo
&& DECL_IMPLICIT_TYPEDEF_P (t
))
329 if (TAGGED_TYPE_P (t
))
330 tinfo
= TYPE_TEMPLATE_INFO (t
);
331 else if (TREE_CODE (t
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
332 tinfo
= TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (t
);
337 /* Returns the template nesting level of the indicated class TYPE.
347 A<T>::B<U> has depth two, while A<T> has depth one.
348 Both A<T>::B<int> and A<int>::B<U> have depth one, if
349 they are instantiations, not specializations.
351 This function is guaranteed to return 0 if passed NULL_TREE so
352 that, for example, `template_class_depth (current_class_type)' is
356 template_class_depth (tree type
)
361 type
&& TREE_CODE (type
) != NAMESPACE_DECL
;
362 type
= (TREE_CODE (type
) == FUNCTION_DECL
)
363 ? CP_DECL_CONTEXT (type
) : CP_TYPE_CONTEXT (type
))
365 tree tinfo
= get_template_info (type
);
367 if (tinfo
&& PRIMARY_TEMPLATE_P (TI_TEMPLATE (tinfo
))
368 && uses_template_parms (INNERMOST_TEMPLATE_ARGS (TI_ARGS (tinfo
))))
375 /* Subroutine of maybe_begin_member_template_processing.
376 Returns true if processing DECL needs us to push template parms. */
379 inline_needs_template_parms (tree decl
)
381 if (! DECL_TEMPLATE_INFO (decl
))
384 return (TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (most_general_template (decl
)))
385 > (processing_template_decl
+ DECL_TEMPLATE_SPECIALIZATION (decl
)));
388 /* Subroutine of maybe_begin_member_template_processing.
389 Push the template parms in PARMS, starting from LEVELS steps into the
390 chain, and ending at the beginning, since template parms are listed
394 push_inline_template_parms_recursive (tree parmlist
, int levels
)
396 tree parms
= TREE_VALUE (parmlist
);
400 push_inline_template_parms_recursive (TREE_CHAIN (parmlist
), levels
- 1);
402 ++processing_template_decl
;
403 current_template_parms
404 = tree_cons (size_int (processing_template_decl
),
405 parms
, current_template_parms
);
406 TEMPLATE_PARMS_FOR_INLINE (current_template_parms
) = 1;
408 begin_scope (TREE_VEC_LENGTH (parms
) ? sk_template_parms
: sk_template_spec
,
410 for (i
= 0; i
< TREE_VEC_LENGTH (parms
); ++i
)
412 tree parm
= TREE_VALUE (TREE_VEC_ELT (parms
, i
));
414 if (parm
== error_mark_node
)
417 gcc_assert (DECL_P (parm
));
419 switch (TREE_CODE (parm
))
428 /* Make a CONST_DECL as is done in process_template_parm.
429 It is ugly that we recreate this here; the original
430 version built in process_template_parm is no longer
432 tree decl
= build_decl (DECL_SOURCE_LOCATION (parm
),
433 CONST_DECL
, DECL_NAME (parm
),
435 DECL_ARTIFICIAL (decl
) = 1;
436 TREE_CONSTANT (decl
) = 1;
437 TREE_READONLY (decl
) = 1;
438 DECL_INITIAL (decl
) = DECL_INITIAL (parm
);
439 SET_DECL_TEMPLATE_PARM_P (decl
);
450 /* Restore the template parameter context for a member template or
451 a friend template defined in a class definition. */
454 maybe_begin_member_template_processing (tree decl
)
459 if (inline_needs_template_parms (decl
))
461 parms
= DECL_TEMPLATE_PARMS (most_general_template (decl
));
462 levels
= TMPL_PARMS_DEPTH (parms
) - processing_template_decl
;
464 if (DECL_TEMPLATE_SPECIALIZATION (decl
))
467 parms
= TREE_CHAIN (parms
);
470 push_inline_template_parms_recursive (parms
, levels
);
473 /* Remember how many levels of template parameters we pushed so that
474 we can pop them later. */
475 inline_parm_levels
.safe_push (levels
);
478 /* Undo the effects of maybe_begin_member_template_processing. */
481 maybe_end_member_template_processing (void)
486 if (inline_parm_levels
.length () == 0)
489 last
= inline_parm_levels
.pop ();
490 for (i
= 0; i
< last
; ++i
)
492 --processing_template_decl
;
493 current_template_parms
= TREE_CHAIN (current_template_parms
);
498 /* Return a new template argument vector which contains all of ARGS,
499 but has as its innermost set of arguments the EXTRA_ARGS. */
502 add_to_template_args (tree args
, tree extra_args
)
509 if (args
== NULL_TREE
|| extra_args
== error_mark_node
)
512 extra_depth
= TMPL_ARGS_DEPTH (extra_args
);
513 new_args
= make_tree_vec (TMPL_ARGS_DEPTH (args
) + extra_depth
);
515 for (i
= 1; i
<= TMPL_ARGS_DEPTH (args
); ++i
)
516 SET_TMPL_ARGS_LEVEL (new_args
, i
, TMPL_ARGS_LEVEL (args
, i
));
518 for (j
= 1; j
<= extra_depth
; ++j
, ++i
)
519 SET_TMPL_ARGS_LEVEL (new_args
, i
, TMPL_ARGS_LEVEL (extra_args
, j
));
524 /* Like add_to_template_args, but only the outermost ARGS are added to
525 the EXTRA_ARGS. In particular, all but TMPL_ARGS_DEPTH
526 (EXTRA_ARGS) levels are added. This function is used to combine
527 the template arguments from a partial instantiation with the
528 template arguments used to attain the full instantiation from the
529 partial instantiation. */
532 add_outermost_template_args (tree args
, tree extra_args
)
536 /* If there are more levels of EXTRA_ARGS than there are ARGS,
537 something very fishy is going on. */
538 gcc_assert (TMPL_ARGS_DEPTH (args
) >= TMPL_ARGS_DEPTH (extra_args
));
540 /* If *all* the new arguments will be the EXTRA_ARGS, just return
542 if (TMPL_ARGS_DEPTH (args
) == TMPL_ARGS_DEPTH (extra_args
))
545 /* For the moment, we make ARGS look like it contains fewer levels. */
546 TREE_VEC_LENGTH (args
) -= TMPL_ARGS_DEPTH (extra_args
);
548 new_args
= add_to_template_args (args
, extra_args
);
550 /* Now, we restore ARGS to its full dimensions. */
551 TREE_VEC_LENGTH (args
) += TMPL_ARGS_DEPTH (extra_args
);
556 /* Return the N levels of innermost template arguments from the ARGS. */
559 get_innermost_template_args (tree args
, int n
)
567 /* If N is 1, just return the innermost set of template arguments. */
569 return TMPL_ARGS_LEVEL (args
, TMPL_ARGS_DEPTH (args
));
571 /* If we're not removing anything, just return the arguments we were
573 extra_levels
= TMPL_ARGS_DEPTH (args
) - n
;
574 gcc_assert (extra_levels
>= 0);
575 if (extra_levels
== 0)
578 /* Make a new set of arguments, not containing the outer arguments. */
579 new_args
= make_tree_vec (n
);
580 for (i
= 1; i
<= n
; ++i
)
581 SET_TMPL_ARGS_LEVEL (new_args
, i
,
582 TMPL_ARGS_LEVEL (args
, i
+ extra_levels
));
587 /* The inverse of get_innermost_template_args: Return all but the innermost
588 EXTRA_LEVELS levels of template arguments from the ARGS. */
591 strip_innermost_template_args (tree args
, int extra_levels
)
594 int n
= TMPL_ARGS_DEPTH (args
) - extra_levels
;
599 /* If N is 1, just return the outermost set of template arguments. */
601 return TMPL_ARGS_LEVEL (args
, 1);
603 /* If we're not removing anything, just return the arguments we were
605 gcc_assert (extra_levels
>= 0);
606 if (extra_levels
== 0)
609 /* Make a new set of arguments, not containing the inner arguments. */
610 new_args
= make_tree_vec (n
);
611 for (i
= 1; i
<= n
; ++i
)
612 SET_TMPL_ARGS_LEVEL (new_args
, i
,
613 TMPL_ARGS_LEVEL (args
, i
));
618 /* We've got a template header coming up; push to a new level for storing
622 begin_template_parm_list (void)
624 /* We use a non-tag-transparent scope here, which causes pushtag to
625 put tags in this scope, rather than in the enclosing class or
626 namespace scope. This is the right thing, since we want
627 TEMPLATE_DECLS, and not TYPE_DECLS for template classes. For a
628 global template class, push_template_decl handles putting the
629 TEMPLATE_DECL into top-level scope. For a nested template class,
632 template <class T> struct S1 {
633 template <class T> struct S2 {};
636 pushtag contains special code to call pushdecl_with_scope on the
637 TEMPLATE_DECL for S2. */
638 begin_scope (sk_template_parms
, NULL
);
639 ++processing_template_decl
;
640 ++processing_template_parmlist
;
641 note_template_header (0);
644 /* This routine is called when a specialization is declared. If it is
645 invalid to declare a specialization here, an error is reported and
646 false is returned, otherwise this routine will return true. */
649 check_specialization_scope (void)
651 tree scope
= current_scope ();
655 An explicit specialization shall be declared in the namespace of
656 which the template is a member, or, for member templates, in the
657 namespace of which the enclosing class or enclosing class
658 template is a member. An explicit specialization of a member
659 function, member class or static data member of a class template
660 shall be declared in the namespace of which the class template
662 if (scope
&& TREE_CODE (scope
) != NAMESPACE_DECL
)
664 error ("explicit specialization in non-namespace scope %qD", scope
);
670 In an explicit specialization declaration for a member of a class
671 template or a member template that appears in namespace scope,
672 the member template and some of its enclosing class templates may
673 remain unspecialized, except that the declaration shall not
674 explicitly specialize a class member template if its enclosing
675 class templates are not explicitly specialized as well. */
676 if (current_template_parms
)
678 error ("enclosing class templates are not explicitly specialized");
685 /* We've just seen template <>. */
688 begin_specialization (void)
690 begin_scope (sk_template_spec
, NULL
);
691 note_template_header (1);
692 return check_specialization_scope ();
695 /* Called at then end of processing a declaration preceded by
699 end_specialization (void)
702 reset_specialization ();
705 /* Any template <>'s that we have seen thus far are not referring to a
706 function specialization. */
709 reset_specialization (void)
711 processing_specialization
= 0;
712 template_header_count
= 0;
715 /* We've just seen a template header. If SPECIALIZATION is nonzero,
716 it was of the form template <>. */
719 note_template_header (int specialization
)
721 processing_specialization
= specialization
;
722 template_header_count
++;
725 /* We're beginning an explicit instantiation. */
728 begin_explicit_instantiation (void)
730 gcc_assert (!processing_explicit_instantiation
);
731 processing_explicit_instantiation
= true;
736 end_explicit_instantiation (void)
738 gcc_assert (processing_explicit_instantiation
);
739 processing_explicit_instantiation
= false;
742 /* An explicit specialization or partial specialization of TMPL is being
743 declared. Check that the namespace in which the specialization is
744 occurring is permissible. Returns false iff it is invalid to
745 specialize TMPL in the current namespace. */
748 check_specialization_namespace (tree tmpl
)
750 tree tpl_ns
= decl_namespace_context (tmpl
);
754 An explicit specialization shall be declared in the namespace of
755 which the template is a member, or, for member templates, in the
756 namespace of which the enclosing class or enclosing class
757 template is a member. An explicit specialization of a member
758 function, member class or static data member of a class template
759 shall be declared in the namespace of which the class template is
761 if (current_scope() != DECL_CONTEXT (tmpl
)
762 && !at_namespace_scope_p ())
764 error ("specialization of %qD must appear at namespace scope", tmpl
);
767 if (is_associated_namespace (current_namespace
, tpl_ns
))
768 /* Same or super-using namespace. */
772 permerror (input_location
, "specialization of %qD in different namespace", tmpl
);
773 permerror (input_location
, " from definition of %q+#D", tmpl
);
778 /* SPEC is an explicit instantiation. Check that it is valid to
779 perform this explicit instantiation in the current namespace. */
782 check_explicit_instantiation_namespace (tree spec
)
786 /* DR 275: An explicit instantiation shall appear in an enclosing
787 namespace of its template. */
788 ns
= decl_namespace_context (spec
);
789 if (!is_ancestor (current_namespace
, ns
))
790 permerror (input_location
, "explicit instantiation of %qD in namespace %qD "
791 "(which does not enclose namespace %qD)",
792 spec
, current_namespace
, ns
);
795 /* The TYPE is being declared. If it is a template type, that means it
796 is a partial specialization. Do appropriate error-checking. */
799 maybe_process_partial_specialization (tree type
)
803 if (type
== error_mark_node
)
804 return error_mark_node
;
806 /* A lambda that appears in specialization context is not itself a
808 if (CLASS_TYPE_P (type
) && CLASSTYPE_LAMBDA_EXPR (type
))
811 if (TREE_CODE (type
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
813 error ("name of class shadows template template parameter %qD",
815 return error_mark_node
;
818 context
= TYPE_CONTEXT (type
);
820 if (TYPE_ALIAS_P (type
))
822 if (TYPE_TEMPLATE_INFO (type
)
823 && DECL_ALIAS_TEMPLATE_P (TYPE_TI_TEMPLATE (type
)))
824 error ("specialization of alias template %qD",
825 TYPE_TI_TEMPLATE (type
));
827 error ("explicit specialization of non-template %qT", type
);
828 return error_mark_node
;
830 else if (CLASS_TYPE_P (type
) && CLASSTYPE_USE_TEMPLATE (type
))
832 /* This is for ordinary explicit specialization and partial
833 specialization of a template class such as:
835 template <> class C<int>;
839 template <class T> class C<T*>;
841 Make sure that `C<int>' and `C<T*>' are implicit instantiations. */
843 if (CLASSTYPE_IMPLICIT_INSTANTIATION (type
)
844 && !COMPLETE_TYPE_P (type
))
846 check_specialization_namespace (CLASSTYPE_TI_TEMPLATE (type
));
847 SET_CLASSTYPE_TEMPLATE_SPECIALIZATION (type
);
848 DECL_SOURCE_LOCATION (TYPE_MAIN_DECL (type
)) = input_location
;
849 if (processing_template_decl
)
851 if (push_template_decl (TYPE_MAIN_DECL (type
))
853 return error_mark_node
;
856 else if (CLASSTYPE_TEMPLATE_INSTANTIATION (type
))
857 error ("specialization of %qT after instantiation", type
);
858 else if (errorcount
&& !processing_specialization
859 && CLASSTYPE_TEMPLATE_SPECIALIZATION (type
)
860 && !uses_template_parms (CLASSTYPE_TI_ARGS (type
)))
861 /* Trying to define a specialization either without a template<> header
862 or in an inappropriate place. We've already given an error, so just
863 bail now so we don't actually define the specialization. */
864 return error_mark_node
;
866 else if (CLASS_TYPE_P (type
)
867 && !CLASSTYPE_USE_TEMPLATE (type
)
868 && CLASSTYPE_TEMPLATE_INFO (type
)
869 && context
&& CLASS_TYPE_P (context
)
870 && CLASSTYPE_TEMPLATE_INFO (context
))
872 /* This is for an explicit specialization of member class
873 template according to [temp.expl.spec/18]:
875 template <> template <class U> class C<int>::D;
877 The context `C<int>' must be an implicit instantiation.
878 Otherwise this is just a member class template declared
881 template <> class C<int> { template <class U> class D; };
882 template <> template <class U> class C<int>::D;
884 In the first case, `C<int>::D' is a specialization of `C<T>::D'
885 while in the second case, `C<int>::D' is a primary template
886 and `C<T>::D' may not exist. */
888 if (CLASSTYPE_IMPLICIT_INSTANTIATION (context
)
889 && !COMPLETE_TYPE_P (type
))
892 tree tmpl
= CLASSTYPE_TI_TEMPLATE (type
);
894 if (current_namespace
895 != decl_namespace_context (tmpl
))
897 permerror (input_location
, "specializing %q#T in different namespace", type
);
898 permerror (input_location
, " from definition of %q+#D", tmpl
);
901 /* Check for invalid specialization after instantiation:
903 template <> template <> class C<int>::D<int>;
904 template <> template <class U> class C<int>::D; */
906 for (t
= DECL_TEMPLATE_INSTANTIATIONS (tmpl
);
907 t
; t
= TREE_CHAIN (t
))
909 tree inst
= TREE_VALUE (t
);
910 if (CLASSTYPE_TEMPLATE_SPECIALIZATION (inst
))
912 /* We already have a full specialization of this partial
913 instantiation. Reassign it to the new member
914 specialization template. */
919 elt
.tmpl
= most_general_template (tmpl
);
920 elt
.args
= CLASSTYPE_TI_ARGS (inst
);
923 htab_remove_elt (type_specializations
, &elt
);
926 elt
.args
= INNERMOST_TEMPLATE_ARGS (elt
.args
);
928 slot
= htab_find_slot (type_specializations
, &elt
, INSERT
);
929 entry
= ggc_alloc_spec_entry ();
933 else if (COMPLETE_OR_OPEN_TYPE_P (inst
))
934 /* But if we've had an implicit instantiation, that's a
935 problem ([temp.expl.spec]/6). */
936 error ("specialization %qT after instantiation %qT",
940 /* Mark TYPE as a specialization. And as a result, we only
941 have one level of template argument for the innermost
943 SET_CLASSTYPE_TEMPLATE_SPECIALIZATION (type
);
944 DECL_SOURCE_LOCATION (TYPE_MAIN_DECL (type
)) = input_location
;
945 CLASSTYPE_TI_ARGS (type
)
946 = INNERMOST_TEMPLATE_ARGS (CLASSTYPE_TI_ARGS (type
));
949 else if (processing_specialization
)
951 /* Someday C++0x may allow for enum template specialization. */
952 if (cxx_dialect
> cxx98
&& TREE_CODE (type
) == ENUMERAL_TYPE
953 && CLASS_TYPE_P (context
) && CLASSTYPE_USE_TEMPLATE (context
))
954 pedwarn (input_location
, OPT_Wpedantic
, "template specialization "
955 "of %qD not allowed by ISO C++", type
);
958 error ("explicit specialization of non-template %qT", type
);
959 return error_mark_node
;
966 /* Returns nonzero if we can optimize the retrieval of specializations
967 for TMPL, a TEMPLATE_DECL. In particular, for such a template, we
968 do not use DECL_TEMPLATE_SPECIALIZATIONS at all. */
971 optimize_specialization_lookup_p (tree tmpl
)
973 return (DECL_FUNCTION_TEMPLATE_P (tmpl
)
974 && DECL_CLASS_SCOPE_P (tmpl
)
975 /* DECL_CLASS_SCOPE_P holds of T::f even if T is a template
977 && CLASS_TYPE_P (DECL_CONTEXT (tmpl
))
978 /* The optimized lookup depends on the fact that the
979 template arguments for the member function template apply
980 purely to the containing class, which is not true if the
981 containing class is an explicit or partial
983 && !CLASSTYPE_TEMPLATE_SPECIALIZATION (DECL_CONTEXT (tmpl
))
984 && !DECL_MEMBER_TEMPLATE_P (tmpl
)
985 && !DECL_CONV_FN_P (tmpl
)
986 /* It is possible to have a template that is not a member
987 template and is not a member of a template class:
989 template <typename T>
990 struct S { friend A::f(); };
992 Here, the friend function is a template, but the context does
993 not have template information. The optimized lookup relies
994 on having ARGS be the template arguments for both the class
995 and the function template. */
996 && !DECL_FRIEND_P (DECL_TEMPLATE_RESULT (tmpl
)));
999 /* Retrieve the specialization (in the sense of [temp.spec] - a
1000 specialization is either an instantiation or an explicit
1001 specialization) of TMPL for the given template ARGS. If there is
1002 no such specialization, return NULL_TREE. The ARGS are a vector of
1003 arguments, or a vector of vectors of arguments, in the case of
1004 templates with more than one level of parameters.
1006 If TMPL is a type template and CLASS_SPECIALIZATIONS_P is true,
1007 then we search for a partial specialization matching ARGS. This
1008 parameter is ignored if TMPL is not a class template. */
1011 retrieve_specialization (tree tmpl
, tree args
, hashval_t hash
)
1013 if (args
== error_mark_node
)
1016 gcc_assert (TREE_CODE (tmpl
) == TEMPLATE_DECL
);
1018 /* There should be as many levels of arguments as there are
1019 levels of parameters. */
1020 gcc_assert (TMPL_ARGS_DEPTH (args
)
1021 == TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (tmpl
)));
1023 if (optimize_specialization_lookup_p (tmpl
))
1025 tree class_template
;
1026 tree class_specialization
;
1027 vec
<tree
, va_gc
> *methods
;
1031 /* The template arguments actually apply to the containing
1032 class. Find the class specialization with those
1034 class_template
= CLASSTYPE_TI_TEMPLATE (DECL_CONTEXT (tmpl
));
1035 class_specialization
1036 = retrieve_specialization (class_template
, args
, 0);
1037 if (!class_specialization
)
1039 /* Now, find the appropriate entry in the CLASSTYPE_METHOD_VEC
1040 for the specialization. */
1041 idx
= class_method_index_for_fn (class_specialization
, tmpl
);
1044 /* Iterate through the methods with the indicated name, looking
1045 for the one that has an instance of TMPL. */
1046 methods
= CLASSTYPE_METHOD_VEC (class_specialization
);
1047 for (fns
= (*methods
)[idx
]; fns
; fns
= OVL_NEXT (fns
))
1049 tree fn
= OVL_CURRENT (fns
);
1050 if (DECL_TEMPLATE_INFO (fn
) && DECL_TI_TEMPLATE (fn
) == tmpl
1051 /* using-declarations can add base methods to the method vec,
1052 and we don't want those here. */
1053 && DECL_CONTEXT (fn
) == class_specialization
)
1062 htab_t specializations
;
1066 elt
.spec
= NULL_TREE
;
1068 if (DECL_CLASS_TEMPLATE_P (tmpl
))
1069 specializations
= type_specializations
;
1071 specializations
= decl_specializations
;
1074 hash
= hash_specialization (&elt
);
1075 found
= (spec_entry
*) htab_find_with_hash (specializations
, &elt
, hash
);
1083 /* Like retrieve_specialization, but for local declarations. */
1086 retrieve_local_specialization (tree tmpl
)
1090 if (local_specializations
== NULL
)
1093 slot
= pointer_map_contains (local_specializations
, tmpl
);
1094 return slot
? (tree
) *slot
: NULL_TREE
;
1097 /* Returns nonzero iff DECL is a specialization of TMPL. */
1100 is_specialization_of (tree decl
, tree tmpl
)
1104 if (TREE_CODE (decl
) == FUNCTION_DECL
)
1108 t
= DECL_TEMPLATE_INFO (t
) ? DECL_TI_TEMPLATE (t
) : NULL_TREE
)
1114 gcc_assert (TREE_CODE (decl
) == TYPE_DECL
);
1116 for (t
= TREE_TYPE (decl
);
1118 t
= CLASSTYPE_USE_TEMPLATE (t
)
1119 ? TREE_TYPE (CLASSTYPE_TI_TEMPLATE (t
)) : NULL_TREE
)
1120 if (same_type_ignoring_top_level_qualifiers_p (t
, TREE_TYPE (tmpl
)))
1127 /* Returns nonzero iff DECL is a specialization of friend declaration
1128 FRIEND_DECL according to [temp.friend]. */
1131 is_specialization_of_friend (tree decl
, tree friend_decl
)
1133 bool need_template
= true;
1136 gcc_assert (TREE_CODE (decl
) == FUNCTION_DECL
1137 || TREE_CODE (decl
) == TYPE_DECL
);
1139 /* For [temp.friend/6] when FRIEND_DECL is an ordinary member function
1140 of a template class, we want to check if DECL is a specialization
1142 if (TREE_CODE (friend_decl
) == FUNCTION_DECL
1143 && DECL_TEMPLATE_INFO (friend_decl
)
1144 && !DECL_USE_TEMPLATE (friend_decl
))
1146 /* We want a TEMPLATE_DECL for `is_specialization_of'. */
1147 friend_decl
= DECL_TI_TEMPLATE (friend_decl
);
1148 need_template
= false;
1150 else if (TREE_CODE (friend_decl
) == TEMPLATE_DECL
1151 && !PRIMARY_TEMPLATE_P (friend_decl
))
1152 need_template
= false;
1154 /* There is nothing to do if this is not a template friend. */
1155 if (TREE_CODE (friend_decl
) != TEMPLATE_DECL
)
1158 if (is_specialization_of (decl
, friend_decl
))
1162 A member of a class template may be declared to be a friend of a
1163 non-template class. In this case, the corresponding member of
1164 every specialization of the class template is a friend of the
1165 class granting friendship.
1167 For example, given a template friend declaration
1169 template <class T> friend void A<T>::f();
1171 the member function below is considered a friend
1173 template <> struct A<int> {
1177 For this type of template friend, TEMPLATE_DEPTH below will be
1178 nonzero. To determine if DECL is a friend of FRIEND, we first
1179 check if the enclosing class is a specialization of another. */
1181 template_depth
= template_class_depth (CP_DECL_CONTEXT (friend_decl
));
1183 && DECL_CLASS_SCOPE_P (decl
)
1184 && is_specialization_of (TYPE_NAME (DECL_CONTEXT (decl
)),
1185 CLASSTYPE_TI_TEMPLATE (DECL_CONTEXT (friend_decl
))))
1187 /* Next, we check the members themselves. In order to handle
1188 a few tricky cases, such as when FRIEND_DECL's are
1190 template <class T> friend void A<T>::g(T t);
1191 template <class T> template <T t> friend void A<T>::h();
1195 void A<int>::g(int);
1196 template <int> void A<int>::h();
1198 we need to figure out ARGS, the template arguments from
1199 the context of DECL. This is required for template substitution
1200 of `T' in the function parameter of `g' and template parameter
1201 of `h' in the above examples. Here ARGS corresponds to `int'. */
1203 tree context
= DECL_CONTEXT (decl
);
1204 tree args
= NULL_TREE
;
1205 int current_depth
= 0;
1207 while (current_depth
< template_depth
)
1209 if (CLASSTYPE_TEMPLATE_INFO (context
))
1211 if (current_depth
== 0)
1212 args
= TYPE_TI_ARGS (context
);
1214 args
= add_to_template_args (TYPE_TI_ARGS (context
), args
);
1217 context
= TYPE_CONTEXT (context
);
1220 if (TREE_CODE (decl
) == FUNCTION_DECL
)
1225 tree friend_args_type
;
1226 tree decl_args_type
;
1228 /* Make sure that both DECL and FRIEND_DECL are templates or
1230 is_template
= DECL_TEMPLATE_INFO (decl
)
1231 && PRIMARY_TEMPLATE_P (DECL_TI_TEMPLATE (decl
));
1232 if (need_template
^ is_template
)
1234 else if (is_template
)
1236 /* If both are templates, check template parameter list. */
1238 = tsubst_template_parms (DECL_TEMPLATE_PARMS (friend_decl
),
1240 if (!comp_template_parms
1241 (DECL_TEMPLATE_PARMS (DECL_TI_TEMPLATE (decl
)),
1245 decl_type
= TREE_TYPE (DECL_TI_TEMPLATE (decl
));
1248 decl_type
= TREE_TYPE (decl
);
1250 friend_type
= tsubst_function_type (TREE_TYPE (friend_decl
), args
,
1251 tf_none
, NULL_TREE
);
1252 if (friend_type
== error_mark_node
)
1255 /* Check if return types match. */
1256 if (!same_type_p (TREE_TYPE (decl_type
), TREE_TYPE (friend_type
)))
1259 /* Check if function parameter types match, ignoring the
1260 `this' parameter. */
1261 friend_args_type
= TYPE_ARG_TYPES (friend_type
);
1262 decl_args_type
= TYPE_ARG_TYPES (decl_type
);
1263 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (friend_decl
))
1264 friend_args_type
= TREE_CHAIN (friend_args_type
);
1265 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (decl
))
1266 decl_args_type
= TREE_CHAIN (decl_args_type
);
1268 return compparms (decl_args_type
, friend_args_type
);
1272 /* DECL is a TYPE_DECL */
1274 tree decl_type
= TREE_TYPE (decl
);
1276 /* Make sure that both DECL and FRIEND_DECL are templates or
1279 = CLASSTYPE_TEMPLATE_INFO (decl_type
)
1280 && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (decl_type
));
1282 if (need_template
^ is_template
)
1284 else if (is_template
)
1287 /* If both are templates, check the name of the two
1288 TEMPLATE_DECL's first because is_friend didn't. */
1289 if (DECL_NAME (CLASSTYPE_TI_TEMPLATE (decl_type
))
1290 != DECL_NAME (friend_decl
))
1293 /* Now check template parameter list. */
1295 = tsubst_template_parms (DECL_TEMPLATE_PARMS (friend_decl
),
1297 return comp_template_parms
1298 (DECL_TEMPLATE_PARMS (CLASSTYPE_TI_TEMPLATE (decl_type
)),
1302 return (DECL_NAME (decl
)
1303 == DECL_NAME (friend_decl
));
1309 /* Register the specialization SPEC as a specialization of TMPL with
1310 the indicated ARGS. IS_FRIEND indicates whether the specialization
1311 is actually just a friend declaration. Returns SPEC, or an
1312 equivalent prior declaration, if available. */
1315 register_specialization (tree spec
, tree tmpl
, tree args
, bool is_friend
,
1322 gcc_assert (TREE_CODE (tmpl
) == TEMPLATE_DECL
&& DECL_P (spec
));
1324 if (TREE_CODE (spec
) == FUNCTION_DECL
1325 && uses_template_parms (DECL_TI_ARGS (spec
)))
1326 /* This is the FUNCTION_DECL for a partial instantiation. Don't
1327 register it; we want the corresponding TEMPLATE_DECL instead.
1328 We use `uses_template_parms (DECL_TI_ARGS (spec))' rather than
1329 the more obvious `uses_template_parms (spec)' to avoid problems
1330 with default function arguments. In particular, given
1331 something like this:
1333 template <class T> void f(T t1, T t = T())
1335 the default argument expression is not substituted for in an
1336 instantiation unless and until it is actually needed. */
1339 if (optimize_specialization_lookup_p (tmpl
))
1340 /* We don't put these specializations in the hash table, but we might
1341 want to give an error about a mismatch. */
1342 fn
= retrieve_specialization (tmpl
, args
, 0);
1350 hash
= hash_specialization (&elt
);
1353 htab_find_slot_with_hash (decl_specializations
, &elt
, hash
, INSERT
);
1355 fn
= ((spec_entry
*) *slot
)->spec
;
1360 /* We can sometimes try to re-register a specialization that we've
1361 already got. In particular, regenerate_decl_from_template calls
1362 duplicate_decls which will update the specialization list. But,
1363 we'll still get called again here anyhow. It's more convenient
1364 to simply allow this than to try to prevent it. */
1367 else if (fn
&& DECL_TEMPLATE_SPECIALIZATION (spec
))
1369 if (DECL_TEMPLATE_INSTANTIATION (fn
))
1371 if (DECL_ODR_USED (fn
)
1372 || DECL_EXPLICIT_INSTANTIATION (fn
))
1374 error ("specialization of %qD after instantiation",
1376 return error_mark_node
;
1381 /* This situation should occur only if the first
1382 specialization is an implicit instantiation, the
1383 second is an explicit specialization, and the
1384 implicit instantiation has not yet been used. That
1385 situation can occur if we have implicitly
1386 instantiated a member function and then specialized
1389 We can also wind up here if a friend declaration that
1390 looked like an instantiation turns out to be a
1393 template <class T> void foo(T);
1394 class S { friend void foo<>(int) };
1395 template <> void foo(int);
1397 We transform the existing DECL in place so that any
1398 pointers to it become pointers to the updated
1401 If there was a definition for the template, but not
1402 for the specialization, we want this to look as if
1403 there were no definition, and vice versa. */
1404 DECL_INITIAL (fn
) = NULL_TREE
;
1405 duplicate_decls (spec
, fn
, is_friend
);
1406 /* The call to duplicate_decls will have applied
1409 An explicit specialization of a function template
1410 is inline only if it is explicitly declared to be,
1411 and independently of whether its function template
1414 to the primary function; now copy the inline bits to
1415 the various clones. */
1416 FOR_EACH_CLONE (clone
, fn
)
1418 DECL_DECLARED_INLINE_P (clone
)
1419 = DECL_DECLARED_INLINE_P (fn
);
1420 DECL_SOURCE_LOCATION (clone
)
1421 = DECL_SOURCE_LOCATION (fn
);
1423 check_specialization_namespace (tmpl
);
1428 else if (DECL_TEMPLATE_SPECIALIZATION (fn
))
1430 if (!duplicate_decls (spec
, fn
, is_friend
) && DECL_INITIAL (spec
))
1431 /* Dup decl failed, but this is a new definition. Set the
1432 line number so any errors match this new
1434 DECL_SOURCE_LOCATION (fn
) = DECL_SOURCE_LOCATION (spec
);
1440 return duplicate_decls (spec
, fn
, is_friend
);
1442 /* A specialization must be declared in the same namespace as the
1443 template it is specializing. */
1444 if (DECL_TEMPLATE_SPECIALIZATION (spec
)
1445 && !check_specialization_namespace (tmpl
))
1446 DECL_CONTEXT (spec
) = DECL_CONTEXT (tmpl
);
1448 if (slot
!= NULL
/* !optimize_specialization_lookup_p (tmpl) */)
1450 spec_entry
*entry
= ggc_alloc_spec_entry ();
1451 gcc_assert (tmpl
&& args
&& spec
);
1454 if (TREE_CODE (spec
) == FUNCTION_DECL
&& DECL_NAMESPACE_SCOPE_P (spec
)
1455 && PRIMARY_TEMPLATE_P (tmpl
)
1456 && DECL_SAVED_TREE (DECL_TEMPLATE_RESULT (tmpl
)) == NULL_TREE
)
1457 /* TMPL is a forward declaration of a template function; keep a list
1458 of all specializations in case we need to reassign them to a friend
1459 template later in tsubst_friend_function. */
1460 DECL_TEMPLATE_INSTANTIATIONS (tmpl
)
1461 = tree_cons (args
, spec
, DECL_TEMPLATE_INSTANTIATIONS (tmpl
));
1467 /* Returns true iff two spec_entry nodes are equivalent. Only compares the
1468 TMPL and ARGS members, ignores SPEC. */
1470 int comparing_specializations
;
1473 eq_specializations (const void *p1
, const void *p2
)
1475 const spec_entry
*e1
= (const spec_entry
*)p1
;
1476 const spec_entry
*e2
= (const spec_entry
*)p2
;
1479 ++comparing_specializations
;
1480 equal
= (e1
->tmpl
== e2
->tmpl
1481 && comp_template_args (e1
->args
, e2
->args
));
1482 --comparing_specializations
;
1487 /* Returns a hash for a template TMPL and template arguments ARGS. */
1490 hash_tmpl_and_args (tree tmpl
, tree args
)
1492 hashval_t val
= DECL_UID (tmpl
);
1493 return iterative_hash_template_arg (args
, val
);
1496 /* Returns a hash for a spec_entry node based on the TMPL and ARGS members,
1500 hash_specialization (const void *p
)
1502 const spec_entry
*e
= (const spec_entry
*)p
;
1503 return hash_tmpl_and_args (e
->tmpl
, e
->args
);
1506 /* Recursively calculate a hash value for a template argument ARG, for use
1507 in the hash tables of template specializations. */
1510 iterative_hash_template_arg (tree arg
, hashval_t val
)
1512 unsigned HOST_WIDE_INT i
;
1513 enum tree_code code
;
1516 if (arg
== NULL_TREE
)
1517 return iterative_hash_object (arg
, val
);
1522 if (TREE_CODE (arg
) == ARGUMENT_PACK_SELECT
)
1523 /* We can get one of these when re-hashing a previous entry in the middle
1524 of substituting into a pack expansion. Just look through it. */
1525 arg
= ARGUMENT_PACK_SELECT_FROM_PACK (arg
);
1527 code
= TREE_CODE (arg
);
1528 tclass
= TREE_CODE_CLASS (code
);
1530 val
= iterative_hash_object (code
, val
);
1537 case IDENTIFIER_NODE
:
1538 return iterative_hash_object (IDENTIFIER_HASH_VALUE (arg
), val
);
1542 int i
, len
= TREE_VEC_LENGTH (arg
);
1543 for (i
= 0; i
< len
; ++i
)
1544 val
= iterative_hash_template_arg (TREE_VEC_ELT (arg
, i
), val
);
1548 case TYPE_PACK_EXPANSION
:
1549 case EXPR_PACK_EXPANSION
:
1550 val
= iterative_hash_template_arg (PACK_EXPANSION_PATTERN (arg
), val
);
1551 return iterative_hash_template_arg (PACK_EXPANSION_EXTRA_ARGS (arg
), val
);
1553 case TYPE_ARGUMENT_PACK
:
1554 case NONTYPE_ARGUMENT_PACK
:
1555 return iterative_hash_template_arg (ARGUMENT_PACK_ARGS (arg
), val
);
1558 for (; arg
; arg
= TREE_CHAIN (arg
))
1559 val
= iterative_hash_template_arg (TREE_VALUE (arg
), val
);
1563 for (; arg
; arg
= OVL_NEXT (arg
))
1564 val
= iterative_hash_template_arg (OVL_CURRENT (arg
), val
);
1570 FOR_EACH_CONSTRUCTOR_ELT (CONSTRUCTOR_ELTS (arg
), i
, field
, value
)
1572 val
= iterative_hash_template_arg (field
, val
);
1573 val
= iterative_hash_template_arg (value
, val
);
1579 if (!DECL_ARTIFICIAL (arg
))
1581 val
= iterative_hash_object (DECL_PARM_INDEX (arg
), val
);
1582 val
= iterative_hash_object (DECL_PARM_LEVEL (arg
), val
);
1584 return iterative_hash_template_arg (TREE_TYPE (arg
), val
);
1587 return iterative_hash_template_arg (TARGET_EXPR_INITIAL (arg
), val
);
1590 val
= iterative_hash_template_arg (PTRMEM_CST_CLASS (arg
), val
);
1591 return iterative_hash_template_arg (PTRMEM_CST_MEMBER (arg
), val
);
1593 case TEMPLATE_PARM_INDEX
:
1594 val
= iterative_hash_template_arg
1595 (TREE_TYPE (TEMPLATE_PARM_DECL (arg
)), val
);
1596 val
= iterative_hash_object (TEMPLATE_PARM_LEVEL (arg
), val
);
1597 return iterative_hash_object (TEMPLATE_PARM_IDX (arg
), val
);
1600 val
= iterative_hash_object (TRAIT_EXPR_KIND (arg
), val
);
1601 val
= iterative_hash_template_arg (TRAIT_EXPR_TYPE1 (arg
), val
);
1602 return iterative_hash_template_arg (TRAIT_EXPR_TYPE2 (arg
), val
);
1605 val
= iterative_hash_template_arg (BINFO_TYPE (BASELINK_BINFO (arg
)),
1607 return iterative_hash_template_arg (DECL_NAME (get_first_fn (arg
)),
1611 val
= iterative_hash_template_arg (TREE_OPERAND (arg
, 0), val
);
1612 code
= TREE_CODE (TREE_OPERAND (arg
, 1));
1613 val
= iterative_hash_object (code
, val
);
1614 return iterative_hash_template_arg (TREE_OPERAND (arg
, 2), val
);
1617 /* A lambda can't appear in a template arg, but don't crash on
1619 gcc_assert (seen_error ());
1623 case IMPLICIT_CONV_EXPR
:
1624 case STATIC_CAST_EXPR
:
1625 case REINTERPRET_CAST_EXPR
:
1626 case CONST_CAST_EXPR
:
1627 case DYNAMIC_CAST_EXPR
:
1629 val
= iterative_hash_template_arg (TREE_TYPE (arg
), val
);
1630 /* Now hash operands as usual. */
1640 if (TYPE_CANONICAL (arg
))
1641 return iterative_hash_object (TYPE_HASH (TYPE_CANONICAL (arg
)),
1643 else if (TREE_CODE (arg
) == DECLTYPE_TYPE
)
1644 return iterative_hash_template_arg (DECLTYPE_TYPE_EXPR (arg
), val
);
1645 /* Otherwise just compare the types during lookup. */
1648 case tcc_declaration
:
1650 return iterative_hash_expr (arg
, val
);
1653 gcc_assert (IS_EXPR_CODE_CLASS (tclass
));
1655 unsigned n
= cp_tree_operand_length (arg
);
1656 for (i
= 0; i
< n
; ++i
)
1657 val
= iterative_hash_template_arg (TREE_OPERAND (arg
, i
), val
);
1665 /* Unregister the specialization SPEC as a specialization of TMPL.
1666 Replace it with NEW_SPEC, if NEW_SPEC is non-NULL. Returns true
1667 if the SPEC was listed as a specialization of TMPL.
1669 Note that SPEC has been ggc_freed, so we can't look inside it. */
1672 reregister_specialization (tree spec
, tree tinfo
, tree new_spec
)
1677 elt
.tmpl
= most_general_template (TI_TEMPLATE (tinfo
));
1678 elt
.args
= TI_ARGS (tinfo
);
1679 elt
.spec
= NULL_TREE
;
1681 entry
= (spec_entry
*) htab_find (decl_specializations
, &elt
);
1684 gcc_assert (entry
->spec
== spec
|| entry
->spec
== new_spec
);
1685 gcc_assert (new_spec
!= NULL_TREE
);
1686 entry
->spec
= new_spec
;
1693 /* Like register_specialization, but for local declarations. We are
1694 registering SPEC, an instantiation of TMPL. */
1697 register_local_specialization (tree spec
, tree tmpl
)
1701 slot
= pointer_map_insert (local_specializations
, tmpl
);
1705 /* TYPE is a class type. Returns true if TYPE is an explicitly
1706 specialized class. */
1709 explicit_class_specialization_p (tree type
)
1711 if (!CLASSTYPE_TEMPLATE_SPECIALIZATION (type
))
1713 return !uses_template_parms (CLASSTYPE_TI_ARGS (type
));
1716 /* Print the list of functions at FNS, going through all the overloads
1717 for each element of the list. Alternatively, FNS can not be a
1718 TREE_LIST, in which case it will be printed together with all the
1721 MORE and *STR should respectively be FALSE and NULL when the function
1722 is called from the outside. They are used internally on recursive
1723 calls. print_candidates manages the two parameters and leaves NULL
1724 in *STR when it ends. */
1727 print_candidates_1 (tree fns
, bool more
, const char **str
)
1730 char *spaces
= NULL
;
1732 for (fn
= fns
; fn
; fn
= OVL_NEXT (fn
))
1733 if (TREE_CODE (fn
) == TREE_LIST
)
1735 for (fn2
= fn
; fn2
!= NULL_TREE
; fn2
= TREE_CHAIN (fn2
))
1736 print_candidates_1 (TREE_VALUE (fn2
),
1737 TREE_CHAIN (fn2
) || more
, str
);
1741 tree cand
= OVL_CURRENT (fn
);
1744 /* Pick the prefix string. */
1745 if (!more
&& !OVL_NEXT (fns
))
1747 inform (DECL_SOURCE_LOCATION (cand
),
1748 "candidate is: %#D", cand
);
1752 *str
= _("candidates are:");
1753 spaces
= get_spaces (*str
);
1755 inform (DECL_SOURCE_LOCATION (cand
), "%s %#D", *str
, cand
);
1756 *str
= spaces
? spaces
: *str
;
1766 /* Print the list of candidate FNS in an error message. FNS can also
1767 be a TREE_LIST of non-functions in the case of an ambiguous lookup. */
1770 print_candidates (tree fns
)
1772 const char *str
= NULL
;
1773 print_candidates_1 (fns
, false, &str
);
1774 gcc_assert (str
== NULL
);
1777 /* Returns the template (one of the functions given by TEMPLATE_ID)
1778 which can be specialized to match the indicated DECL with the
1779 explicit template args given in TEMPLATE_ID. The DECL may be
1780 NULL_TREE if none is available. In that case, the functions in
1781 TEMPLATE_ID are non-members.
1783 If NEED_MEMBER_TEMPLATE is nonzero the function is known to be a
1784 specialization of a member template.
1786 The TEMPLATE_COUNT is the number of references to qualifying
1787 template classes that appeared in the name of the function. See
1788 check_explicit_specialization for a more accurate description.
1790 TSK indicates what kind of template declaration (if any) is being
1791 declared. TSK_TEMPLATE indicates that the declaration given by
1792 DECL, though a FUNCTION_DECL, has template parameters, and is
1793 therefore a template function.
1795 The template args (those explicitly specified and those deduced)
1796 are output in a newly created vector *TARGS_OUT.
1798 If it is impossible to determine the result, an error message is
1799 issued. The error_mark_node is returned to indicate failure. */
1802 determine_specialization (tree template_id
,
1805 int need_member_template
,
1811 tree explicit_targs
;
1812 tree candidates
= NULL_TREE
;
1813 /* A TREE_LIST of templates of which DECL may be a specialization.
1814 The TREE_VALUE of each node is a TEMPLATE_DECL. The
1815 corresponding TREE_PURPOSE is the set of template arguments that,
1816 when used to instantiate the template, would produce a function
1817 with the signature of DECL. */
1818 tree templates
= NULL_TREE
;
1820 cp_binding_level
*b
;
1822 *targs_out
= NULL_TREE
;
1824 if (template_id
== error_mark_node
|| decl
== error_mark_node
)
1825 return error_mark_node
;
1827 /* We shouldn't be specializing a member template of an
1828 unspecialized class template; we already gave an error in
1829 check_specialization_scope, now avoid crashing. */
1830 if (template_count
&& DECL_CLASS_SCOPE_P (decl
)
1831 && template_class_depth (DECL_CONTEXT (decl
)) > 0)
1833 gcc_assert (errorcount
);
1834 return error_mark_node
;
1837 fns
= TREE_OPERAND (template_id
, 0);
1838 explicit_targs
= TREE_OPERAND (template_id
, 1);
1840 if (fns
== error_mark_node
)
1841 return error_mark_node
;
1843 /* Check for baselinks. */
1844 if (BASELINK_P (fns
))
1845 fns
= BASELINK_FUNCTIONS (fns
);
1847 if (!is_overloaded_fn (fns
))
1849 error ("%qD is not a function template", fns
);
1850 return error_mark_node
;
1853 /* Count the number of template headers specified for this
1856 for (b
= current_binding_level
;
1857 b
->kind
== sk_template_parms
;
1861 for (; fns
; fns
= OVL_NEXT (fns
))
1863 tree fn
= OVL_CURRENT (fns
);
1865 if (TREE_CODE (fn
) == TEMPLATE_DECL
)
1867 tree decl_arg_types
;
1871 /* In case of explicit specialization, we need to check if
1872 the number of template headers appearing in the specialization
1873 is correct. This is usually done in check_explicit_specialization,
1874 but the check done there cannot be exhaustive when specializing
1875 member functions. Consider the following code:
1877 template <> void A<int>::f(int);
1878 template <> template <> void A<int>::f(int);
1880 Assuming that A<int> is not itself an explicit specialization
1881 already, the first line specializes "f" which is a non-template
1882 member function, whilst the second line specializes "f" which
1883 is a template member function. So both lines are syntactically
1884 correct, and check_explicit_specialization does not reject
1887 Here, we can do better, as we are matching the specialization
1888 against the declarations. We count the number of template
1889 headers, and we check if they match TEMPLATE_COUNT + 1
1890 (TEMPLATE_COUNT is the number of qualifying template classes,
1891 plus there must be another header for the member template
1894 Notice that if header_count is zero, this is not a
1895 specialization but rather a template instantiation, so there
1896 is no check we can perform here. */
1897 if (header_count
&& header_count
!= template_count
+ 1)
1900 /* Check that the number of template arguments at the
1901 innermost level for DECL is the same as for FN. */
1902 if (current_binding_level
->kind
== sk_template_parms
1903 && !current_binding_level
->explicit_spec_p
1904 && (TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (fn
))
1905 != TREE_VEC_LENGTH (INNERMOST_TEMPLATE_PARMS
1906 (current_template_parms
))))
1909 /* DECL might be a specialization of FN. */
1910 decl_arg_types
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
1911 fn_arg_types
= TYPE_ARG_TYPES (TREE_TYPE (fn
));
1913 /* For a non-static member function, we need to make sure
1914 that the const qualification is the same. Since
1915 get_bindings does not try to merge the "this" parameter,
1916 we must do the comparison explicitly. */
1917 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (fn
)
1918 && !same_type_p (TREE_VALUE (fn_arg_types
),
1919 TREE_VALUE (decl_arg_types
)))
1922 /* Skip the "this" parameter and, for constructors of
1923 classes with virtual bases, the VTT parameter. A
1924 full specialization of a constructor will have a VTT
1925 parameter, but a template never will. */
1927 = skip_artificial_parms_for (decl
, decl_arg_types
);
1929 = skip_artificial_parms_for (fn
, fn_arg_types
);
1931 /* Function templates cannot be specializations; there are
1932 no partial specializations of functions. Therefore, if
1933 the type of DECL does not match FN, there is no
1935 if (tsk
== tsk_template
)
1937 if (compparms (fn_arg_types
, decl_arg_types
))
1938 candidates
= tree_cons (NULL_TREE
, fn
, candidates
);
1942 /* See whether this function might be a specialization of this
1943 template. Suppress access control because we might be trying
1944 to make this specialization a friend, and we have already done
1945 access control for the declaration of the specialization. */
1946 push_deferring_access_checks (dk_no_check
);
1947 targs
= get_bindings (fn
, decl
, explicit_targs
, /*check_ret=*/true);
1948 pop_deferring_access_checks ();
1951 /* We cannot deduce template arguments that when used to
1952 specialize TMPL will produce DECL. */
1955 /* Make sure that the deduced arguments actually work. */
1956 insttype
= tsubst (TREE_TYPE (fn
), targs
, tf_none
, NULL_TREE
);
1957 if (insttype
== error_mark_node
)
1960 = skip_artificial_parms_for (fn
, TYPE_ARG_TYPES (insttype
));
1961 if (!compparms (fn_arg_types
, decl_arg_types
))
1964 /* Save this template, and the arguments deduced. */
1965 templates
= tree_cons (targs
, fn
, templates
);
1967 else if (need_member_template
)
1968 /* FN is an ordinary member function, and we need a
1969 specialization of a member template. */
1971 else if (TREE_CODE (fn
) != FUNCTION_DECL
)
1972 /* We can get IDENTIFIER_NODEs here in certain erroneous
1975 else if (!DECL_FUNCTION_MEMBER_P (fn
))
1976 /* This is just an ordinary non-member function. Nothing can
1977 be a specialization of that. */
1979 else if (DECL_ARTIFICIAL (fn
))
1980 /* Cannot specialize functions that are created implicitly. */
1984 tree decl_arg_types
;
1986 /* This is an ordinary member function. However, since
1987 we're here, we can assume it's enclosing class is a
1988 template class. For example,
1990 template <typename T> struct S { void f(); };
1991 template <> void S<int>::f() {}
1993 Here, S<int>::f is a non-template, but S<int> is a
1994 template class. If FN has the same type as DECL, we
1995 might be in business. */
1997 if (!DECL_TEMPLATE_INFO (fn
))
1998 /* Its enclosing class is an explicit specialization
1999 of a template class. This is not a candidate. */
2002 if (!same_type_p (TREE_TYPE (TREE_TYPE (decl
)),
2003 TREE_TYPE (TREE_TYPE (fn
))))
2004 /* The return types differ. */
2007 /* Adjust the type of DECL in case FN is a static member. */
2008 decl_arg_types
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
2009 if (DECL_STATIC_FUNCTION_P (fn
)
2010 && DECL_NONSTATIC_MEMBER_FUNCTION_P (decl
))
2011 decl_arg_types
= TREE_CHAIN (decl_arg_types
);
2013 if (compparms (TYPE_ARG_TYPES (TREE_TYPE (fn
)),
2016 candidates
= tree_cons (NULL_TREE
, fn
, candidates
);
2020 if (templates
&& TREE_CHAIN (templates
))
2026 It is possible for a specialization with a given function
2027 signature to be instantiated from more than one function
2028 template. In such cases, explicit specification of the
2029 template arguments must be used to uniquely identify the
2030 function template specialization being specialized.
2032 Note that here, there's no suggestion that we're supposed to
2033 determine which of the candidate templates is most
2034 specialized. However, we, also have:
2038 Partial ordering of overloaded function template
2039 declarations is used in the following contexts to select
2040 the function template to which a function template
2041 specialization refers:
2043 -- when an explicit specialization refers to a function
2046 So, we do use the partial ordering rules, at least for now.
2047 This extension can only serve to make invalid programs valid,
2048 so it's safe. And, there is strong anecdotal evidence that
2049 the committee intended the partial ordering rules to apply;
2050 the EDG front end has that behavior, and John Spicer claims
2051 that the committee simply forgot to delete the wording in
2052 [temp.expl.spec]. */
2053 tree tmpl
= most_specialized_instantiation (templates
);
2054 if (tmpl
!= error_mark_node
)
2057 TREE_CHAIN (templates
) = NULL_TREE
;
2061 if (templates
== NULL_TREE
&& candidates
== NULL_TREE
)
2063 error ("template-id %qD for %q+D does not match any template "
2064 "declaration", template_id
, decl
);
2065 if (header_count
&& header_count
!= template_count
+ 1)
2066 inform (input_location
, "saw %d %<template<>%>, need %d for "
2067 "specializing a member function template",
2068 header_count
, template_count
+ 1);
2069 return error_mark_node
;
2071 else if ((templates
&& TREE_CHAIN (templates
))
2072 || (candidates
&& TREE_CHAIN (candidates
))
2073 || (templates
&& candidates
))
2075 error ("ambiguous template specialization %qD for %q+D",
2077 candidates
= chainon (candidates
, templates
);
2078 print_candidates (candidates
);
2079 return error_mark_node
;
2082 /* We have one, and exactly one, match. */
2085 tree fn
= TREE_VALUE (candidates
);
2086 *targs_out
= copy_node (DECL_TI_ARGS (fn
));
2087 /* DECL is a re-declaration or partial instantiation of a template
2089 if (TREE_CODE (fn
) == TEMPLATE_DECL
)
2091 /* It was a specialization of an ordinary member function in a
2093 return DECL_TI_TEMPLATE (fn
);
2096 /* It was a specialization of a template. */
2097 targs
= DECL_TI_ARGS (DECL_TEMPLATE_RESULT (TREE_VALUE (templates
)));
2098 if (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (targs
))
2100 *targs_out
= copy_node (targs
);
2101 SET_TMPL_ARGS_LEVEL (*targs_out
,
2102 TMPL_ARGS_DEPTH (*targs_out
),
2103 TREE_PURPOSE (templates
));
2106 *targs_out
= TREE_PURPOSE (templates
);
2107 return TREE_VALUE (templates
);
2110 /* Returns a chain of parameter types, exactly like the SPEC_TYPES,
2111 but with the default argument values filled in from those in the
2115 copy_default_args_to_explicit_spec_1 (tree spec_types
,
2118 tree new_spec_types
;
2123 if (spec_types
== void_list_node
)
2124 return void_list_node
;
2126 /* Substitute into the rest of the list. */
2128 copy_default_args_to_explicit_spec_1 (TREE_CHAIN (spec_types
),
2129 TREE_CHAIN (tmpl_types
));
2131 /* Add the default argument for this parameter. */
2132 return hash_tree_cons (TREE_PURPOSE (tmpl_types
),
2133 TREE_VALUE (spec_types
),
2137 /* DECL is an explicit specialization. Replicate default arguments
2138 from the template it specializes. (That way, code like:
2140 template <class T> void f(T = 3);
2141 template <> void f(double);
2144 works, as required.) An alternative approach would be to look up
2145 the correct default arguments at the call-site, but this approach
2146 is consistent with how implicit instantiations are handled. */
2149 copy_default_args_to_explicit_spec (tree decl
)
2154 tree new_spec_types
;
2158 tree object_type
= NULL_TREE
;
2159 tree in_charge
= NULL_TREE
;
2160 tree vtt
= NULL_TREE
;
2162 /* See if there's anything we need to do. */
2163 tmpl
= DECL_TI_TEMPLATE (decl
);
2164 tmpl_types
= TYPE_ARG_TYPES (TREE_TYPE (DECL_TEMPLATE_RESULT (tmpl
)));
2165 for (t
= tmpl_types
; t
; t
= TREE_CHAIN (t
))
2166 if (TREE_PURPOSE (t
))
2171 old_type
= TREE_TYPE (decl
);
2172 spec_types
= TYPE_ARG_TYPES (old_type
);
2174 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (decl
))
2176 /* Remove the this pointer, but remember the object's type for
2178 object_type
= TREE_TYPE (TREE_VALUE (spec_types
));
2179 spec_types
= TREE_CHAIN (spec_types
);
2180 tmpl_types
= TREE_CHAIN (tmpl_types
);
2182 if (DECL_HAS_IN_CHARGE_PARM_P (decl
))
2184 /* DECL may contain more parameters than TMPL due to the extra
2185 in-charge parameter in constructors and destructors. */
2186 in_charge
= spec_types
;
2187 spec_types
= TREE_CHAIN (spec_types
);
2189 if (DECL_HAS_VTT_PARM_P (decl
))
2192 spec_types
= TREE_CHAIN (spec_types
);
2196 /* Compute the merged default arguments. */
2198 copy_default_args_to_explicit_spec_1 (spec_types
, tmpl_types
);
2200 /* Compute the new FUNCTION_TYPE. */
2204 new_spec_types
= hash_tree_cons (TREE_PURPOSE (vtt
),
2209 /* Put the in-charge parameter back. */
2210 new_spec_types
= hash_tree_cons (TREE_PURPOSE (in_charge
),
2211 TREE_VALUE (in_charge
),
2214 new_type
= build_method_type_directly (object_type
,
2215 TREE_TYPE (old_type
),
2219 new_type
= build_function_type (TREE_TYPE (old_type
),
2221 new_type
= cp_build_type_attribute_variant (new_type
,
2222 TYPE_ATTRIBUTES (old_type
));
2223 new_type
= build_exception_variant (new_type
,
2224 TYPE_RAISES_EXCEPTIONS (old_type
));
2225 TREE_TYPE (decl
) = new_type
;
2228 /* Return the number of template headers we expect to see for a definition
2229 or specialization of CTYPE or one of its non-template members. */
2232 num_template_headers_for_class (tree ctype
)
2234 int num_templates
= 0;
2236 while (ctype
&& CLASS_TYPE_P (ctype
))
2238 /* You're supposed to have one `template <...>' for every
2239 template class, but you don't need one for a full
2240 specialization. For example:
2242 template <class T> struct S{};
2243 template <> struct S<int> { void f(); };
2244 void S<int>::f () {}
2246 is correct; there shouldn't be a `template <>' for the
2247 definition of `S<int>::f'. */
2248 if (!CLASSTYPE_TEMPLATE_INFO (ctype
))
2249 /* If CTYPE does not have template information of any
2250 kind, then it is not a template, nor is it nested
2251 within a template. */
2253 if (explicit_class_specialization_p (ctype
))
2255 if (PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (ctype
)))
2258 ctype
= TYPE_CONTEXT (ctype
);
2261 return num_templates
;
2264 /* Do a simple sanity check on the template headers that precede the
2265 variable declaration DECL. */
2268 check_template_variable (tree decl
)
2270 tree ctx
= CP_DECL_CONTEXT (decl
);
2271 int wanted
= num_template_headers_for_class (ctx
);
2272 if (!TYPE_P (ctx
) || !CLASSTYPE_TEMPLATE_INFO (ctx
))
2273 permerror (DECL_SOURCE_LOCATION (decl
),
2274 "%qD is not a static data member of a class template", decl
);
2275 else if (template_header_count
> wanted
)
2277 pedwarn (DECL_SOURCE_LOCATION (decl
), 0,
2278 "too many template headers for %D (should be %d)",
2280 if (CLASSTYPE_TEMPLATE_SPECIALIZATION (ctx
))
2281 inform (DECL_SOURCE_LOCATION (decl
),
2282 "members of an explicitly specialized class are defined "
2283 "without a template header");
2287 /* Check to see if the function just declared, as indicated in
2288 DECLARATOR, and in DECL, is a specialization of a function
2289 template. We may also discover that the declaration is an explicit
2290 instantiation at this point.
2292 Returns DECL, or an equivalent declaration that should be used
2293 instead if all goes well. Issues an error message if something is
2294 amiss. Returns error_mark_node if the error is not easily
2297 FLAGS is a bitmask consisting of the following flags:
2299 2: The function has a definition.
2300 4: The function is a friend.
2302 The TEMPLATE_COUNT is the number of references to qualifying
2303 template classes that appeared in the name of the function. For
2306 template <class T> struct S { void f(); };
2309 the TEMPLATE_COUNT would be 1. However, explicitly specialized
2310 classes are not counted in the TEMPLATE_COUNT, so that in
2312 template <class T> struct S {};
2313 template <> struct S<int> { void f(); }
2314 template <> void S<int>::f();
2316 the TEMPLATE_COUNT would be 0. (Note that this declaration is
2317 invalid; there should be no template <>.)
2319 If the function is a specialization, it is marked as such via
2320 DECL_TEMPLATE_SPECIALIZATION. Furthermore, its DECL_TEMPLATE_INFO
2321 is set up correctly, and it is added to the list of specializations
2322 for that template. */
2325 check_explicit_specialization (tree declarator
,
2330 int have_def
= flags
& 2;
2331 int is_friend
= flags
& 4;
2332 int specialization
= 0;
2333 int explicit_instantiation
= 0;
2334 int member_specialization
= 0;
2335 tree ctype
= DECL_CLASS_CONTEXT (decl
);
2336 tree dname
= DECL_NAME (decl
);
2341 if (!processing_specialization
)
2344 tsk
= tsk_excessive_parms
;
2347 tsk
= current_tmpl_spec_kind (template_count
);
2352 if (processing_specialization
)
2355 SET_DECL_TEMPLATE_SPECIALIZATION (decl
);
2357 else if (TREE_CODE (declarator
) == TEMPLATE_ID_EXPR
)
2360 /* This could be something like:
2362 template <class T> void f(T);
2363 class S { friend void f<>(int); } */
2367 /* This case handles bogus declarations like template <>
2368 template <class T> void f<int>(); */
2370 error ("template-id %qD in declaration of primary template",
2377 case tsk_invalid_member_spec
:
2378 /* The error has already been reported in
2379 check_specialization_scope. */
2380 return error_mark_node
;
2382 case tsk_invalid_expl_inst
:
2383 error ("template parameter list used in explicit instantiation");
2389 error ("definition provided for explicit instantiation");
2391 explicit_instantiation
= 1;
2394 case tsk_excessive_parms
:
2395 case tsk_insufficient_parms
:
2396 if (tsk
== tsk_excessive_parms
)
2397 error ("too many template parameter lists in declaration of %qD",
2399 else if (template_header_count
)
2400 error("too few template parameter lists in declaration of %qD", decl
);
2402 error("explicit specialization of %qD must be introduced by "
2403 "%<template <>%>", decl
);
2407 SET_DECL_TEMPLATE_SPECIALIZATION (decl
);
2409 member_specialization
= 1;
2415 if (TREE_CODE (declarator
) == TEMPLATE_ID_EXPR
)
2417 /* This case handles bogus declarations like template <>
2418 template <class T> void f<int>(); */
2420 if (uses_template_parms (declarator
))
2421 error ("function template partial specialization %qD "
2422 "is not allowed", declarator
);
2424 error ("template-id %qD in declaration of primary template",
2429 if (ctype
&& CLASSTYPE_TEMPLATE_INSTANTIATION (ctype
))
2430 /* This is a specialization of a member template, without
2431 specialization the containing class. Something like:
2433 template <class T> struct S {
2434 template <class U> void f (U);
2436 template <> template <class U> void S<int>::f(U) {}
2438 That's a specialization -- but of the entire template. */
2446 if (specialization
|| member_specialization
)
2448 tree t
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
2449 for (; t
; t
= TREE_CHAIN (t
))
2450 if (TREE_PURPOSE (t
))
2452 permerror (input_location
,
2453 "default argument specified in explicit specialization");
2458 if (specialization
|| member_specialization
|| explicit_instantiation
)
2460 tree tmpl
= NULL_TREE
;
2461 tree targs
= NULL_TREE
;
2463 /* Make sure that the declarator is a TEMPLATE_ID_EXPR. */
2464 if (TREE_CODE (declarator
) != TEMPLATE_ID_EXPR
)
2468 gcc_assert (TREE_CODE (declarator
) == IDENTIFIER_NODE
);
2473 /* If there is no class context, the explicit instantiation
2474 must be at namespace scope. */
2475 gcc_assert (DECL_NAMESPACE_SCOPE_P (decl
));
2477 /* Find the namespace binding, using the declaration
2479 fns
= lookup_qualified_name (CP_DECL_CONTEXT (decl
), dname
,
2481 if (fns
== error_mark_node
|| !is_overloaded_fn (fns
))
2483 error ("%qD is not a template function", dname
);
2484 fns
= error_mark_node
;
2488 tree fn
= OVL_CURRENT (fns
);
2489 if (!is_associated_namespace (CP_DECL_CONTEXT (decl
),
2490 CP_DECL_CONTEXT (fn
)))
2491 error ("%qD is not declared in %qD",
2492 decl
, current_namespace
);
2496 declarator
= lookup_template_function (fns
, NULL_TREE
);
2499 if (declarator
== error_mark_node
)
2500 return error_mark_node
;
2502 if (ctype
!= NULL_TREE
&& TYPE_BEING_DEFINED (ctype
))
2504 if (!explicit_instantiation
)
2505 /* A specialization in class scope. This is invalid,
2506 but the error will already have been flagged by
2507 check_specialization_scope. */
2508 return error_mark_node
;
2511 /* It's not valid to write an explicit instantiation in
2514 class C { template void f(); }
2516 This case is caught by the parser. However, on
2519 template class C { void f(); };
2521 (which is invalid) we can get here. The error will be
2528 else if (ctype
!= NULL_TREE
2529 && (TREE_CODE (TREE_OPERAND (declarator
, 0)) ==
2532 /* Find the list of functions in ctype that have the same
2533 name as the declared function. */
2534 tree name
= TREE_OPERAND (declarator
, 0);
2535 tree fns
= NULL_TREE
;
2538 if (constructor_name_p (name
, ctype
))
2540 int is_constructor
= DECL_CONSTRUCTOR_P (decl
);
2542 if (is_constructor
? !TYPE_HAS_USER_CONSTRUCTOR (ctype
)
2543 : !CLASSTYPE_DESTRUCTORS (ctype
))
2545 /* From [temp.expl.spec]:
2547 If such an explicit specialization for the member
2548 of a class template names an implicitly-declared
2549 special member function (clause _special_), the
2550 program is ill-formed.
2552 Similar language is found in [temp.explicit]. */
2553 error ("specialization of implicitly-declared special member function");
2554 return error_mark_node
;
2557 name
= is_constructor
? ctor_identifier
: dtor_identifier
;
2560 if (!DECL_CONV_FN_P (decl
))
2562 idx
= lookup_fnfields_1 (ctype
, name
);
2564 fns
= (*CLASSTYPE_METHOD_VEC (ctype
))[idx
];
2568 vec
<tree
, va_gc
> *methods
;
2571 /* For a type-conversion operator, we cannot do a
2572 name-based lookup. We might be looking for `operator
2573 int' which will be a specialization of `operator T'.
2574 So, we find *all* the conversion operators, and then
2575 select from them. */
2578 methods
= CLASSTYPE_METHOD_VEC (ctype
);
2580 for (idx
= CLASSTYPE_FIRST_CONVERSION_SLOT
;
2581 methods
->iterate (idx
, &ovl
);
2584 if (!DECL_CONV_FN_P (OVL_CURRENT (ovl
)))
2585 /* There are no more conversion functions. */
2588 /* Glue all these conversion functions together
2589 with those we already have. */
2590 for (; ovl
; ovl
= OVL_NEXT (ovl
))
2591 fns
= ovl_cons (OVL_CURRENT (ovl
), fns
);
2595 if (fns
== NULL_TREE
)
2597 error ("no member function %qD declared in %qT", name
, ctype
);
2598 return error_mark_node
;
2601 TREE_OPERAND (declarator
, 0) = fns
;
2604 /* Figure out what exactly is being specialized at this point.
2605 Note that for an explicit instantiation, even one for a
2606 member function, we cannot tell apriori whether the
2607 instantiation is for a member template, or just a member
2608 function of a template class. Even if a member template is
2609 being instantiated, the member template arguments may be
2610 elided if they can be deduced from the rest of the
2612 tmpl
= determine_specialization (declarator
, decl
,
2614 member_specialization
,
2618 if (!tmpl
|| tmpl
== error_mark_node
)
2619 /* We couldn't figure out what this declaration was
2621 return error_mark_node
;
2624 tree gen_tmpl
= most_general_template (tmpl
);
2626 if (explicit_instantiation
)
2628 /* We don't set DECL_EXPLICIT_INSTANTIATION here; that
2629 is done by do_decl_instantiation later. */
2631 int arg_depth
= TMPL_ARGS_DEPTH (targs
);
2632 int parm_depth
= TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (tmpl
));
2634 if (arg_depth
> parm_depth
)
2636 /* If TMPL is not the most general template (for
2637 example, if TMPL is a friend template that is
2638 injected into namespace scope), then there will
2639 be too many levels of TARGS. Remove some of them
2644 new_targs
= make_tree_vec (parm_depth
);
2645 for (i
= arg_depth
- parm_depth
; i
< arg_depth
; ++i
)
2646 TREE_VEC_ELT (new_targs
, i
- (arg_depth
- parm_depth
))
2647 = TREE_VEC_ELT (targs
, i
);
2651 return instantiate_template (tmpl
, targs
, tf_error
);
2654 /* If we thought that the DECL was a member function, but it
2655 turns out to be specializing a static member function,
2656 make DECL a static member function as well. */
2657 if (DECL_STATIC_FUNCTION_P (tmpl
)
2658 && DECL_NONSTATIC_MEMBER_FUNCTION_P (decl
))
2659 revert_static_member_fn (decl
);
2661 /* If this is a specialization of a member template of a
2662 template class, we want to return the TEMPLATE_DECL, not
2663 the specialization of it. */
2664 if (tsk
== tsk_template
)
2666 tree result
= DECL_TEMPLATE_RESULT (tmpl
);
2667 SET_DECL_TEMPLATE_SPECIALIZATION (tmpl
);
2668 DECL_INITIAL (result
) = NULL_TREE
;
2672 DECL_SOURCE_LOCATION (tmpl
) = DECL_SOURCE_LOCATION (decl
);
2673 DECL_SOURCE_LOCATION (result
)
2674 = DECL_SOURCE_LOCATION (decl
);
2675 /* We want to use the argument list specified in the
2676 definition, not in the original declaration. */
2677 DECL_ARGUMENTS (result
) = DECL_ARGUMENTS (decl
);
2678 for (parm
= DECL_ARGUMENTS (result
); parm
;
2679 parm
= DECL_CHAIN (parm
))
2680 DECL_CONTEXT (parm
) = result
;
2682 return register_specialization (tmpl
, gen_tmpl
, targs
,
2686 /* Set up the DECL_TEMPLATE_INFO for DECL. */
2687 DECL_TEMPLATE_INFO (decl
) = build_template_info (tmpl
, targs
);
2689 /* Inherit default function arguments from the template
2690 DECL is specializing. */
2691 copy_default_args_to_explicit_spec (decl
);
2693 /* This specialization has the same protection as the
2694 template it specializes. */
2695 TREE_PRIVATE (decl
) = TREE_PRIVATE (gen_tmpl
);
2696 TREE_PROTECTED (decl
) = TREE_PROTECTED (gen_tmpl
);
2698 /* 7.1.1-1 [dcl.stc]
2700 A storage-class-specifier shall not be specified in an
2701 explicit specialization...
2703 The parser rejects these, so unless action is taken here,
2704 explicit function specializations will always appear with
2707 The action recommended by the C++ CWG in response to C++
2708 defect report 605 is to make the storage class and linkage
2709 of the explicit specialization match the templated function:
2711 http://www.open-std.org/jtc1/sc22/wg21/docs/cwg_active.html#605
2713 if (tsk
== tsk_expl_spec
&& DECL_FUNCTION_TEMPLATE_P (gen_tmpl
))
2715 tree tmpl_func
= DECL_TEMPLATE_RESULT (gen_tmpl
);
2716 gcc_assert (TREE_CODE (tmpl_func
) == FUNCTION_DECL
);
2718 /* This specialization has the same linkage and visibility as
2719 the function template it specializes. */
2720 TREE_PUBLIC (decl
) = TREE_PUBLIC (tmpl_func
);
2721 if (! TREE_PUBLIC (decl
))
2723 DECL_INTERFACE_KNOWN (decl
) = 1;
2724 DECL_NOT_REALLY_EXTERN (decl
) = 1;
2726 DECL_THIS_STATIC (decl
) = DECL_THIS_STATIC (tmpl_func
);
2727 if (DECL_VISIBILITY_SPECIFIED (tmpl_func
))
2729 DECL_VISIBILITY_SPECIFIED (decl
) = 1;
2730 DECL_VISIBILITY (decl
) = DECL_VISIBILITY (tmpl_func
);
2734 /* If DECL is a friend declaration, declared using an
2735 unqualified name, the namespace associated with DECL may
2736 have been set incorrectly. For example, in:
2738 template <typename T> void f(T);
2740 struct S { friend void f<int>(int); }
2743 we will have set the DECL_CONTEXT for the friend
2744 declaration to N, rather than to the global namespace. */
2745 if (DECL_NAMESPACE_SCOPE_P (decl
))
2746 DECL_CONTEXT (decl
) = DECL_CONTEXT (tmpl
);
2748 if (is_friend
&& !have_def
)
2749 /* This is not really a declaration of a specialization.
2750 It's just the name of an instantiation. But, it's not
2751 a request for an instantiation, either. */
2752 SET_DECL_IMPLICIT_INSTANTIATION (decl
);
2753 else if (DECL_CONSTRUCTOR_P (decl
) || DECL_DESTRUCTOR_P (decl
))
2754 /* This is indeed a specialization. In case of constructors
2755 and destructors, we need in-charge and not-in-charge
2756 versions in V3 ABI. */
2757 clone_function_decl (decl
, /*update_method_vec_p=*/0);
2759 /* Register this specialization so that we can find it
2761 decl
= register_specialization (decl
, gen_tmpl
, targs
, is_friend
, 0);
2768 /* Returns 1 iff PARMS1 and PARMS2 are identical sets of template
2769 parameters. These are represented in the same format used for
2770 DECL_TEMPLATE_PARMS. */
2773 comp_template_parms (const_tree parms1
, const_tree parms2
)
2778 if (parms1
== parms2
)
2781 for (p1
= parms1
, p2
= parms2
;
2782 p1
!= NULL_TREE
&& p2
!= NULL_TREE
;
2783 p1
= TREE_CHAIN (p1
), p2
= TREE_CHAIN (p2
))
2785 tree t1
= TREE_VALUE (p1
);
2786 tree t2
= TREE_VALUE (p2
);
2789 gcc_assert (TREE_CODE (t1
) == TREE_VEC
);
2790 gcc_assert (TREE_CODE (t2
) == TREE_VEC
);
2792 if (TREE_VEC_LENGTH (t1
) != TREE_VEC_LENGTH (t2
))
2795 for (i
= 0; i
< TREE_VEC_LENGTH (t2
); ++i
)
2797 tree parm1
= TREE_VALUE (TREE_VEC_ELT (t1
, i
));
2798 tree parm2
= TREE_VALUE (TREE_VEC_ELT (t2
, i
));
2800 /* If either of the template parameters are invalid, assume
2801 they match for the sake of error recovery. */
2802 if (parm1
== error_mark_node
|| parm2
== error_mark_node
)
2805 if (TREE_CODE (parm1
) != TREE_CODE (parm2
))
2808 if (TREE_CODE (parm1
) == TEMPLATE_TYPE_PARM
2809 && (TEMPLATE_TYPE_PARAMETER_PACK (parm1
)
2810 == TEMPLATE_TYPE_PARAMETER_PACK (parm2
)))
2812 else if (!same_type_p (TREE_TYPE (parm1
), TREE_TYPE (parm2
)))
2817 if ((p1
!= NULL_TREE
) != (p2
!= NULL_TREE
))
2818 /* One set of parameters has more parameters lists than the
2825 /* Determine whether PARM is a parameter pack. */
2828 template_parameter_pack_p (const_tree parm
)
2830 /* Determine if we have a non-type template parameter pack. */
2831 if (TREE_CODE (parm
) == PARM_DECL
)
2832 return (DECL_TEMPLATE_PARM_P (parm
)
2833 && TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
)));
2834 if (TREE_CODE (parm
) == TEMPLATE_PARM_INDEX
)
2835 return TEMPLATE_PARM_PARAMETER_PACK (parm
);
2837 /* If this is a list of template parameters, we could get a
2838 TYPE_DECL or a TEMPLATE_DECL. */
2839 if (TREE_CODE (parm
) == TYPE_DECL
|| TREE_CODE (parm
) == TEMPLATE_DECL
)
2840 parm
= TREE_TYPE (parm
);
2842 /* Otherwise it must be a type template parameter. */
2843 return ((TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
2844 || TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
)
2845 && TEMPLATE_TYPE_PARAMETER_PACK (parm
));
2848 /* Determine if T is a function parameter pack. */
2851 function_parameter_pack_p (const_tree t
)
2853 if (t
&& TREE_CODE (t
) == PARM_DECL
)
2854 return FUNCTION_PARAMETER_PACK_P (t
);
2858 /* Return the function template declaration of PRIMARY_FUNC_TMPL_INST.
2859 PRIMARY_FUNC_TMPL_INST is a primary function template instantiation. */
2862 get_function_template_decl (const_tree primary_func_tmpl_inst
)
2864 if (! primary_func_tmpl_inst
2865 || TREE_CODE (primary_func_tmpl_inst
) != FUNCTION_DECL
2866 || ! primary_template_instantiation_p (primary_func_tmpl_inst
))
2869 return DECL_TEMPLATE_RESULT (DECL_TI_TEMPLATE (primary_func_tmpl_inst
));
2872 /* Return true iff the function parameter PARAM_DECL was expanded
2873 from the function parameter pack PACK. */
2876 function_parameter_expanded_from_pack_p (tree param_decl
, tree pack
)
2878 if (DECL_ARTIFICIAL (param_decl
)
2879 || !function_parameter_pack_p (pack
))
2882 /* The parameter pack and its pack arguments have the same
2884 return DECL_PARM_INDEX (pack
) == DECL_PARM_INDEX (param_decl
);
2887 /* Determine whether ARGS describes a variadic template args list,
2888 i.e., one that is terminated by a template argument pack. */
2891 template_args_variadic_p (tree args
)
2896 if (args
== NULL_TREE
)
2899 args
= INNERMOST_TEMPLATE_ARGS (args
);
2900 nargs
= TREE_VEC_LENGTH (args
);
2905 last_parm
= TREE_VEC_ELT (args
, nargs
- 1);
2907 return ARGUMENT_PACK_P (last_parm
);
2910 /* Generate a new name for the parameter pack name NAME (an
2911 IDENTIFIER_NODE) that incorporates its */
2914 make_ith_pack_parameter_name (tree name
, int i
)
2916 /* Munge the name to include the parameter index. */
2917 #define NUMBUF_LEN 128
2918 char numbuf
[NUMBUF_LEN
];
2922 if (name
== NULL_TREE
)
2924 snprintf (numbuf
, NUMBUF_LEN
, "%i", i
);
2925 newname_len
= IDENTIFIER_LENGTH (name
)
2926 + strlen (numbuf
) + 2;
2927 newname
= (char*)alloca (newname_len
);
2928 snprintf (newname
, newname_len
,
2929 "%s#%i", IDENTIFIER_POINTER (name
), i
);
2930 return get_identifier (newname
);
2933 /* Return true if T is a primary function, class or alias template
2937 primary_template_instantiation_p (const_tree t
)
2942 if (TREE_CODE (t
) == FUNCTION_DECL
)
2943 return DECL_LANG_SPECIFIC (t
)
2944 && DECL_TEMPLATE_INSTANTIATION (t
)
2945 && PRIMARY_TEMPLATE_P (DECL_TI_TEMPLATE (t
));
2946 else if (CLASS_TYPE_P (t
) && !TYPE_DECL_ALIAS_P (TYPE_NAME (t
)))
2947 return CLASSTYPE_TEMPLATE_INSTANTIATION (t
)
2948 && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (t
));
2949 else if (alias_template_specialization_p (t
))
2954 /* Return true if PARM is a template template parameter. */
2957 template_template_parameter_p (const_tree parm
)
2959 return DECL_TEMPLATE_TEMPLATE_PARM_P (parm
);
2962 /* Return true iff PARM is a DECL representing a type template
2966 template_type_parameter_p (const_tree parm
)
2969 && (TREE_CODE (parm
) == TYPE_DECL
2970 || TREE_CODE (parm
) == TEMPLATE_DECL
)
2971 && DECL_TEMPLATE_PARM_P (parm
));
2974 /* Return the template parameters of T if T is a
2975 primary template instantiation, NULL otherwise. */
2978 get_primary_template_innermost_parameters (const_tree t
)
2980 tree parms
= NULL
, template_info
= NULL
;
2982 if ((template_info
= get_template_info (t
))
2983 && primary_template_instantiation_p (t
))
2984 parms
= INNERMOST_TEMPLATE_PARMS
2985 (DECL_TEMPLATE_PARMS (TI_TEMPLATE (template_info
)));
2990 /* Return the template parameters of the LEVELth level from the full list
2991 of template parameters PARMS. */
2994 get_template_parms_at_level (tree parms
, int level
)
2998 || TREE_CODE (parms
) != TREE_LIST
2999 || level
> TMPL_PARMS_DEPTH (parms
))
3002 for (p
= parms
; p
; p
= TREE_CHAIN (p
))
3003 if (TMPL_PARMS_DEPTH (p
) == level
)
3009 /* Returns the template arguments of T if T is a template instantiation,
3013 get_template_innermost_arguments (const_tree t
)
3015 tree args
= NULL
, template_info
= NULL
;
3017 if ((template_info
= get_template_info (t
))
3018 && TI_ARGS (template_info
))
3019 args
= INNERMOST_TEMPLATE_ARGS (TI_ARGS (template_info
));
3024 /* Return the argument pack elements of T if T is a template argument pack,
3028 get_template_argument_pack_elems (const_tree t
)
3030 if (TREE_CODE (t
) != TYPE_ARGUMENT_PACK
3031 && TREE_CODE (t
) != NONTYPE_ARGUMENT_PACK
)
3034 return ARGUMENT_PACK_ARGS (t
);
3037 /* Structure used to track the progress of find_parameter_packs_r. */
3038 struct find_parameter_pack_data
3040 /* TREE_LIST that will contain all of the parameter packs found by
3042 tree
* parameter_packs
;
3044 /* Set of AST nodes that have been visited by the traversal. */
3045 struct pointer_set_t
*visited
;
3048 /* Identifies all of the argument packs that occur in a template
3049 argument and appends them to the TREE_LIST inside DATA, which is a
3050 find_parameter_pack_data structure. This is a subroutine of
3051 make_pack_expansion and uses_parameter_packs. */
3053 find_parameter_packs_r (tree
*tp
, int *walk_subtrees
, void* data
)
3056 struct find_parameter_pack_data
* ppd
=
3057 (struct find_parameter_pack_data
*)data
;
3058 bool parameter_pack_p
= false;
3060 /* Handle type aliases/typedefs. */
3063 && TREE_CODE (TYPE_NAME (t
)) == TYPE_DECL
3064 && TYPE_DECL_ALIAS_P (TYPE_NAME (t
)))
3066 if (TYPE_TEMPLATE_INFO (t
))
3067 cp_walk_tree (&TYPE_TI_ARGS (t
),
3068 &find_parameter_packs_r
,
3074 /* Identify whether this is a parameter pack or not. */
3075 switch (TREE_CODE (t
))
3077 case TEMPLATE_PARM_INDEX
:
3078 if (TEMPLATE_PARM_PARAMETER_PACK (t
))
3079 parameter_pack_p
= true;
3082 case TEMPLATE_TYPE_PARM
:
3083 t
= TYPE_MAIN_VARIANT (t
);
3084 case TEMPLATE_TEMPLATE_PARM
:
3085 if (TEMPLATE_TYPE_PARAMETER_PACK (t
))
3086 parameter_pack_p
= true;
3090 if (FUNCTION_PARAMETER_PACK_P (t
))
3092 /* We don't want to walk into the type of a PARM_DECL,
3093 because we don't want to see the type parameter pack. */
3095 parameter_pack_p
= true;
3100 parameter_pack_p
= true;
3103 /* Not a parameter pack. */
3107 if (parameter_pack_p
)
3109 /* Add this parameter pack to the list. */
3110 *ppd
->parameter_packs
= tree_cons (NULL_TREE
, t
, *ppd
->parameter_packs
);
3114 cp_walk_tree (&TYPE_CONTEXT (t
),
3115 &find_parameter_packs_r
, ppd
, ppd
->visited
);
3117 /* This switch statement will return immediately if we don't find a
3119 switch (TREE_CODE (t
))
3121 case TEMPLATE_PARM_INDEX
:
3124 case BOUND_TEMPLATE_TEMPLATE_PARM
:
3125 /* Check the template itself. */
3126 cp_walk_tree (&TREE_TYPE (TYPE_TI_TEMPLATE (t
)),
3127 &find_parameter_packs_r
, ppd
, ppd
->visited
);
3128 /* Check the template arguments. */
3129 cp_walk_tree (&TYPE_TI_ARGS (t
), &find_parameter_packs_r
, ppd
,
3134 case TEMPLATE_TYPE_PARM
:
3135 case TEMPLATE_TEMPLATE_PARM
:
3142 if (TYPE_PTRMEMFUNC_P (t
))
3148 if (TYPE_TEMPLATE_INFO (t
))
3149 cp_walk_tree (&TI_ARGS (TYPE_TEMPLATE_INFO (t
)),
3150 &find_parameter_packs_r
, ppd
, ppd
->visited
);
3157 cp_walk_tree (&TREE_TYPE (t
),
3158 &find_parameter_packs_r
, ppd
, ppd
->visited
);
3162 cp_walk_tree (&TYPENAME_TYPE_FULLNAME (t
), &find_parameter_packs_r
,
3167 case TYPE_PACK_EXPANSION
:
3168 case EXPR_PACK_EXPANSION
:
3173 cp_walk_tree (&TYPE_MAX_VALUE (t
), &find_parameter_packs_r
,
3178 case IDENTIFIER_NODE
:
3179 cp_walk_tree (&TREE_TYPE (t
), &find_parameter_packs_r
, ppd
,
3191 /* Determines if the expression or type T uses any parameter packs. */
3193 uses_parameter_packs (tree t
)
3195 tree parameter_packs
= NULL_TREE
;
3196 struct find_parameter_pack_data ppd
;
3197 ppd
.parameter_packs
= ¶meter_packs
;
3198 ppd
.visited
= pointer_set_create ();
3199 cp_walk_tree (&t
, &find_parameter_packs_r
, &ppd
, ppd
.visited
);
3200 pointer_set_destroy (ppd
.visited
);
3201 return parameter_packs
!= NULL_TREE
;
3204 /* Turn ARG, which may be an expression, type, or a TREE_LIST
3205 representation a base-class initializer into a parameter pack
3206 expansion. If all goes well, the resulting node will be an
3207 EXPR_PACK_EXPANSION, TYPE_PACK_EXPANSION, or TREE_LIST,
3210 make_pack_expansion (tree arg
)
3213 tree parameter_packs
= NULL_TREE
;
3214 bool for_types
= false;
3215 struct find_parameter_pack_data ppd
;
3217 if (!arg
|| arg
== error_mark_node
)
3220 if (TREE_CODE (arg
) == TREE_LIST
)
3222 /* The only time we will see a TREE_LIST here is for a base
3223 class initializer. In this case, the TREE_PURPOSE will be a
3224 _TYPE node (representing the base class expansion we're
3225 initializing) and the TREE_VALUE will be a TREE_LIST
3226 containing the initialization arguments.
3228 The resulting expansion looks somewhat different from most
3229 expansions. Rather than returning just one _EXPANSION, we
3230 return a TREE_LIST whose TREE_PURPOSE is a
3231 TYPE_PACK_EXPANSION containing the bases that will be
3232 initialized. The TREE_VALUE will be identical to the
3233 original TREE_VALUE, which is a list of arguments that will
3234 be passed to each base. We do not introduce any new pack
3235 expansion nodes into the TREE_VALUE (although it is possible
3236 that some already exist), because the TREE_PURPOSE and
3237 TREE_VALUE all need to be expanded together with the same
3238 _EXPANSION node. Note that the TYPE_PACK_EXPANSION in the
3239 resulting TREE_PURPOSE will mention the parameter packs in
3240 both the bases and the arguments to the bases. */
3243 tree parameter_packs
= NULL_TREE
;
3245 /* Determine which parameter packs will be used by the base
3247 ppd
.visited
= pointer_set_create ();
3248 ppd
.parameter_packs
= ¶meter_packs
;
3249 cp_walk_tree (&TREE_PURPOSE (arg
), &find_parameter_packs_r
,
3252 if (parameter_packs
== NULL_TREE
)
3254 error ("base initializer expansion %<%T%> contains no parameter packs", arg
);
3255 pointer_set_destroy (ppd
.visited
);
3256 return error_mark_node
;
3259 if (TREE_VALUE (arg
) != void_type_node
)
3261 /* Collect the sets of parameter packs used in each of the
3262 initialization arguments. */
3263 for (value
= TREE_VALUE (arg
); value
; value
= TREE_CHAIN (value
))
3265 /* Determine which parameter packs will be expanded in this
3267 cp_walk_tree (&TREE_VALUE (value
), &find_parameter_packs_r
,
3272 pointer_set_destroy (ppd
.visited
);
3274 /* Create the pack expansion type for the base type. */
3275 purpose
= cxx_make_type (TYPE_PACK_EXPANSION
);
3276 SET_PACK_EXPANSION_PATTERN (purpose
, TREE_PURPOSE (arg
));
3277 PACK_EXPANSION_PARAMETER_PACKS (purpose
) = parameter_packs
;
3279 /* Just use structural equality for these TYPE_PACK_EXPANSIONS;
3280 they will rarely be compared to anything. */
3281 SET_TYPE_STRUCTURAL_EQUALITY (purpose
);
3283 return tree_cons (purpose
, TREE_VALUE (arg
), NULL_TREE
);
3286 if (TYPE_P (arg
) || TREE_CODE (arg
) == TEMPLATE_DECL
)
3289 /* Build the PACK_EXPANSION_* node. */
3291 ? cxx_make_type (TYPE_PACK_EXPANSION
)
3292 : make_node (EXPR_PACK_EXPANSION
);
3293 SET_PACK_EXPANSION_PATTERN (result
, arg
);
3294 if (TREE_CODE (result
) == EXPR_PACK_EXPANSION
)
3296 /* Propagate type and const-expression information. */
3297 TREE_TYPE (result
) = TREE_TYPE (arg
);
3298 TREE_CONSTANT (result
) = TREE_CONSTANT (arg
);
3301 /* Just use structural equality for these TYPE_PACK_EXPANSIONS;
3302 they will rarely be compared to anything. */
3303 SET_TYPE_STRUCTURAL_EQUALITY (result
);
3305 /* Determine which parameter packs will be expanded. */
3306 ppd
.parameter_packs
= ¶meter_packs
;
3307 ppd
.visited
= pointer_set_create ();
3308 cp_walk_tree (&arg
, &find_parameter_packs_r
, &ppd
, ppd
.visited
);
3309 pointer_set_destroy (ppd
.visited
);
3311 /* Make sure we found some parameter packs. */
3312 if (parameter_packs
== NULL_TREE
)
3315 error ("expansion pattern %<%T%> contains no argument packs", arg
);
3317 error ("expansion pattern %<%E%> contains no argument packs", arg
);
3318 return error_mark_node
;
3320 PACK_EXPANSION_PARAMETER_PACKS (result
) = parameter_packs
;
3322 PACK_EXPANSION_LOCAL_P (result
) = at_function_scope_p ();
3327 /* Checks T for any "bare" parameter packs, which have not yet been
3328 expanded, and issues an error if any are found. This operation can
3329 only be done on full expressions or types (e.g., an expression
3330 statement, "if" condition, etc.), because we could have expressions like:
3332 foo(f(g(h(args)))...)
3334 where "args" is a parameter pack. check_for_bare_parameter_packs
3335 should not be called for the subexpressions args, h(args),
3336 g(h(args)), or f(g(h(args))), because we would produce erroneous
3339 Returns TRUE and emits an error if there were bare parameter packs,
3340 returns FALSE otherwise. */
3342 check_for_bare_parameter_packs (tree t
)
3344 tree parameter_packs
= NULL_TREE
;
3345 struct find_parameter_pack_data ppd
;
3347 if (!processing_template_decl
|| !t
|| t
== error_mark_node
)
3350 if (TREE_CODE (t
) == TYPE_DECL
)
3353 ppd
.parameter_packs
= ¶meter_packs
;
3354 ppd
.visited
= pointer_set_create ();
3355 cp_walk_tree (&t
, &find_parameter_packs_r
, &ppd
, ppd
.visited
);
3356 pointer_set_destroy (ppd
.visited
);
3358 if (parameter_packs
)
3360 error ("parameter packs not expanded with %<...%>:");
3361 while (parameter_packs
)
3363 tree pack
= TREE_VALUE (parameter_packs
);
3364 tree name
= NULL_TREE
;
3366 if (TREE_CODE (pack
) == TEMPLATE_TYPE_PARM
3367 || TREE_CODE (pack
) == TEMPLATE_TEMPLATE_PARM
)
3368 name
= TYPE_NAME (pack
);
3369 else if (TREE_CODE (pack
) == TEMPLATE_PARM_INDEX
)
3370 name
= DECL_NAME (TEMPLATE_PARM_DECL (pack
));
3372 name
= DECL_NAME (pack
);
3375 inform (input_location
, " %qD", name
);
3377 inform (input_location
, " <anonymous>");
3379 parameter_packs
= TREE_CHAIN (parameter_packs
);
3388 /* Expand any parameter packs that occur in the template arguments in
3391 expand_template_argument_pack (tree args
)
3393 tree result_args
= NULL_TREE
;
3394 int in_arg
, out_arg
= 0, nargs
= args
? TREE_VEC_LENGTH (args
) : 0;
3395 int num_result_args
= -1;
3396 int non_default_args_count
= -1;
3398 /* First, determine if we need to expand anything, and the number of
3399 slots we'll need. */
3400 for (in_arg
= 0; in_arg
< nargs
; ++in_arg
)
3402 tree arg
= TREE_VEC_ELT (args
, in_arg
);
3403 if (arg
== NULL_TREE
)
3405 if (ARGUMENT_PACK_P (arg
))
3407 int num_packed
= TREE_VEC_LENGTH (ARGUMENT_PACK_ARGS (arg
));
3408 if (num_result_args
< 0)
3409 num_result_args
= in_arg
+ num_packed
;
3411 num_result_args
+= num_packed
;
3415 if (num_result_args
>= 0)
3420 /* If no expansion is necessary, we're done. */
3421 if (num_result_args
< 0)
3424 /* Expand arguments. */
3425 result_args
= make_tree_vec (num_result_args
);
3426 if (NON_DEFAULT_TEMPLATE_ARGS_COUNT (args
))
3427 non_default_args_count
=
3428 GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (args
);
3429 for (in_arg
= 0; in_arg
< nargs
; ++in_arg
)
3431 tree arg
= TREE_VEC_ELT (args
, in_arg
);
3432 if (ARGUMENT_PACK_P (arg
))
3434 tree packed
= ARGUMENT_PACK_ARGS (arg
);
3435 int i
, num_packed
= TREE_VEC_LENGTH (packed
);
3436 for (i
= 0; i
< num_packed
; ++i
, ++out_arg
)
3437 TREE_VEC_ELT (result_args
, out_arg
) = TREE_VEC_ELT(packed
, i
);
3438 if (non_default_args_count
> 0)
3439 non_default_args_count
+= num_packed
- 1;
3443 TREE_VEC_ELT (result_args
, out_arg
) = arg
;
3447 if (non_default_args_count
>= 0)
3448 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (result_args
, non_default_args_count
);
3452 /* Checks if DECL shadows a template parameter.
3454 [temp.local]: A template-parameter shall not be redeclared within its
3455 scope (including nested scopes).
3457 Emits an error and returns TRUE if the DECL shadows a parameter,
3458 returns FALSE otherwise. */
3461 check_template_shadow (tree decl
)
3465 /* If we're not in a template, we can't possibly shadow a template
3467 if (!current_template_parms
)
3470 /* Figure out what we're shadowing. */
3471 if (TREE_CODE (decl
) == OVERLOAD
)
3472 decl
= OVL_CURRENT (decl
);
3473 olddecl
= innermost_non_namespace_value (DECL_NAME (decl
));
3475 /* If there's no previous binding for this name, we're not shadowing
3476 anything, let alone a template parameter. */
3480 /* If we're not shadowing a template parameter, we're done. Note
3481 that OLDDECL might be an OVERLOAD (or perhaps even an
3482 ERROR_MARK), so we can't just blithely assume it to be a _DECL
3484 if (!DECL_P (olddecl
) || !DECL_TEMPLATE_PARM_P (olddecl
))
3487 /* We check for decl != olddecl to avoid bogus errors for using a
3488 name inside a class. We check TPFI to avoid duplicate errors for
3489 inline member templates. */
3491 || TEMPLATE_PARMS_FOR_INLINE (current_template_parms
))
3494 /* Don't complain about the injected class name, as we've already
3495 complained about the class itself. */
3496 if (DECL_SELF_REFERENCE_P (decl
))
3499 error ("declaration of %q+#D", decl
);
3500 error (" shadows template parm %q+#D", olddecl
);
3504 /* Return a new TEMPLATE_PARM_INDEX with the indicated INDEX, LEVEL,
3505 ORIG_LEVEL, DECL, and TYPE. */
3508 build_template_parm_index (int index
,
3514 tree t
= make_node (TEMPLATE_PARM_INDEX
);
3515 TEMPLATE_PARM_IDX (t
) = index
;
3516 TEMPLATE_PARM_LEVEL (t
) = level
;
3517 TEMPLATE_PARM_ORIG_LEVEL (t
) = orig_level
;
3518 TEMPLATE_PARM_DECL (t
) = decl
;
3519 TREE_TYPE (t
) = type
;
3520 TREE_CONSTANT (t
) = TREE_CONSTANT (decl
);
3521 TREE_READONLY (t
) = TREE_READONLY (decl
);
3526 /* Find the canonical type parameter for the given template type
3527 parameter. Returns the canonical type parameter, which may be TYPE
3528 if no such parameter existed. */
3531 canonical_type_parameter (tree type
)
3534 int idx
= TEMPLATE_TYPE_IDX (type
);
3535 if (!canonical_template_parms
)
3536 vec_alloc (canonical_template_parms
, idx
+1);
3538 while (canonical_template_parms
->length () <= (unsigned)idx
)
3539 vec_safe_push (canonical_template_parms
, NULL_TREE
);
3541 list
= (*canonical_template_parms
)[idx
];
3542 while (list
&& !comptypes (type
, TREE_VALUE (list
), COMPARE_STRUCTURAL
))
3543 list
= TREE_CHAIN (list
);
3546 return TREE_VALUE (list
);
3549 (*canonical_template_parms
)[idx
]
3550 = tree_cons (NULL_TREE
, type
,
3551 (*canonical_template_parms
)[idx
]);
3556 /* Return a TEMPLATE_PARM_INDEX, similar to INDEX, but whose
3557 TEMPLATE_PARM_LEVEL has been decreased by LEVELS. If such a
3558 TEMPLATE_PARM_INDEX already exists, it is returned; otherwise, a
3559 new one is created. */
3562 reduce_template_parm_level (tree index
, tree type
, int levels
, tree args
,
3563 tsubst_flags_t complain
)
3565 if (TEMPLATE_PARM_DESCENDANTS (index
) == NULL_TREE
3566 || (TEMPLATE_PARM_LEVEL (TEMPLATE_PARM_DESCENDANTS (index
))
3567 != TEMPLATE_PARM_LEVEL (index
) - levels
)
3568 || !same_type_p (type
, TREE_TYPE (TEMPLATE_PARM_DESCENDANTS (index
))))
3570 tree orig_decl
= TEMPLATE_PARM_DECL (index
);
3573 decl
= build_decl (DECL_SOURCE_LOCATION (orig_decl
),
3574 TREE_CODE (orig_decl
), DECL_NAME (orig_decl
), type
);
3575 TREE_CONSTANT (decl
) = TREE_CONSTANT (orig_decl
);
3576 TREE_READONLY (decl
) = TREE_READONLY (orig_decl
);
3577 DECL_ARTIFICIAL (decl
) = 1;
3578 SET_DECL_TEMPLATE_PARM_P (decl
);
3580 t
= build_template_parm_index (TEMPLATE_PARM_IDX (index
),
3581 TEMPLATE_PARM_LEVEL (index
) - levels
,
3582 TEMPLATE_PARM_ORIG_LEVEL (index
),
3584 TEMPLATE_PARM_DESCENDANTS (index
) = t
;
3585 TEMPLATE_PARM_PARAMETER_PACK (t
)
3586 = TEMPLATE_PARM_PARAMETER_PACK (index
);
3588 /* Template template parameters need this. */
3589 if (TREE_CODE (decl
) == TEMPLATE_DECL
)
3590 DECL_TEMPLATE_PARMS (decl
) = tsubst_template_parms
3591 (DECL_TEMPLATE_PARMS (TEMPLATE_PARM_DECL (index
)),
3595 return TEMPLATE_PARM_DESCENDANTS (index
);
3598 /* Process information from new template parameter PARM and append it
3599 to the LIST being built. This new parameter is a non-type
3600 parameter iff IS_NON_TYPE is true. This new parameter is a
3601 parameter pack iff IS_PARAMETER_PACK is true. The location of PARM
3602 is in PARM_LOC. NUM_TEMPLATE_PARMS is the size of the template
3603 parameter list PARM belongs to. This is used used to create a
3604 proper canonical type for the type of PARM that is to be created,
3605 iff PARM is a type. If the size is not known, this parameter shall
3609 process_template_parm (tree list
, location_t parm_loc
, tree parm
,
3610 bool is_non_type
, bool is_parameter_pack
)
3617 gcc_assert (TREE_CODE (parm
) == TREE_LIST
);
3618 defval
= TREE_PURPOSE (parm
);
3622 tree p
= tree_last (list
);
3624 if (p
&& TREE_VALUE (p
) != error_mark_node
)
3627 if (TREE_CODE (p
) == TYPE_DECL
|| TREE_CODE (p
) == TEMPLATE_DECL
)
3628 idx
= TEMPLATE_TYPE_IDX (TREE_TYPE (p
));
3630 idx
= TEMPLATE_PARM_IDX (DECL_INITIAL (p
));
3640 parm
= TREE_VALUE (parm
);
3642 SET_DECL_TEMPLATE_PARM_P (parm
);
3644 if (TREE_TYPE (parm
) == error_mark_node
)
3646 err_parm_list
= build_tree_list (defval
, parm
);
3647 TREE_VALUE (err_parm_list
) = error_mark_node
;
3648 return chainon (list
, err_parm_list
);
3654 The top-level cv-qualifiers on the template-parameter are
3655 ignored when determining its type. */
3656 TREE_TYPE (parm
) = TYPE_MAIN_VARIANT (TREE_TYPE (parm
));
3657 if (invalid_nontype_parm_type_p (TREE_TYPE (parm
), 1))
3659 err_parm_list
= build_tree_list (defval
, parm
);
3660 TREE_VALUE (err_parm_list
) = error_mark_node
;
3661 return chainon (list
, err_parm_list
);
3664 if (uses_parameter_packs (TREE_TYPE (parm
)) && !is_parameter_pack
)
3666 /* This template parameter is not a parameter pack, but it
3667 should be. Complain about "bare" parameter packs. */
3668 check_for_bare_parameter_packs (TREE_TYPE (parm
));
3670 /* Recover by calling this a parameter pack. */
3671 is_parameter_pack
= true;
3675 /* A template parameter is not modifiable. */
3676 TREE_CONSTANT (parm
) = 1;
3677 TREE_READONLY (parm
) = 1;
3678 decl
= build_decl (parm_loc
,
3679 CONST_DECL
, DECL_NAME (parm
), TREE_TYPE (parm
));
3680 TREE_CONSTANT (decl
) = 1;
3681 TREE_READONLY (decl
) = 1;
3682 DECL_INITIAL (parm
) = DECL_INITIAL (decl
)
3683 = build_template_parm_index (idx
, processing_template_decl
,
3684 processing_template_decl
,
3685 decl
, TREE_TYPE (parm
));
3687 TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
))
3688 = is_parameter_pack
;
3693 parm
= TREE_VALUE (TREE_VALUE (parm
));
3695 if (parm
&& TREE_CODE (parm
) == TEMPLATE_DECL
)
3697 t
= cxx_make_type (TEMPLATE_TEMPLATE_PARM
);
3698 /* This is for distinguishing between real templates and template
3699 template parameters */
3700 TREE_TYPE (parm
) = t
;
3701 TREE_TYPE (DECL_TEMPLATE_RESULT (parm
)) = t
;
3706 t
= cxx_make_type (TEMPLATE_TYPE_PARM
);
3707 /* parm is either IDENTIFIER_NODE or NULL_TREE. */
3708 decl
= build_decl (parm_loc
,
3709 TYPE_DECL
, parm
, t
);
3712 TYPE_NAME (t
) = decl
;
3713 TYPE_STUB_DECL (t
) = decl
;
3715 TEMPLATE_TYPE_PARM_INDEX (t
)
3716 = build_template_parm_index (idx
, processing_template_decl
,
3717 processing_template_decl
,
3718 decl
, TREE_TYPE (parm
));
3719 TEMPLATE_TYPE_PARAMETER_PACK (t
) = is_parameter_pack
;
3720 TYPE_CANONICAL (t
) = canonical_type_parameter (t
);
3722 DECL_ARTIFICIAL (decl
) = 1;
3723 SET_DECL_TEMPLATE_PARM_P (decl
);
3725 parm
= build_tree_list (defval
, parm
);
3726 return chainon (list
, parm
);
3729 /* The end of a template parameter list has been reached. Process the
3730 tree list into a parameter vector, converting each parameter into a more
3731 useful form. Type parameters are saved as IDENTIFIER_NODEs, and others
3735 end_template_parm_list (tree parms
)
3739 tree saved_parmlist
= make_tree_vec (list_length (parms
));
3741 current_template_parms
3742 = tree_cons (size_int (processing_template_decl
),
3743 saved_parmlist
, current_template_parms
);
3745 for (parm
= parms
, nparms
= 0; parm
; parm
= next
, nparms
++)
3747 next
= TREE_CHAIN (parm
);
3748 TREE_VEC_ELT (saved_parmlist
, nparms
) = parm
;
3749 TREE_CHAIN (parm
) = NULL_TREE
;
3752 --processing_template_parmlist
;
3754 return saved_parmlist
;
3757 /* end_template_decl is called after a template declaration is seen. */
3760 end_template_decl (void)
3762 reset_specialization ();
3764 if (! processing_template_decl
)
3767 /* This matches the pushlevel in begin_template_parm_list. */
3770 --processing_template_decl
;
3771 current_template_parms
= TREE_CHAIN (current_template_parms
);
3774 /* Takes a TREE_LIST representing a template parameter and convert it
3775 into an argument suitable to be passed to the type substitution
3776 functions. Note that If the TREE_LIST contains an error_mark
3777 node, the returned argument is error_mark_node. */
3780 template_parm_to_arg (tree t
)
3784 || TREE_CODE (t
) != TREE_LIST
)
3787 if (error_operand_p (TREE_VALUE (t
)))
3788 return error_mark_node
;
3792 if (TREE_CODE (t
) == TYPE_DECL
3793 || TREE_CODE (t
) == TEMPLATE_DECL
)
3797 if (TEMPLATE_TYPE_PARAMETER_PACK (t
))
3799 /* Turn this argument into a TYPE_ARGUMENT_PACK
3800 with a single element, which expands T. */
3801 tree vec
= make_tree_vec (1);
3802 #ifdef ENABLE_CHECKING
3803 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT
3804 (vec
, TREE_VEC_LENGTH (vec
));
3806 TREE_VEC_ELT (vec
, 0) = make_pack_expansion (t
);
3808 t
= cxx_make_type (TYPE_ARGUMENT_PACK
);
3809 SET_ARGUMENT_PACK_ARGS (t
, vec
);
3814 t
= DECL_INITIAL (t
);
3816 if (TEMPLATE_PARM_PARAMETER_PACK (t
))
3818 /* Turn this argument into a NONTYPE_ARGUMENT_PACK
3819 with a single element, which expands T. */
3820 tree vec
= make_tree_vec (1);
3821 tree type
= TREE_TYPE (TEMPLATE_PARM_DECL (t
));
3822 #ifdef ENABLE_CHECKING
3823 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT
3824 (vec
, TREE_VEC_LENGTH (vec
));
3826 t
= convert_from_reference (t
);
3827 TREE_VEC_ELT (vec
, 0) = make_pack_expansion (t
);
3829 t
= make_node (NONTYPE_ARGUMENT_PACK
);
3830 SET_ARGUMENT_PACK_ARGS (t
, vec
);
3831 TREE_TYPE (t
) = type
;
3837 /* Given a set of template parameters, return them as a set of template
3838 arguments. The template parameters are represented as a TREE_VEC, in
3839 the form documented in cp-tree.h for template arguments. */
3842 template_parms_to_args (tree parms
)
3845 tree args
= NULL_TREE
;
3846 int length
= TMPL_PARMS_DEPTH (parms
);
3849 /* If there is only one level of template parameters, we do not
3850 create a TREE_VEC of TREE_VECs. Instead, we return a single
3851 TREE_VEC containing the arguments. */
3853 args
= make_tree_vec (length
);
3855 for (header
= parms
; header
; header
= TREE_CHAIN (header
))
3857 tree a
= copy_node (TREE_VALUE (header
));
3860 TREE_TYPE (a
) = NULL_TREE
;
3861 for (i
= TREE_VEC_LENGTH (a
) - 1; i
>= 0; --i
)
3862 TREE_VEC_ELT (a
, i
) = template_parm_to_arg (TREE_VEC_ELT (a
, i
));
3864 #ifdef ENABLE_CHECKING
3865 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (a
, TREE_VEC_LENGTH (a
));
3869 TREE_VEC_ELT (args
, --l
) = a
;
3874 if (length
> 1 && TREE_VEC_ELT (args
, 0) == NULL_TREE
)
3875 /* This can happen for template parms of a template template
3878 template<template<class T, class U> class TT> struct S;
3880 Consider the level of the parms of TT; T and U both have
3881 level 2; TT has no template parm of level 1. So in this case
3882 the first element of full_template_args is NULL_TREE. If we
3883 leave it like this TMPL_ARG_DEPTH on args returns 1 instead
3884 of 2. This will make tsubst wrongly consider that T and U
3885 have level 1. Instead, let's create a dummy vector as the
3886 first element of full_template_args so that TMPL_ARG_DEPTH
3887 returns the correct depth for args. */
3888 TREE_VEC_ELT (args
, 0) = make_tree_vec (1);
3892 /* Within the declaration of a template, return the currently active
3893 template parameters as an argument TREE_VEC. */
3896 current_template_args (void)
3898 return template_parms_to_args (current_template_parms
);
3901 /* Update the declared TYPE by doing any lookups which were thought to be
3902 dependent, but are not now that we know the SCOPE of the declarator. */
3905 maybe_update_decl_type (tree orig_type
, tree scope
)
3907 tree type
= orig_type
;
3909 if (type
== NULL_TREE
)
3912 if (TREE_CODE (orig_type
) == TYPE_DECL
)
3913 type
= TREE_TYPE (type
);
3915 if (scope
&& TYPE_P (scope
) && dependent_type_p (scope
)
3916 && dependent_type_p (type
)
3917 /* Don't bother building up the args in this case. */
3918 && TREE_CODE (type
) != TEMPLATE_TYPE_PARM
)
3920 /* tsubst in the args corresponding to the template parameters,
3921 including auto if present. Most things will be unchanged, but
3922 make_typename_type and tsubst_qualified_id will resolve
3923 TYPENAME_TYPEs and SCOPE_REFs that were previously dependent. */
3924 tree args
= current_template_args ();
3925 tree auto_node
= type_uses_auto (type
);
3929 tree auto_vec
= make_tree_vec (1);
3930 TREE_VEC_ELT (auto_vec
, 0) = auto_node
;
3931 args
= add_to_template_args (args
, auto_vec
);
3933 pushed
= push_scope (scope
);
3934 type
= tsubst (type
, args
, tf_warning_or_error
, NULL_TREE
);
3939 if (type
== error_mark_node
)
3942 if (TREE_CODE (orig_type
) == TYPE_DECL
)
3944 if (same_type_p (type
, TREE_TYPE (orig_type
)))
3947 type
= TYPE_NAME (type
);
3952 /* Return a TEMPLATE_DECL corresponding to DECL, using the indicated
3953 template PARMS. If MEMBER_TEMPLATE_P is true, the new template is
3954 a member template. Used by push_template_decl below. */
3957 build_template_decl (tree decl
, tree parms
, bool member_template_p
)
3959 tree tmpl
= build_lang_decl (TEMPLATE_DECL
, DECL_NAME (decl
), NULL_TREE
);
3960 DECL_TEMPLATE_PARMS (tmpl
) = parms
;
3961 DECL_CONTEXT (tmpl
) = DECL_CONTEXT (decl
);
3962 DECL_SOURCE_LOCATION (tmpl
) = DECL_SOURCE_LOCATION (decl
);
3963 DECL_MEMBER_TEMPLATE_P (tmpl
) = member_template_p
;
3968 struct template_parm_data
3970 /* The level of the template parameters we are currently
3974 /* The index of the specialization argument we are currently
3978 /* An array whose size is the number of template parameters. The
3979 elements are nonzero if the parameter has been used in any one
3980 of the arguments processed so far. */
3983 /* An array whose size is the number of template arguments. The
3984 elements are nonzero if the argument makes use of template
3985 parameters of this level. */
3986 int* arg_uses_template_parms
;
3989 /* Subroutine of push_template_decl used to see if each template
3990 parameter in a partial specialization is used in the explicit
3991 argument list. If T is of the LEVEL given in DATA (which is
3992 treated as a template_parm_data*), then DATA->PARMS is marked
3996 mark_template_parm (tree t
, void* data
)
4000 struct template_parm_data
* tpd
= (struct template_parm_data
*) data
;
4002 if (TREE_CODE (t
) == TEMPLATE_PARM_INDEX
)
4004 level
= TEMPLATE_PARM_LEVEL (t
);
4005 idx
= TEMPLATE_PARM_IDX (t
);
4009 level
= TEMPLATE_TYPE_LEVEL (t
);
4010 idx
= TEMPLATE_TYPE_IDX (t
);
4013 if (level
== tpd
->level
)
4015 tpd
->parms
[idx
] = 1;
4016 tpd
->arg_uses_template_parms
[tpd
->current_arg
] = 1;
4019 /* Return zero so that for_each_template_parm will continue the
4020 traversal of the tree; we want to mark *every* template parm. */
4024 /* Process the partial specialization DECL. */
4027 process_partial_specialization (tree decl
)
4029 tree type
= TREE_TYPE (decl
);
4030 tree maintmpl
= CLASSTYPE_TI_TEMPLATE (type
);
4031 tree specargs
= CLASSTYPE_TI_ARGS (type
);
4032 tree inner_args
= INNERMOST_TEMPLATE_ARGS (specargs
);
4033 tree main_inner_parms
= DECL_INNERMOST_TEMPLATE_PARMS (maintmpl
);
4036 int nargs
= TREE_VEC_LENGTH (inner_args
);
4039 bool did_error_intro
= false;
4040 struct template_parm_data tpd
;
4041 struct template_parm_data tpd2
;
4043 gcc_assert (current_template_parms
);
4045 inner_parms
= INNERMOST_TEMPLATE_PARMS (current_template_parms
);
4046 ntparms
= TREE_VEC_LENGTH (inner_parms
);
4048 /* We check that each of the template parameters given in the
4049 partial specialization is used in the argument list to the
4050 specialization. For example:
4052 template <class T> struct S;
4053 template <class T> struct S<T*>;
4055 The second declaration is OK because `T*' uses the template
4056 parameter T, whereas
4058 template <class T> struct S<int>;
4060 is no good. Even trickier is:
4071 The S2<T> declaration is actually invalid; it is a
4072 full-specialization. Of course,
4075 struct S2<T (*)(U)>;
4077 or some such would have been OK. */
4078 tpd
.level
= TMPL_PARMS_DEPTH (current_template_parms
);
4079 tpd
.parms
= XALLOCAVEC (int, ntparms
);
4080 memset (tpd
.parms
, 0, sizeof (int) * ntparms
);
4082 tpd
.arg_uses_template_parms
= XALLOCAVEC (int, nargs
);
4083 memset (tpd
.arg_uses_template_parms
, 0, sizeof (int) * nargs
);
4084 for (i
= 0; i
< nargs
; ++i
)
4086 tpd
.current_arg
= i
;
4087 for_each_template_parm (TREE_VEC_ELT (inner_args
, i
),
4088 &mark_template_parm
,
4091 /*include_nondeduced_p=*/false);
4093 for (i
= 0; i
< ntparms
; ++i
)
4094 if (tpd
.parms
[i
] == 0)
4096 /* One of the template parms was not used in the
4098 if (!did_error_intro
)
4100 error ("template parameters not used in partial specialization:");
4101 did_error_intro
= true;
4104 error (" %qD", TREE_VALUE (TREE_VEC_ELT (inner_parms
, i
)));
4107 if (did_error_intro
)
4108 return error_mark_node
;
4110 /* [temp.class.spec]
4112 The argument list of the specialization shall not be identical to
4113 the implicit argument list of the primary template. */
4114 if (comp_template_args
4116 INNERMOST_TEMPLATE_ARGS (CLASSTYPE_TI_ARGS (TREE_TYPE
4118 error ("partial specialization %qT does not specialize any template arguments", type
);
4120 /* A partial specialization that replaces multiple parameters of the
4121 primary template with a pack expansion is less specialized for those
4123 if (nargs
< DECL_NTPARMS (maintmpl
))
4125 error ("partial specialization is not more specialized than the "
4126 "primary template because it replaces multiple parameters "
4127 "with a pack expansion");
4128 inform (DECL_SOURCE_LOCATION (maintmpl
), "primary template here");
4132 /* [temp.class.spec]
4134 A partially specialized non-type argument expression shall not
4135 involve template parameters of the partial specialization except
4136 when the argument expression is a simple identifier.
4138 The type of a template parameter corresponding to a specialized
4139 non-type argument shall not be dependent on a parameter of the
4142 Also, we verify that pack expansions only occur at the
4143 end of the argument list. */
4144 gcc_assert (nargs
== DECL_NTPARMS (maintmpl
));
4146 for (i
= 0; i
< nargs
; ++i
)
4148 tree parm
= TREE_VALUE (TREE_VEC_ELT (main_inner_parms
, i
));
4149 tree arg
= TREE_VEC_ELT (inner_args
, i
);
4150 tree packed_args
= NULL_TREE
;
4153 if (ARGUMENT_PACK_P (arg
))
4155 /* Extract the arguments from the argument pack. We'll be
4156 iterating over these in the following loop. */
4157 packed_args
= ARGUMENT_PACK_ARGS (arg
);
4158 len
= TREE_VEC_LENGTH (packed_args
);
4161 for (j
= 0; j
< len
; j
++)
4164 /* Get the Jth argument in the parameter pack. */
4165 arg
= TREE_VEC_ELT (packed_args
, j
);
4167 if (PACK_EXPANSION_P (arg
))
4169 /* Pack expansions must come at the end of the
4171 if ((packed_args
&& j
< len
- 1)
4172 || (!packed_args
&& i
< nargs
- 1))
4174 if (TREE_CODE (arg
) == EXPR_PACK_EXPANSION
)
4175 error ("parameter pack argument %qE must be at the "
4176 "end of the template argument list", arg
);
4178 error ("parameter pack argument %qT must be at the "
4179 "end of the template argument list", arg
);
4183 if (TREE_CODE (arg
) == EXPR_PACK_EXPANSION
)
4184 /* We only care about the pattern. */
4185 arg
= PACK_EXPANSION_PATTERN (arg
);
4187 if (/* These first two lines are the `non-type' bit. */
4189 && TREE_CODE (arg
) != TEMPLATE_DECL
4190 /* This next line is the `argument expression is not just a
4191 simple identifier' condition and also the `specialized
4192 non-type argument' bit. */
4193 && TREE_CODE (arg
) != TEMPLATE_PARM_INDEX
)
4195 if ((!packed_args
&& tpd
.arg_uses_template_parms
[i
])
4196 || (packed_args
&& uses_template_parms (arg
)))
4197 error ("template argument %qE involves template parameter(s)",
4201 /* Look at the corresponding template parameter,
4202 marking which template parameters its type depends
4204 tree type
= TREE_TYPE (parm
);
4208 /* We haven't yet initialized TPD2. Do so now. */
4209 tpd2
.arg_uses_template_parms
= XALLOCAVEC (int, nargs
);
4210 /* The number of parameters here is the number in the
4211 main template, which, as checked in the assertion
4213 tpd2
.parms
= XALLOCAVEC (int, nargs
);
4215 TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (maintmpl
));
4218 /* Mark the template parameters. But this time, we're
4219 looking for the template parameters of the main
4220 template, not in the specialization. */
4221 tpd2
.current_arg
= i
;
4222 tpd2
.arg_uses_template_parms
[i
] = 0;
4223 memset (tpd2
.parms
, 0, sizeof (int) * nargs
);
4224 for_each_template_parm (type
,
4225 &mark_template_parm
,
4228 /*include_nondeduced_p=*/false);
4230 if (tpd2
.arg_uses_template_parms
[i
])
4232 /* The type depended on some template parameters.
4233 If they are fully specialized in the
4234 specialization, that's OK. */
4237 for (j
= 0; j
< nargs
; ++j
)
4238 if (tpd2
.parms
[j
] != 0
4239 && tpd
.arg_uses_template_parms
[j
])
4242 error_n (input_location
, count
,
4243 "type %qT of template argument %qE depends "
4244 "on a template parameter",
4245 "type %qT of template argument %qE depends "
4246 "on template parameters",
4255 /* We should only get here once. */
4256 gcc_assert (!COMPLETE_TYPE_P (type
));
4258 DECL_TEMPLATE_SPECIALIZATIONS (maintmpl
)
4259 = tree_cons (specargs
, inner_parms
,
4260 DECL_TEMPLATE_SPECIALIZATIONS (maintmpl
));
4261 TREE_TYPE (DECL_TEMPLATE_SPECIALIZATIONS (maintmpl
)) = type
;
4263 for (inst
= DECL_TEMPLATE_INSTANTIATIONS (maintmpl
); inst
;
4264 inst
= TREE_CHAIN (inst
))
4266 tree inst_type
= TREE_VALUE (inst
);
4267 if (COMPLETE_TYPE_P (inst_type
)
4268 && CLASSTYPE_IMPLICIT_INSTANTIATION (inst_type
))
4270 tree spec
= most_specialized_class (inst_type
, tf_none
);
4271 if (spec
&& TREE_TYPE (spec
) == type
)
4272 permerror (input_location
,
4273 "partial specialization of %qT after instantiation "
4274 "of %qT", type
, inst_type
);
4281 /* Check that a template declaration's use of default arguments and
4282 parameter packs is not invalid. Here, PARMS are the template
4283 parameters. IS_PRIMARY is true if DECL is the thing declared by
4284 a primary template. IS_PARTIAL is true if DECL is a partial
4287 IS_FRIEND_DECL is nonzero if DECL is a friend function template
4288 declaration (but not a definition); 1 indicates a declaration, 2
4289 indicates a redeclaration. When IS_FRIEND_DECL=2, no errors are
4290 emitted for extraneous default arguments.
4292 Returns TRUE if there were no errors found, FALSE otherwise. */
4295 check_default_tmpl_args (tree decl
, tree parms
, bool is_primary
,
4296 bool is_partial
, int is_friend_decl
)
4299 int last_level_to_check
;
4301 bool no_errors
= true;
4305 A default template-argument shall not be specified in a
4306 function template declaration or a function template definition, nor
4307 in the template-parameter-list of the definition of a member of a
4310 if (TREE_CODE (CP_DECL_CONTEXT (decl
)) == FUNCTION_DECL
)
4311 /* You can't have a function template declaration in a local
4312 scope, nor you can you define a member of a class template in a
4316 if (TREE_CODE (decl
) == TYPE_DECL
4318 && LAMBDA_TYPE_P (TREE_TYPE (decl
)))
4319 /* A lambda doesn't have an explicit declaration; don't complain
4320 about the parms of the enclosing class. */
4323 if (current_class_type
4324 && !TYPE_BEING_DEFINED (current_class_type
)
4325 && DECL_LANG_SPECIFIC (decl
)
4326 && DECL_DECLARES_FUNCTION_P (decl
)
4327 /* If this is either a friend defined in the scope of the class
4328 or a member function. */
4329 && (DECL_FUNCTION_MEMBER_P (decl
)
4330 ? same_type_p (DECL_CONTEXT (decl
), current_class_type
)
4331 : DECL_FRIEND_CONTEXT (decl
)
4332 ? same_type_p (DECL_FRIEND_CONTEXT (decl
), current_class_type
)
4334 /* And, if it was a member function, it really was defined in
4335 the scope of the class. */
4336 && (!DECL_FUNCTION_MEMBER_P (decl
)
4337 || DECL_INITIALIZED_IN_CLASS_P (decl
)))
4338 /* We already checked these parameters when the template was
4339 declared, so there's no need to do it again now. This function
4340 was defined in class scope, but we're processing it's body now
4341 that the class is complete. */
4344 /* Core issue 226 (C++0x only): the following only applies to class
4347 && ((cxx_dialect
== cxx98
) || TREE_CODE (decl
) != FUNCTION_DECL
))
4351 If a template-parameter has a default template-argument, all
4352 subsequent template-parameters shall have a default
4353 template-argument supplied. */
4354 for (parm_level
= parms
; parm_level
; parm_level
= TREE_CHAIN (parm_level
))
4356 tree inner_parms
= TREE_VALUE (parm_level
);
4357 int ntparms
= TREE_VEC_LENGTH (inner_parms
);
4358 int seen_def_arg_p
= 0;
4361 for (i
= 0; i
< ntparms
; ++i
)
4363 tree parm
= TREE_VEC_ELT (inner_parms
, i
);
4365 if (parm
== error_mark_node
)
4368 if (TREE_PURPOSE (parm
))
4370 else if (seen_def_arg_p
4371 && !template_parameter_pack_p (TREE_VALUE (parm
)))
4373 error ("no default argument for %qD", TREE_VALUE (parm
));
4374 /* For better subsequent error-recovery, we indicate that
4375 there should have been a default argument. */
4376 TREE_PURPOSE (parm
) = error_mark_node
;
4379 else if (!is_partial
4381 /* Don't complain about an enclosing partial
4383 && parm_level
== parms
4384 && TREE_CODE (decl
) == TYPE_DECL
4386 && template_parameter_pack_p (TREE_VALUE (parm
)))
4388 /* A primary class template can only have one
4389 parameter pack, at the end of the template
4392 if (TREE_CODE (TREE_VALUE (parm
)) == PARM_DECL
)
4393 error ("parameter pack %qE must be at the end of the"
4394 " template parameter list", TREE_VALUE (parm
));
4396 error ("parameter pack %qT must be at the end of the"
4397 " template parameter list",
4398 TREE_TYPE (TREE_VALUE (parm
)));
4400 TREE_VALUE (TREE_VEC_ELT (inner_parms
, i
))
4408 if (((cxx_dialect
== cxx98
) && TREE_CODE (decl
) != TYPE_DECL
)
4412 /* For an ordinary class template, default template arguments are
4413 allowed at the innermost level, e.g.:
4414 template <class T = int>
4416 but, in a partial specialization, they're not allowed even
4417 there, as we have in [temp.class.spec]:
4419 The template parameter list of a specialization shall not
4420 contain default template argument values.
4422 So, for a partial specialization, or for a function template
4423 (in C++98/C++03), we look at all of them. */
4426 /* But, for a primary class template that is not a partial
4427 specialization we look at all template parameters except the
4429 parms
= TREE_CHAIN (parms
);
4431 /* Figure out what error message to issue. */
4432 if (is_friend_decl
== 2)
4433 msg
= G_("default template arguments may not be used in function template "
4434 "friend re-declaration");
4435 else if (is_friend_decl
)
4436 msg
= G_("default template arguments may not be used in function template "
4437 "friend declarations");
4438 else if (TREE_CODE (decl
) == FUNCTION_DECL
&& (cxx_dialect
== cxx98
))
4439 msg
= G_("default template arguments may not be used in function templates "
4440 "without -std=c++11 or -std=gnu++11");
4441 else if (is_partial
)
4442 msg
= G_("default template arguments may not be used in "
4443 "partial specializations");
4445 msg
= G_("default argument for template parameter for class enclosing %qD");
4447 if (current_class_type
&& TYPE_BEING_DEFINED (current_class_type
))
4448 /* If we're inside a class definition, there's no need to
4449 examine the parameters to the class itself. On the one
4450 hand, they will be checked when the class is defined, and,
4451 on the other, default arguments are valid in things like:
4452 template <class T = double>
4453 struct S { template <class U> void f(U); };
4454 Here the default argument for `S' has no bearing on the
4455 declaration of `f'. */
4456 last_level_to_check
= template_class_depth (current_class_type
) + 1;
4458 /* Check everything. */
4459 last_level_to_check
= 0;
4461 for (parm_level
= parms
;
4462 parm_level
&& TMPL_PARMS_DEPTH (parm_level
) >= last_level_to_check
;
4463 parm_level
= TREE_CHAIN (parm_level
))
4465 tree inner_parms
= TREE_VALUE (parm_level
);
4469 ntparms
= TREE_VEC_LENGTH (inner_parms
);
4470 for (i
= 0; i
< ntparms
; ++i
)
4472 if (TREE_VEC_ELT (inner_parms
, i
) == error_mark_node
)
4475 if (TREE_PURPOSE (TREE_VEC_ELT (inner_parms
, i
)))
4480 if (is_friend_decl
== 2)
4487 /* Clear out the default argument so that we are not
4489 TREE_PURPOSE (TREE_VEC_ELT (inner_parms
, i
)) = NULL_TREE
;
4493 /* At this point, if we're still interested in issuing messages,
4494 they must apply to classes surrounding the object declared. */
4496 msg
= G_("default argument for template parameter for class "
4503 /* Worker for push_template_decl_real, called via
4504 for_each_template_parm. DATA is really an int, indicating the
4505 level of the parameters we are interested in. If T is a template
4506 parameter of that level, return nonzero. */
4509 template_parm_this_level_p (tree t
, void* data
)
4511 int this_level
= *(int *)data
;
4514 if (TREE_CODE (t
) == TEMPLATE_PARM_INDEX
)
4515 level
= TEMPLATE_PARM_LEVEL (t
);
4517 level
= TEMPLATE_TYPE_LEVEL (t
);
4518 return level
== this_level
;
4521 /* Creates a TEMPLATE_DECL for the indicated DECL using the template
4522 parameters given by current_template_args, or reuses a
4523 previously existing one, if appropriate. Returns the DECL, or an
4524 equivalent one, if it is replaced via a call to duplicate_decls.
4526 If IS_FRIEND is true, DECL is a friend declaration. */
4529 push_template_decl_real (tree decl
, bool is_friend
)
4537 int new_template_p
= 0;
4538 /* True if the template is a member template, in the sense of
4540 bool member_template_p
= false;
4542 if (decl
== error_mark_node
|| !current_template_parms
)
4543 return error_mark_node
;
4545 /* See if this is a partial specialization. */
4546 is_partial
= (DECL_IMPLICIT_TYPEDEF_P (decl
)
4547 && TREE_CODE (TREE_TYPE (decl
)) != ENUMERAL_TYPE
4548 && CLASSTYPE_TEMPLATE_SPECIALIZATION (TREE_TYPE (decl
)));
4550 if (TREE_CODE (decl
) == FUNCTION_DECL
&& DECL_FRIEND_P (decl
))
4554 /* For a friend, we want the context of the friend function, not
4555 the type of which it is a friend. */
4556 ctx
= CP_DECL_CONTEXT (decl
);
4557 else if (CP_DECL_CONTEXT (decl
)
4558 && TREE_CODE (CP_DECL_CONTEXT (decl
)) != NAMESPACE_DECL
)
4559 /* In the case of a virtual function, we want the class in which
4561 ctx
= CP_DECL_CONTEXT (decl
);
4563 /* Otherwise, if we're currently defining some class, the DECL
4564 is assumed to be a member of the class. */
4565 ctx
= current_scope ();
4567 if (ctx
&& TREE_CODE (ctx
) == NAMESPACE_DECL
)
4570 if (!DECL_CONTEXT (decl
))
4571 DECL_CONTEXT (decl
) = FROB_CONTEXT (current_namespace
);
4573 /* See if this is a primary template. */
4574 if (is_friend
&& ctx
)
4575 /* A friend template that specifies a class context, i.e.
4576 template <typename T> friend void A<T>::f();
4580 is_primary
= template_parm_scope_p ();
4584 if (DECL_CLASS_SCOPE_P (decl
))
4585 member_template_p
= true;
4586 if (TREE_CODE (decl
) == TYPE_DECL
4587 && ANON_AGGRNAME_P (DECL_NAME (decl
)))
4589 error ("template class without a name");
4590 return error_mark_node
;
4592 else if (TREE_CODE (decl
) == FUNCTION_DECL
)
4594 if (DECL_DESTRUCTOR_P (decl
))
4598 A destructor shall not be a member template. */
4599 error ("destructor %qD declared as member template", decl
);
4600 return error_mark_node
;
4602 if (NEW_DELETE_OPNAME_P (DECL_NAME (decl
))
4603 && (!prototype_p (TREE_TYPE (decl
))
4604 || TYPE_ARG_TYPES (TREE_TYPE (decl
)) == void_list_node
4605 || !TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (decl
)))
4606 || (TREE_CHAIN (TYPE_ARG_TYPES ((TREE_TYPE (decl
))))
4607 == void_list_node
)))
4609 /* [basic.stc.dynamic.allocation]
4611 An allocation function can be a function
4612 template. ... Template allocation functions shall
4613 have two or more parameters. */
4614 error ("invalid template declaration of %qD", decl
);
4615 return error_mark_node
;
4618 else if (DECL_IMPLICIT_TYPEDEF_P (decl
)
4619 && CLASS_TYPE_P (TREE_TYPE (decl
)))
4621 else if (TREE_CODE (decl
) == TYPE_DECL
4622 && TYPE_DECL_ALIAS_P (decl
))
4623 /* alias-declaration */
4624 gcc_assert (!DECL_ARTIFICIAL (decl
));
4627 error ("template declaration of %q#D", decl
);
4628 return error_mark_node
;
4632 /* Check to see that the rules regarding the use of default
4633 arguments are not being violated. */
4634 check_default_tmpl_args (decl
, current_template_parms
,
4635 is_primary
, is_partial
, /*is_friend_decl=*/0);
4637 /* Ensure that there are no parameter packs in the type of this
4638 declaration that have not been expanded. */
4639 if (TREE_CODE (decl
) == FUNCTION_DECL
)
4641 /* Check each of the arguments individually to see if there are
4642 any bare parameter packs. */
4643 tree type
= TREE_TYPE (decl
);
4644 tree arg
= DECL_ARGUMENTS (decl
);
4645 tree argtype
= TYPE_ARG_TYPES (type
);
4647 while (arg
&& argtype
)
4649 if (!FUNCTION_PARAMETER_PACK_P (arg
)
4650 && check_for_bare_parameter_packs (TREE_TYPE (arg
)))
4652 /* This is a PARM_DECL that contains unexpanded parameter
4653 packs. We have already complained about this in the
4654 check_for_bare_parameter_packs call, so just replace
4655 these types with ERROR_MARK_NODE. */
4656 TREE_TYPE (arg
) = error_mark_node
;
4657 TREE_VALUE (argtype
) = error_mark_node
;
4660 arg
= DECL_CHAIN (arg
);
4661 argtype
= TREE_CHAIN (argtype
);
4664 /* Check for bare parameter packs in the return type and the
4665 exception specifiers. */
4666 if (check_for_bare_parameter_packs (TREE_TYPE (type
)))
4667 /* Errors were already issued, set return type to int
4668 as the frontend doesn't expect error_mark_node as
4670 TREE_TYPE (type
) = integer_type_node
;
4671 if (check_for_bare_parameter_packs (TYPE_RAISES_EXCEPTIONS (type
)))
4672 TYPE_RAISES_EXCEPTIONS (type
) = NULL_TREE
;
4674 else if (check_for_bare_parameter_packs ((TREE_CODE (decl
) == TYPE_DECL
4675 && TYPE_DECL_ALIAS_P (decl
))
4676 ? DECL_ORIGINAL_TYPE (decl
)
4677 : TREE_TYPE (decl
)))
4679 TREE_TYPE (decl
) = error_mark_node
;
4680 return error_mark_node
;
4684 return process_partial_specialization (decl
);
4686 args
= current_template_args ();
4689 || TREE_CODE (ctx
) == FUNCTION_DECL
4690 || (CLASS_TYPE_P (ctx
) && TYPE_BEING_DEFINED (ctx
))
4691 || (TREE_CODE (decl
) == TYPE_DECL
4692 && LAMBDA_TYPE_P (TREE_TYPE (decl
)))
4693 || (is_friend
&& !DECL_TEMPLATE_INFO (decl
)))
4695 if (DECL_LANG_SPECIFIC (decl
)
4696 && DECL_TEMPLATE_INFO (decl
)
4697 && DECL_TI_TEMPLATE (decl
))
4698 tmpl
= DECL_TI_TEMPLATE (decl
);
4699 /* If DECL is a TYPE_DECL for a class-template, then there won't
4700 be DECL_LANG_SPECIFIC. The information equivalent to
4701 DECL_TEMPLATE_INFO is found in TYPE_TEMPLATE_INFO instead. */
4702 else if (DECL_IMPLICIT_TYPEDEF_P (decl
)
4703 && TYPE_TEMPLATE_INFO (TREE_TYPE (decl
))
4704 && TYPE_TI_TEMPLATE (TREE_TYPE (decl
)))
4706 /* Since a template declaration already existed for this
4707 class-type, we must be redeclaring it here. Make sure
4708 that the redeclaration is valid. */
4709 redeclare_class_template (TREE_TYPE (decl
),
4710 current_template_parms
);
4711 /* We don't need to create a new TEMPLATE_DECL; just use the
4712 one we already had. */
4713 tmpl
= TYPE_TI_TEMPLATE (TREE_TYPE (decl
));
4717 tmpl
= build_template_decl (decl
, current_template_parms
,
4721 if (DECL_LANG_SPECIFIC (decl
)
4722 && DECL_TEMPLATE_SPECIALIZATION (decl
))
4724 /* A specialization of a member template of a template
4726 SET_DECL_TEMPLATE_SPECIALIZATION (tmpl
);
4727 DECL_TEMPLATE_INFO (tmpl
) = DECL_TEMPLATE_INFO (decl
);
4728 DECL_TEMPLATE_INFO (decl
) = NULL_TREE
;
4734 tree a
, t
, current
, parms
;
4736 tree tinfo
= get_template_info (decl
);
4740 error ("template definition of non-template %q#D", decl
);
4741 return error_mark_node
;
4744 tmpl
= TI_TEMPLATE (tinfo
);
4746 if (DECL_FUNCTION_TEMPLATE_P (tmpl
)
4747 && DECL_TEMPLATE_INFO (decl
) && DECL_TI_ARGS (decl
)
4748 && DECL_TEMPLATE_SPECIALIZATION (decl
)
4749 && DECL_MEMBER_TEMPLATE_P (tmpl
))
4753 /* The declaration is a specialization of a member
4754 template, declared outside the class. Therefore, the
4755 innermost template arguments will be NULL, so we
4756 replace them with the arguments determined by the
4757 earlier call to check_explicit_specialization. */
4758 args
= DECL_TI_ARGS (decl
);
4761 = build_template_decl (decl
, current_template_parms
,
4763 DECL_TEMPLATE_RESULT (new_tmpl
) = decl
;
4764 TREE_TYPE (new_tmpl
) = TREE_TYPE (decl
);
4765 DECL_TI_TEMPLATE (decl
) = new_tmpl
;
4766 SET_DECL_TEMPLATE_SPECIALIZATION (new_tmpl
);
4767 DECL_TEMPLATE_INFO (new_tmpl
)
4768 = build_template_info (tmpl
, args
);
4770 register_specialization (new_tmpl
,
4771 most_general_template (tmpl
),
4777 /* Make sure the template headers we got make sense. */
4779 parms
= DECL_TEMPLATE_PARMS (tmpl
);
4780 i
= TMPL_PARMS_DEPTH (parms
);
4781 if (TMPL_ARGS_DEPTH (args
) != i
)
4783 error ("expected %d levels of template parms for %q#D, got %d",
4784 i
, decl
, TMPL_ARGS_DEPTH (args
));
4787 for (current
= decl
; i
> 0; --i
, parms
= TREE_CHAIN (parms
))
4789 a
= TMPL_ARGS_LEVEL (args
, i
);
4790 t
= INNERMOST_TEMPLATE_PARMS (parms
);
4792 if (TREE_VEC_LENGTH (t
) != TREE_VEC_LENGTH (a
))
4794 if (current
== decl
)
4795 error ("got %d template parameters for %q#D",
4796 TREE_VEC_LENGTH (a
), decl
);
4798 error ("got %d template parameters for %q#T",
4799 TREE_VEC_LENGTH (a
), current
);
4800 error (" but %d required", TREE_VEC_LENGTH (t
));
4801 /* Avoid crash in import_export_decl. */
4802 DECL_INTERFACE_KNOWN (decl
) = 1;
4803 return error_mark_node
;
4806 if (current
== decl
)
4808 else if (current
== NULL_TREE
)
4809 /* Can happen in erroneous input. */
4812 current
= (TYPE_P (current
)
4813 ? TYPE_CONTEXT (current
)
4814 : DECL_CONTEXT (current
));
4817 /* Check that the parms are used in the appropriate qualifying scopes
4818 in the declarator. */
4819 if (!comp_template_args
4821 TI_ARGS (get_template_info (DECL_TEMPLATE_RESULT (tmpl
)))))
4824 template arguments to %qD do not match original template %qD",
4825 decl
, DECL_TEMPLATE_RESULT (tmpl
));
4826 if (!uses_template_parms (TI_ARGS (tinfo
)))
4827 inform (input_location
, "use template<> for an explicit specialization");
4828 /* Avoid crash in import_export_decl. */
4829 DECL_INTERFACE_KNOWN (decl
) = 1;
4830 return error_mark_node
;
4834 DECL_TEMPLATE_RESULT (tmpl
) = decl
;
4835 TREE_TYPE (tmpl
) = TREE_TYPE (decl
);
4837 /* Push template declarations for global functions and types. Note
4838 that we do not try to push a global template friend declared in a
4839 template class; such a thing may well depend on the template
4840 parameters of the class. */
4841 if (new_template_p
&& !ctx
4842 && !(is_friend
&& template_class_depth (current_class_type
) > 0))
4844 tmpl
= pushdecl_namespace_level (tmpl
, is_friend
);
4845 if (tmpl
== error_mark_node
)
4846 return error_mark_node
;
4848 /* Hide template friend classes that haven't been declared yet. */
4849 if (is_friend
&& TREE_CODE (decl
) == TYPE_DECL
)
4851 DECL_ANTICIPATED (tmpl
) = 1;
4852 DECL_FRIEND_P (tmpl
) = 1;
4858 tree parms
= DECL_TEMPLATE_PARMS (tmpl
);
4861 DECL_PRIMARY_TEMPLATE (tmpl
) = tmpl
;
4862 if (DECL_CONV_FN_P (tmpl
))
4864 int depth
= TMPL_PARMS_DEPTH (parms
);
4866 /* It is a conversion operator. See if the type converted to
4867 depends on innermost template operands. */
4869 if (uses_template_parms_level (TREE_TYPE (TREE_TYPE (tmpl
)),
4871 DECL_TEMPLATE_CONV_FN_P (tmpl
) = 1;
4874 /* Give template template parms a DECL_CONTEXT of the template
4875 for which they are a parameter. */
4876 parms
= INNERMOST_TEMPLATE_PARMS (parms
);
4877 for (i
= TREE_VEC_LENGTH (parms
) - 1; i
>= 0; --i
)
4879 tree parm
= TREE_VALUE (TREE_VEC_ELT (parms
, i
));
4880 if (TREE_CODE (parm
) == TEMPLATE_DECL
)
4881 DECL_CONTEXT (parm
) = tmpl
;
4885 /* The DECL_TI_ARGS of DECL contains full set of arguments referring
4886 back to its most general template. If TMPL is a specialization,
4887 ARGS may only have the innermost set of arguments. Add the missing
4888 argument levels if necessary. */
4889 if (DECL_TEMPLATE_INFO (tmpl
))
4890 args
= add_outermost_template_args (DECL_TI_ARGS (tmpl
), args
);
4892 info
= build_template_info (tmpl
, args
);
4894 if (DECL_IMPLICIT_TYPEDEF_P (decl
))
4895 SET_TYPE_TEMPLATE_INFO (TREE_TYPE (tmpl
), info
);
4898 if (is_primary
&& !DECL_LANG_SPECIFIC (decl
))
4899 retrofit_lang_decl (decl
);
4900 if (DECL_LANG_SPECIFIC (decl
))
4901 DECL_TEMPLATE_INFO (decl
) = info
;
4904 return DECL_TEMPLATE_RESULT (tmpl
);
4908 push_template_decl (tree decl
)
4910 return push_template_decl_real (decl
, false);
4913 /* FN is an inheriting constructor that inherits from the constructor
4914 template INHERITED; turn FN into a constructor template with a matching
4918 add_inherited_template_parms (tree fn
, tree inherited
)
4921 = INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (inherited
));
4922 inner_parms
= copy_node (inner_parms
);
4924 = tree_cons (size_int (processing_template_decl
+ 1),
4925 inner_parms
, current_template_parms
);
4926 tree tmpl
= build_template_decl (fn
, parms
, /*member*/true);
4927 tree args
= template_parms_to_args (parms
);
4928 DECL_TEMPLATE_INFO (fn
) = build_template_info (tmpl
, args
);
4929 TREE_TYPE (tmpl
) = TREE_TYPE (fn
);
4930 DECL_TEMPLATE_RESULT (tmpl
) = fn
;
4931 DECL_ARTIFICIAL (tmpl
) = true;
4932 DECL_PRIMARY_TEMPLATE (tmpl
) = tmpl
;
4936 /* Called when a class template TYPE is redeclared with the indicated
4937 template PARMS, e.g.:
4939 template <class T> struct S;
4940 template <class T> struct S {}; */
4943 redeclare_class_template (tree type
, tree parms
)
4949 if (!TYPE_TEMPLATE_INFO (type
))
4951 error ("%qT is not a template type", type
);
4955 tmpl
= TYPE_TI_TEMPLATE (type
);
4956 if (!PRIMARY_TEMPLATE_P (tmpl
))
4957 /* The type is nested in some template class. Nothing to worry
4958 about here; there are no new template parameters for the nested
4964 error ("template specifiers not specified in declaration of %qD",
4969 parms
= INNERMOST_TEMPLATE_PARMS (parms
);
4970 tmpl_parms
= DECL_INNERMOST_TEMPLATE_PARMS (tmpl
);
4972 if (TREE_VEC_LENGTH (parms
) != TREE_VEC_LENGTH (tmpl_parms
))
4974 error_n (input_location
, TREE_VEC_LENGTH (parms
),
4975 "redeclared with %d template parameter",
4976 "redeclared with %d template parameters",
4977 TREE_VEC_LENGTH (parms
));
4978 inform_n (input_location
, TREE_VEC_LENGTH (tmpl_parms
),
4979 "previous declaration %q+D used %d template parameter",
4980 "previous declaration %q+D used %d template parameters",
4981 tmpl
, TREE_VEC_LENGTH (tmpl_parms
));
4985 for (i
= 0; i
< TREE_VEC_LENGTH (tmpl_parms
); ++i
)
4992 if (TREE_VEC_ELT (tmpl_parms
, i
) == error_mark_node
4993 || TREE_VEC_ELT (parms
, i
) == error_mark_node
)
4996 tmpl_parm
= TREE_VALUE (TREE_VEC_ELT (tmpl_parms
, i
));
4997 if (tmpl_parm
== error_mark_node
)
5000 parm
= TREE_VALUE (TREE_VEC_ELT (parms
, i
));
5001 tmpl_default
= TREE_PURPOSE (TREE_VEC_ELT (tmpl_parms
, i
));
5002 parm_default
= TREE_PURPOSE (TREE_VEC_ELT (parms
, i
));
5004 /* TMPL_PARM and PARM can be either TYPE_DECL, PARM_DECL, or
5006 if (TREE_CODE (tmpl_parm
) != TREE_CODE (parm
)
5007 || (TREE_CODE (tmpl_parm
) != TYPE_DECL
5008 && !same_type_p (TREE_TYPE (tmpl_parm
), TREE_TYPE (parm
)))
5009 || (TREE_CODE (tmpl_parm
) != PARM_DECL
5010 && (TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (tmpl_parm
))
5011 != TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (parm
))))
5012 || (TREE_CODE (tmpl_parm
) == PARM_DECL
5013 && (TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (tmpl_parm
))
5014 != TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
)))))
5016 error ("template parameter %q+#D", tmpl_parm
);
5017 error ("redeclared here as %q#D", parm
);
5021 if (tmpl_default
!= NULL_TREE
&& parm_default
!= NULL_TREE
)
5023 /* We have in [temp.param]:
5025 A template-parameter may not be given default arguments
5026 by two different declarations in the same scope. */
5027 error_at (input_location
, "redefinition of default argument for %q#D", parm
);
5028 inform (DECL_SOURCE_LOCATION (tmpl_parm
),
5029 "original definition appeared here");
5033 if (parm_default
!= NULL_TREE
)
5034 /* Update the previous template parameters (which are the ones
5035 that will really count) with the new default value. */
5036 TREE_PURPOSE (TREE_VEC_ELT (tmpl_parms
, i
)) = parm_default
;
5037 else if (tmpl_default
!= NULL_TREE
)
5038 /* Update the new parameters, too; they'll be used as the
5039 parameters for any members. */
5040 TREE_PURPOSE (TREE_VEC_ELT (parms
, i
)) = tmpl_default
;
5046 /* Simplify EXPR if it is a non-dependent expression. Returns the
5047 (possibly simplified) expression. */
5050 fold_non_dependent_expr_sfinae (tree expr
, tsubst_flags_t complain
)
5052 if (expr
== NULL_TREE
)
5055 /* If we're in a template, but EXPR isn't value dependent, simplify
5056 it. We're supposed to treat:
5058 template <typename T> void f(T[1 + 1]);
5059 template <typename T> void f(T[2]);
5061 as two declarations of the same function, for example. */
5062 if (processing_template_decl
5063 && !type_dependent_expression_p (expr
)
5064 && potential_constant_expression (expr
)
5065 && !value_dependent_expression_p (expr
))
5067 HOST_WIDE_INT saved_processing_template_decl
;
5069 saved_processing_template_decl
= processing_template_decl
;
5070 processing_template_decl
= 0;
5071 expr
= tsubst_copy_and_build (expr
,
5074 /*in_decl=*/NULL_TREE
,
5075 /*function_p=*/false,
5076 /*integral_constant_expression_p=*/true);
5077 processing_template_decl
= saved_processing_template_decl
;
5083 fold_non_dependent_expr (tree expr
)
5085 return fold_non_dependent_expr_sfinae (expr
, tf_error
);
5088 /* Return TRUE iff T is a type alias, a TEMPLATE_DECL for an alias
5089 template declaration, or a TYPE_DECL for an alias declaration. */
5092 alias_type_or_template_p (tree t
)
5096 return ((TREE_CODE (t
) == TYPE_DECL
&& TYPE_DECL_ALIAS_P (t
))
5099 && TYPE_DECL_ALIAS_P (TYPE_NAME (t
)))
5100 || DECL_ALIAS_TEMPLATE_P (t
));
5103 /* Return TRUE iff is a specialization of an alias template. */
5106 alias_template_specialization_p (const_tree t
)
5112 && TYPE_TEMPLATE_INFO (t
)
5113 && PRIMARY_TEMPLATE_P (TYPE_TI_TEMPLATE (t
))
5114 && DECL_ALIAS_TEMPLATE_P (TYPE_TI_TEMPLATE (t
)));
5117 /* Subroutine of convert_nontype_argument. Converts EXPR to TYPE, which
5118 must be a function or a pointer-to-function type, as specified
5119 in [temp.arg.nontype]: disambiguate EXPR if it is an overload set,
5120 and check that the resulting function has external linkage. */
5123 convert_nontype_argument_function (tree type
, tree expr
)
5127 linkage_kind linkage
;
5129 fn
= instantiate_type (type
, fns
, tf_none
);
5130 if (fn
== error_mark_node
)
5131 return error_mark_node
;
5134 if (TREE_CODE (fn_no_ptr
) == ADDR_EXPR
)
5135 fn_no_ptr
= TREE_OPERAND (fn_no_ptr
, 0);
5136 if (BASELINK_P (fn_no_ptr
))
5137 fn_no_ptr
= BASELINK_FUNCTIONS (fn_no_ptr
);
5139 /* [temp.arg.nontype]/1
5141 A template-argument for a non-type, non-template template-parameter
5144 -- the address of an object or function with external [C++11: or
5145 internal] linkage. */
5147 if (TREE_CODE (fn_no_ptr
) != FUNCTION_DECL
)
5149 error ("%qE is not a valid template argument for type %qT", expr
, type
);
5150 if (TREE_CODE (type
) == POINTER_TYPE
)
5151 error ("it must be the address of a function with external linkage");
5153 error ("it must be the name of a function with external linkage");
5157 linkage
= decl_linkage (fn_no_ptr
);
5158 if (cxx_dialect
>= cxx0x
? linkage
== lk_none
: linkage
!= lk_external
)
5160 if (cxx_dialect
>= cxx0x
)
5161 error ("%qE is not a valid template argument for type %qT "
5162 "because %qD has no linkage",
5163 expr
, type
, fn_no_ptr
);
5165 error ("%qE is not a valid template argument for type %qT "
5166 "because %qD does not have external linkage",
5167 expr
, type
, fn_no_ptr
);
5174 /* Subroutine of convert_nontype_argument.
5175 Check if EXPR of type TYPE is a valid pointer-to-member constant.
5176 Emit an error otherwise. */
5179 check_valid_ptrmem_cst_expr (tree type
, tree expr
,
5180 tsubst_flags_t complain
)
5183 if (expr
&& (null_ptr_cst_p (expr
) || TREE_CODE (expr
) == PTRMEM_CST
))
5185 if (cxx_dialect
>= cxx0x
&& null_member_pointer_value_p (expr
))
5187 if (complain
& tf_error
)
5189 error ("%qE is not a valid template argument for type %qT",
5191 error ("it must be a pointer-to-member of the form %<&X::Y%>");
5196 /* Returns TRUE iff the address of OP is value-dependent.
5198 14.6.2.4 [temp.dep.temp]:
5199 A non-integral non-type template-argument is dependent if its type is
5200 dependent or it has either of the following forms
5203 and contains a nested-name-specifier which specifies a class-name that
5204 names a dependent type.
5206 We generalize this to just say that the address of a member of a
5207 dependent class is value-dependent; the above doesn't cover the
5208 address of a static data member named with an unqualified-id. */
5211 has_value_dependent_address (tree op
)
5213 /* We could use get_inner_reference here, but there's no need;
5214 this is only relevant for template non-type arguments, which
5215 can only be expressed as &id-expression. */
5218 tree ctx
= CP_DECL_CONTEXT (op
);
5219 if (TYPE_P (ctx
) && dependent_type_p (ctx
))
5226 /* The next set of functions are used for providing helpful explanatory
5227 diagnostics for failed overload resolution. Their messages should be
5228 indented by two spaces for consistency with the messages in
5232 unify_success (bool /*explain_p*/)
5238 unify_parameter_deduction_failure (bool explain_p
, tree parm
)
5241 inform (input_location
,
5242 " couldn't deduce template parameter %qD", parm
);
5247 unify_invalid (bool /*explain_p*/)
5253 unify_cv_qual_mismatch (bool explain_p
, tree parm
, tree arg
)
5256 inform (input_location
,
5257 " types %qT and %qT have incompatible cv-qualifiers",
5263 unify_type_mismatch (bool explain_p
, tree parm
, tree arg
)
5266 inform (input_location
, " mismatched types %qT and %qT", parm
, arg
);
5271 unify_parameter_pack_mismatch (bool explain_p
, tree parm
, tree arg
)
5274 inform (input_location
,
5275 " template parameter %qD is not a parameter pack, but "
5282 unify_ptrmem_cst_mismatch (bool explain_p
, tree parm
, tree arg
)
5285 inform (input_location
,
5286 " template argument %qE does not match "
5287 "pointer-to-member constant %qE",
5293 unify_expression_unequal (bool explain_p
, tree parm
, tree arg
)
5296 inform (input_location
, " %qE is not equivalent to %qE", parm
, arg
);
5301 unify_parameter_pack_inconsistent (bool explain_p
, tree old_arg
, tree new_arg
)
5304 inform (input_location
,
5305 " inconsistent parameter pack deduction with %qT and %qT",
5311 unify_inconsistency (bool explain_p
, tree parm
, tree first
, tree second
)
5316 inform (input_location
,
5317 " deduced conflicting types for parameter %qT (%qT and %qT)",
5318 parm
, first
, second
);
5320 inform (input_location
,
5321 " deduced conflicting values for non-type parameter "
5322 "%qE (%qE and %qE)", parm
, first
, second
);
5328 unify_vla_arg (bool explain_p
, tree arg
)
5331 inform (input_location
,
5332 " variable-sized array type %qT is not "
5333 "a valid template argument",
5339 unify_method_type_error (bool explain_p
, tree arg
)
5342 inform (input_location
,
5343 " member function type %qT is not a valid template argument",
5349 unify_arity (bool explain_p
, int have
, int wanted
)
5352 inform_n (input_location
, wanted
,
5353 " candidate expects %d argument, %d provided",
5354 " candidate expects %d arguments, %d provided",
5360 unify_too_many_arguments (bool explain_p
, int have
, int wanted
)
5362 return unify_arity (explain_p
, have
, wanted
);
5366 unify_too_few_arguments (bool explain_p
, int have
, int wanted
)
5368 return unify_arity (explain_p
, have
, wanted
);
5372 unify_arg_conversion (bool explain_p
, tree to_type
,
5373 tree from_type
, tree arg
)
5376 inform (input_location
, " cannot convert %qE (type %qT) to type %qT",
5377 arg
, from_type
, to_type
);
5382 unify_no_common_base (bool explain_p
, enum template_base_result r
,
5383 tree parm
, tree arg
)
5388 case tbr_ambiguous_baseclass
:
5389 inform (input_location
, " %qT is an ambiguous base class of %qT",
5393 inform (input_location
, " %qT is not derived from %qT", arg
, parm
);
5400 unify_inconsistent_template_template_parameters (bool explain_p
)
5403 inform (input_location
,
5404 " template parameters of a template template argument are "
5405 "inconsistent with other deduced template arguments");
5410 unify_template_deduction_failure (bool explain_p
, tree parm
, tree arg
)
5413 inform (input_location
,
5414 " can't deduce a template for %qT from non-template type %qT",
5420 unify_template_argument_mismatch (bool explain_p
, tree parm
, tree arg
)
5423 inform (input_location
,
5424 " template argument %qE does not match %qD", arg
, parm
);
5429 unify_overload_resolution_failure (bool explain_p
, tree arg
)
5432 inform (input_location
,
5433 " could not resolve address from overloaded function %qE",
5438 /* Attempt to convert the non-type template parameter EXPR to the
5439 indicated TYPE. If the conversion is successful, return the
5440 converted value. If the conversion is unsuccessful, return
5441 NULL_TREE if we issued an error message, or error_mark_node if we
5442 did not. We issue error messages for out-and-out bad template
5443 parameters, but not simply because the conversion failed, since we
5444 might be just trying to do argument deduction. Both TYPE and EXPR
5445 must be non-dependent.
5447 The conversion follows the special rules described in
5448 [temp.arg.nontype], and it is much more strict than an implicit
5451 This function is called twice for each template argument (see
5452 lookup_template_class for a more accurate description of this
5453 problem). This means that we need to handle expressions which
5454 are not valid in a C++ source, but can be created from the
5455 first call (for instance, casts to perform conversions). These
5456 hacks can go away after we fix the double coercion problem. */
5459 convert_nontype_argument (tree type
, tree expr
, tsubst_flags_t complain
)
5463 /* Detect immediately string literals as invalid non-type argument.
5464 This special-case is not needed for correctness (we would easily
5465 catch this later), but only to provide better diagnostic for this
5466 common user mistake. As suggested by DR 100, we do not mention
5467 linkage issues in the diagnostic as this is not the point. */
5468 /* FIXME we're making this OK. */
5469 if (TREE_CODE (expr
) == STRING_CST
)
5471 if (complain
& tf_error
)
5472 error ("%qE is not a valid template argument for type %qT "
5473 "because string literals can never be used in this context",
5478 /* Add the ADDR_EXPR now for the benefit of
5479 value_dependent_expression_p. */
5480 if (TYPE_PTROBV_P (type
)
5481 && TREE_CODE (TREE_TYPE (expr
)) == ARRAY_TYPE
)
5483 expr
= decay_conversion (expr
, complain
);
5484 if (expr
== error_mark_node
)
5485 return error_mark_node
;
5488 /* If we are in a template, EXPR may be non-dependent, but still
5489 have a syntactic, rather than semantic, form. For example, EXPR
5490 might be a SCOPE_REF, rather than the VAR_DECL to which the
5491 SCOPE_REF refers. Preserving the qualifying scope is necessary
5492 so that access checking can be performed when the template is
5493 instantiated -- but here we need the resolved form so that we can
5494 convert the argument. */
5495 if (TYPE_REF_OBJ_P (type
)
5496 && has_value_dependent_address (expr
))
5497 /* If we want the address and it's value-dependent, don't fold. */;
5498 else if (!type_unknown_p (expr
))
5499 expr
= fold_non_dependent_expr_sfinae (expr
, complain
);
5500 if (error_operand_p (expr
))
5501 return error_mark_node
;
5502 expr_type
= TREE_TYPE (expr
);
5503 if (TREE_CODE (type
) == REFERENCE_TYPE
)
5504 expr
= mark_lvalue_use (expr
);
5506 expr
= mark_rvalue_use (expr
);
5508 /* 14.3.2/5: The null pointer{,-to-member} conversion is applied
5509 to a non-type argument of "nullptr". */
5510 if (expr
== nullptr_node
&& TYPE_PTR_OR_PTRMEM_P (type
))
5511 expr
= convert (type
, expr
);
5513 /* In C++11, integral or enumeration non-type template arguments can be
5514 arbitrary constant expressions. Pointer and pointer to
5515 member arguments can be general constant expressions that evaluate
5516 to a null value, but otherwise still need to be of a specific form. */
5517 if (cxx_dialect
>= cxx0x
)
5519 if (TREE_CODE (expr
) == PTRMEM_CST
)
5520 /* A PTRMEM_CST is already constant, and a valid template
5521 argument for a parameter of pointer to member type, we just want
5522 to leave it in that form rather than lower it to a
5524 else if (INTEGRAL_OR_ENUMERATION_TYPE_P (type
))
5525 expr
= maybe_constant_value (expr
);
5526 else if (TYPE_PTR_OR_PTRMEM_P (type
))
5528 tree folded
= maybe_constant_value (expr
);
5529 if (TYPE_PTR_P (type
) ? integer_zerop (folded
)
5530 : null_member_pointer_value_p (folded
))
5535 /* HACK: Due to double coercion, we can get a
5536 NOP_EXPR<REFERENCE_TYPE>(ADDR_EXPR<POINTER_TYPE> (arg)) here,
5537 which is the tree that we built on the first call (see
5538 below when coercing to reference to object or to reference to
5539 function). We just strip everything and get to the arg.
5540 See g++.old-deja/g++.oliva/template4.C and g++.dg/template/nontype9.C
5542 if (TYPE_REF_OBJ_P (type
) || TYPE_REFFN_P (type
))
5544 tree probe_type
, probe
= expr
;
5545 if (REFERENCE_REF_P (probe
))
5546 probe
= TREE_OPERAND (probe
, 0);
5547 probe_type
= TREE_TYPE (probe
);
5548 if (TREE_CODE (probe
) == NOP_EXPR
)
5550 /* ??? Maybe we could use convert_from_reference here, but we
5551 would need to relax its constraints because the NOP_EXPR
5552 could actually change the type to something more cv-qualified,
5553 and this is not folded by convert_from_reference. */
5554 tree addr
= TREE_OPERAND (probe
, 0);
5555 if (TREE_CODE (probe_type
) == REFERENCE_TYPE
5556 && TREE_CODE (addr
) == ADDR_EXPR
5557 && TREE_CODE (TREE_TYPE (addr
)) == POINTER_TYPE
5558 && (same_type_ignoring_top_level_qualifiers_p
5559 (TREE_TYPE (probe_type
),
5560 TREE_TYPE (TREE_TYPE (addr
)))))
5562 expr
= TREE_OPERAND (addr
, 0);
5563 expr_type
= TREE_TYPE (expr
);
5568 /* We could also generate a NOP_EXPR(ADDR_EXPR()) when the
5569 parameter is a pointer to object, through decay and
5570 qualification conversion. Let's strip everything. */
5571 else if (TREE_CODE (expr
) == NOP_EXPR
&& TYPE_PTROBV_P (type
))
5574 gcc_assert (TREE_CODE (expr
) == ADDR_EXPR
);
5575 gcc_assert (TREE_CODE (TREE_TYPE (expr
)) == POINTER_TYPE
);
5576 /* Skip the ADDR_EXPR only if it is part of the decay for
5577 an array. Otherwise, it is part of the original argument
5578 in the source code. */
5579 if (TREE_CODE (TREE_TYPE (TREE_OPERAND (expr
, 0))) == ARRAY_TYPE
)
5580 expr
= TREE_OPERAND (expr
, 0);
5581 expr_type
= TREE_TYPE (expr
);
5584 /* [temp.arg.nontype]/5, bullet 1
5586 For a non-type template-parameter of integral or enumeration type,
5587 integral promotions (_conv.prom_) and integral conversions
5588 (_conv.integral_) are applied. */
5589 if (INTEGRAL_OR_ENUMERATION_TYPE_P (type
))
5591 tree t
= build_integral_nontype_arg_conv (type
, expr
, complain
);
5592 t
= maybe_constant_value (t
);
5593 if (t
!= error_mark_node
)
5596 if (!same_type_ignoring_top_level_qualifiers_p (type
, TREE_TYPE (expr
)))
5597 return error_mark_node
;
5599 /* Notice that there are constant expressions like '4 % 0' which
5600 do not fold into integer constants. */
5601 if (TREE_CODE (expr
) != INTEGER_CST
)
5603 if (complain
& tf_error
)
5605 int errs
= errorcount
, warns
= warningcount
;
5606 if (processing_template_decl
5607 && !require_potential_constant_expression (expr
))
5609 expr
= cxx_constant_value (expr
);
5610 if (errorcount
> errs
|| warningcount
> warns
)
5611 inform (EXPR_LOC_OR_HERE (expr
),
5612 "in template argument for type %qT ", type
);
5613 if (expr
== error_mark_node
)
5615 /* else cxx_constant_value complained but gave us
5616 a real constant, so go ahead. */
5617 gcc_assert (TREE_CODE (expr
) == INTEGER_CST
);
5623 /* Avoid typedef problems. */
5624 if (TREE_TYPE (expr
) != type
)
5625 expr
= fold_convert (type
, expr
);
5627 /* [temp.arg.nontype]/5, bullet 2
5629 For a non-type template-parameter of type pointer to object,
5630 qualification conversions (_conv.qual_) and the array-to-pointer
5631 conversion (_conv.array_) are applied. */
5632 else if (TYPE_PTROBV_P (type
))
5634 /* [temp.arg.nontype]/1 (TC1 version, DR 49):
5636 A template-argument for a non-type, non-template template-parameter
5637 shall be one of: [...]
5639 -- the name of a non-type template-parameter;
5640 -- the address of an object or function with external linkage, [...]
5641 expressed as "& id-expression" where the & is optional if the name
5642 refers to a function or array, or if the corresponding
5643 template-parameter is a reference.
5645 Here, we do not care about functions, as they are invalid anyway
5646 for a parameter of type pointer-to-object. */
5648 if (DECL_P (expr
) && DECL_TEMPLATE_PARM_P (expr
))
5649 /* Non-type template parameters are OK. */
5651 else if (cxx_dialect
>= cxx0x
&& integer_zerop (expr
))
5652 /* Null pointer values are OK in C++11. */;
5653 else if (TREE_CODE (expr
) != ADDR_EXPR
5654 && TREE_CODE (expr_type
) != ARRAY_TYPE
)
5656 if (TREE_CODE (expr
) == VAR_DECL
)
5658 error ("%qD is not a valid template argument "
5659 "because %qD is a variable, not the address of "
5664 /* Other values, like integer constants, might be valid
5665 non-type arguments of some other type. */
5666 return error_mark_node
;
5672 decl
= ((TREE_CODE (expr
) == ADDR_EXPR
)
5673 ? TREE_OPERAND (expr
, 0) : expr
);
5674 if (TREE_CODE (decl
) != VAR_DECL
)
5676 error ("%qE is not a valid template argument of type %qT "
5677 "because %qE is not a variable",
5681 else if (cxx_dialect
< cxx0x
&& !DECL_EXTERNAL_LINKAGE_P (decl
))
5683 error ("%qE is not a valid template argument of type %qT "
5684 "because %qD does not have external linkage",
5688 else if (cxx_dialect
>= cxx0x
&& decl_linkage (decl
) == lk_none
)
5690 error ("%qE is not a valid template argument of type %qT "
5691 "because %qD has no linkage",
5697 expr
= decay_conversion (expr
, complain
);
5698 if (expr
== error_mark_node
)
5699 return error_mark_node
;
5701 expr
= perform_qualification_conversions (type
, expr
);
5702 if (expr
== error_mark_node
)
5703 return error_mark_node
;
5705 /* [temp.arg.nontype]/5, bullet 3
5707 For a non-type template-parameter of type reference to object, no
5708 conversions apply. The type referred to by the reference may be more
5709 cv-qualified than the (otherwise identical) type of the
5710 template-argument. The template-parameter is bound directly to the
5711 template-argument, which must be an lvalue. */
5712 else if (TYPE_REF_OBJ_P (type
))
5714 if (!same_type_ignoring_top_level_qualifiers_p (TREE_TYPE (type
),
5716 return error_mark_node
;
5718 if (!at_least_as_qualified_p (TREE_TYPE (type
), expr_type
))
5720 error ("%qE is not a valid template argument for type %qT "
5721 "because of conflicts in cv-qualification", expr
, type
);
5725 if (!real_lvalue_p (expr
))
5727 error ("%qE is not a valid template argument for type %qT "
5728 "because it is not an lvalue", expr
, type
);
5732 /* [temp.arg.nontype]/1
5734 A template-argument for a non-type, non-template template-parameter
5735 shall be one of: [...]
5737 -- the address of an object or function with external linkage. */
5738 if (TREE_CODE (expr
) == INDIRECT_REF
5739 && TYPE_REF_OBJ_P (TREE_TYPE (TREE_OPERAND (expr
, 0))))
5741 expr
= TREE_OPERAND (expr
, 0);
5744 error ("%q#D is not a valid template argument for type %qT "
5745 "because a reference variable does not have a constant "
5746 "address", expr
, type
);
5753 error ("%qE is not a valid template argument for type %qT "
5754 "because it is not an object with external linkage",
5759 if (!DECL_EXTERNAL_LINKAGE_P (expr
))
5761 error ("%qE is not a valid template argument for type %qT "
5762 "because object %qD has not external linkage",
5767 expr
= build_nop (type
, build_address (expr
));
5769 /* [temp.arg.nontype]/5, bullet 4
5771 For a non-type template-parameter of type pointer to function, only
5772 the function-to-pointer conversion (_conv.func_) is applied. If the
5773 template-argument represents a set of overloaded functions (or a
5774 pointer to such), the matching function is selected from the set
5776 else if (TYPE_PTRFN_P (type
))
5778 /* If the argument is a template-id, we might not have enough
5779 context information to decay the pointer. */
5780 if (!type_unknown_p (expr_type
))
5782 expr
= decay_conversion (expr
, complain
);
5783 if (expr
== error_mark_node
)
5784 return error_mark_node
;
5787 if (cxx_dialect
>= cxx0x
&& integer_zerop (expr
))
5788 /* Null pointer values are OK in C++11. */
5789 return perform_qualification_conversions (type
, expr
);
5791 expr
= convert_nontype_argument_function (type
, expr
);
5792 if (!expr
|| expr
== error_mark_node
)
5795 /* [temp.arg.nontype]/5, bullet 5
5797 For a non-type template-parameter of type reference to function, no
5798 conversions apply. If the template-argument represents a set of
5799 overloaded functions, the matching function is selected from the set
5801 else if (TYPE_REFFN_P (type
))
5803 if (TREE_CODE (expr
) == ADDR_EXPR
)
5805 error ("%qE is not a valid template argument for type %qT "
5806 "because it is a pointer", expr
, type
);
5807 inform (input_location
, "try using %qE instead", TREE_OPERAND (expr
, 0));
5811 expr
= convert_nontype_argument_function (TREE_TYPE (type
), expr
);
5812 if (!expr
|| expr
== error_mark_node
)
5815 expr
= build_nop (type
, build_address (expr
));
5817 /* [temp.arg.nontype]/5, bullet 6
5819 For a non-type template-parameter of type pointer to member function,
5820 no conversions apply. If the template-argument represents a set of
5821 overloaded member functions, the matching member function is selected
5822 from the set (_over.over_). */
5823 else if (TYPE_PTRMEMFUNC_P (type
))
5825 expr
= instantiate_type (type
, expr
, tf_none
);
5826 if (expr
== error_mark_node
)
5827 return error_mark_node
;
5829 /* [temp.arg.nontype] bullet 1 says the pointer to member
5830 expression must be a pointer-to-member constant. */
5831 if (!check_valid_ptrmem_cst_expr (type
, expr
, complain
))
5832 return error_mark_node
;
5834 /* There is no way to disable standard conversions in
5835 resolve_address_of_overloaded_function (called by
5836 instantiate_type). It is possible that the call succeeded by
5837 converting &B::I to &D::I (where B is a base of D), so we need
5838 to reject this conversion here.
5840 Actually, even if there was a way to disable standard conversions,
5841 it would still be better to reject them here so that we can
5842 provide a superior diagnostic. */
5843 if (!same_type_p (TREE_TYPE (expr
), type
))
5845 error ("%qE is not a valid template argument for type %qT "
5846 "because it is of type %qT", expr
, type
,
5848 /* If we are just one standard conversion off, explain. */
5849 if (can_convert (type
, TREE_TYPE (expr
), complain
))
5850 inform (input_location
,
5851 "standard conversions are not allowed in this context");
5855 /* [temp.arg.nontype]/5, bullet 7
5857 For a non-type template-parameter of type pointer to data member,
5858 qualification conversions (_conv.qual_) are applied. */
5859 else if (TYPE_PTRDATAMEM_P (type
))
5861 /* [temp.arg.nontype] bullet 1 says the pointer to member
5862 expression must be a pointer-to-member constant. */
5863 if (!check_valid_ptrmem_cst_expr (type
, expr
, complain
))
5864 return error_mark_node
;
5866 expr
= perform_qualification_conversions (type
, expr
);
5867 if (expr
== error_mark_node
)
5870 else if (NULLPTR_TYPE_P (type
))
5872 if (expr
!= nullptr_node
)
5874 error ("%qE is not a valid template argument for type %qT "
5875 "because it is of type %qT", expr
, type
, TREE_TYPE (expr
));
5880 /* A template non-type parameter must be one of the above. */
5884 /* Sanity check: did we actually convert the argument to the
5886 gcc_assert (same_type_ignoring_top_level_qualifiers_p
5887 (type
, TREE_TYPE (expr
)));
5891 /* Subroutine of coerce_template_template_parms, which returns 1 if
5892 PARM_PARM and ARG_PARM match using the rule for the template
5893 parameters of template template parameters. Both PARM and ARG are
5894 template parameters; the rest of the arguments are the same as for
5895 coerce_template_template_parms.
5898 coerce_template_template_parm (tree parm
,
5900 tsubst_flags_t complain
,
5904 if (arg
== NULL_TREE
|| arg
== error_mark_node
5905 || parm
== NULL_TREE
|| parm
== error_mark_node
)
5908 if (TREE_CODE (arg
) != TREE_CODE (parm
))
5911 switch (TREE_CODE (parm
))
5914 /* We encounter instantiations of templates like
5915 template <template <template <class> class> class TT>
5918 tree parmparm
= DECL_INNERMOST_TEMPLATE_PARMS (parm
);
5919 tree argparm
= DECL_INNERMOST_TEMPLATE_PARMS (arg
);
5921 if (!coerce_template_template_parms
5922 (parmparm
, argparm
, complain
, in_decl
, outer_args
))
5928 if (TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (arg
))
5929 && !TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (parm
)))
5930 /* Argument is a parameter pack but parameter is not. */
5935 /* The tsubst call is used to handle cases such as
5937 template <int> class C {};
5938 template <class T, template <T> class TT> class D {};
5941 i.e. the parameter list of TT depends on earlier parameters. */
5942 if (!uses_template_parms (TREE_TYPE (arg
))
5944 (tsubst (TREE_TYPE (parm
), outer_args
, complain
, in_decl
),
5948 if (TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (arg
))
5949 && !TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
)))
5950 /* Argument is a parameter pack but parameter is not. */
5963 /* Return 1 if PARM_PARMS and ARG_PARMS matches using rule for
5964 template template parameters. Both PARM_PARMS and ARG_PARMS are
5965 vectors of TREE_LIST nodes containing TYPE_DECL, TEMPLATE_DECL
5968 Consider the example:
5969 template <class T> class A;
5970 template<template <class U> class TT> class B;
5972 For B<A>, PARM_PARMS are the parameters to TT, while ARG_PARMS are
5973 the parameters to A, and OUTER_ARGS contains A. */
5976 coerce_template_template_parms (tree parm_parms
,
5978 tsubst_flags_t complain
,
5982 int nparms
, nargs
, i
;
5986 gcc_assert (TREE_CODE (parm_parms
) == TREE_VEC
);
5987 gcc_assert (TREE_CODE (arg_parms
) == TREE_VEC
);
5989 nparms
= TREE_VEC_LENGTH (parm_parms
);
5990 nargs
= TREE_VEC_LENGTH (arg_parms
);
5992 /* Determine whether we have a parameter pack at the end of the
5993 template template parameter's template parameter list. */
5994 if (TREE_VEC_ELT (parm_parms
, nparms
- 1) != error_mark_node
)
5996 parm
= TREE_VALUE (TREE_VEC_ELT (parm_parms
, nparms
- 1));
5998 if (parm
== error_mark_node
)
6001 switch (TREE_CODE (parm
))
6005 if (TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (parm
)))
6010 if (TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
)))
6020 && !(variadic_p
&& nargs
>= nparms
- 1))
6023 /* Check all of the template parameters except the parameter pack at
6024 the end (if any). */
6025 for (i
= 0; i
< nparms
- variadic_p
; ++i
)
6027 if (TREE_VEC_ELT (parm_parms
, i
) == error_mark_node
6028 || TREE_VEC_ELT (arg_parms
, i
) == error_mark_node
)
6031 parm
= TREE_VALUE (TREE_VEC_ELT (parm_parms
, i
));
6032 arg
= TREE_VALUE (TREE_VEC_ELT (arg_parms
, i
));
6034 if (!coerce_template_template_parm (parm
, arg
, complain
, in_decl
,
6042 /* Check each of the template parameters in the template
6043 argument against the template parameter pack at the end of
6044 the template template parameter. */
6045 if (TREE_VEC_ELT (parm_parms
, i
) == error_mark_node
)
6048 parm
= TREE_VALUE (TREE_VEC_ELT (parm_parms
, i
));
6050 for (; i
< nargs
; ++i
)
6052 if (TREE_VEC_ELT (arg_parms
, i
) == error_mark_node
)
6055 arg
= TREE_VALUE (TREE_VEC_ELT (arg_parms
, i
));
6057 if (!coerce_template_template_parm (parm
, arg
, complain
, in_decl
,
6066 /* Verifies that the deduced template arguments (in TARGS) for the
6067 template template parameters (in TPARMS) represent valid bindings,
6068 by comparing the template parameter list of each template argument
6069 to the template parameter list of its corresponding template
6070 template parameter, in accordance with DR150. This
6071 routine can only be called after all template arguments have been
6072 deduced. It will return TRUE if all of the template template
6073 parameter bindings are okay, FALSE otherwise. */
6075 template_template_parm_bindings_ok_p (tree tparms
, tree targs
)
6077 int i
, ntparms
= TREE_VEC_LENGTH (tparms
);
6080 /* We're dealing with template parms in this process. */
6081 ++processing_template_decl
;
6083 targs
= INNERMOST_TEMPLATE_ARGS (targs
);
6085 for (i
= 0; i
< ntparms
; ++i
)
6087 tree tparm
= TREE_VALUE (TREE_VEC_ELT (tparms
, i
));
6088 tree targ
= TREE_VEC_ELT (targs
, i
);
6090 if (TREE_CODE (tparm
) == TEMPLATE_DECL
&& targ
)
6092 tree packed_args
= NULL_TREE
;
6095 if (ARGUMENT_PACK_P (targ
))
6097 /* Look inside the argument pack. */
6098 packed_args
= ARGUMENT_PACK_ARGS (targ
);
6099 len
= TREE_VEC_LENGTH (packed_args
);
6102 for (idx
= 0; idx
< len
; ++idx
)
6104 tree targ_parms
= NULL_TREE
;
6107 /* Extract the next argument from the argument
6109 targ
= TREE_VEC_ELT (packed_args
, idx
);
6111 if (PACK_EXPANSION_P (targ
))
6112 /* Look at the pattern of the pack expansion. */
6113 targ
= PACK_EXPANSION_PATTERN (targ
);
6115 /* Extract the template parameters from the template
6117 if (TREE_CODE (targ
) == TEMPLATE_DECL
)
6118 targ_parms
= DECL_INNERMOST_TEMPLATE_PARMS (targ
);
6119 else if (TREE_CODE (targ
) == TEMPLATE_TEMPLATE_PARM
)
6120 targ_parms
= DECL_INNERMOST_TEMPLATE_PARMS (TYPE_NAME (targ
));
6122 /* Verify that we can coerce the template template
6123 parameters from the template argument to the template
6124 parameter. This requires an exact match. */
6126 && !coerce_template_template_parms
6127 (DECL_INNERMOST_TEMPLATE_PARMS (tparm
),
6142 --processing_template_decl
;
6146 /* Since type attributes aren't mangled, we need to strip them from
6147 template type arguments. */
6150 canonicalize_type_argument (tree arg
, tsubst_flags_t complain
)
6153 if (!arg
|| arg
== error_mark_node
|| arg
== TYPE_CANONICAL (arg
))
6155 mv
= TYPE_MAIN_VARIANT (arg
);
6156 arg
= strip_typedefs (arg
);
6157 if (TYPE_ALIGN (arg
) != TYPE_ALIGN (mv
)
6158 || TYPE_ATTRIBUTES (arg
) != TYPE_ATTRIBUTES (mv
))
6160 if (complain
& tf_warning
)
6161 warning (0, "ignoring attributes on template argument %qT", arg
);
6162 arg
= build_aligned_type (arg
, TYPE_ALIGN (mv
));
6163 arg
= cp_build_type_attribute_variant (arg
, TYPE_ATTRIBUTES (mv
));
6168 /* Convert the indicated template ARG as necessary to match the
6169 indicated template PARM. Returns the converted ARG, or
6170 error_mark_node if the conversion was unsuccessful. Error and
6171 warning messages are issued under control of COMPLAIN. This
6172 conversion is for the Ith parameter in the parameter list. ARGS is
6173 the full set of template arguments deduced so far. */
6176 convert_template_argument (tree parm
,
6179 tsubst_flags_t complain
,
6185 int is_type
, requires_type
, is_tmpl_type
, requires_tmpl_type
;
6187 if (TREE_CODE (arg
) == TREE_LIST
6188 && TREE_CODE (TREE_VALUE (arg
)) == OFFSET_REF
)
6190 /* The template argument was the name of some
6191 member function. That's usually
6192 invalid, but static members are OK. In any
6193 case, grab the underlying fields/functions
6194 and issue an error later if required. */
6195 orig_arg
= TREE_VALUE (arg
);
6196 TREE_TYPE (arg
) = unknown_type_node
;
6201 requires_tmpl_type
= TREE_CODE (parm
) == TEMPLATE_DECL
;
6202 requires_type
= (TREE_CODE (parm
) == TYPE_DECL
6203 || requires_tmpl_type
);
6205 /* When determining whether an argument pack expansion is a template,
6206 look at the pattern. */
6207 if (TREE_CODE (arg
) == TYPE_PACK_EXPANSION
)
6208 arg
= PACK_EXPANSION_PATTERN (arg
);
6210 /* Deal with an injected-class-name used as a template template arg. */
6211 if (requires_tmpl_type
&& CLASS_TYPE_P (arg
))
6213 tree t
= maybe_get_template_decl_from_type_decl (TYPE_NAME (arg
));
6214 if (TREE_CODE (t
) == TEMPLATE_DECL
)
6216 if (cxx_dialect
>= cxx0x
)
6217 /* OK under DR 1004. */;
6218 else if (complain
& tf_warning_or_error
)
6219 pedwarn (input_location
, OPT_Wpedantic
, "injected-class-name %qD"
6220 " used as template template argument", TYPE_NAME (arg
));
6221 else if (flag_pedantic_errors
)
6229 ((TREE_CODE (arg
) == TEMPLATE_DECL
6230 && TREE_CODE (DECL_TEMPLATE_RESULT (arg
)) == TYPE_DECL
)
6231 || (requires_tmpl_type
&& TREE_CODE (arg
) == TYPE_ARGUMENT_PACK
)
6232 || TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
6233 || TREE_CODE (arg
) == UNBOUND_CLASS_TEMPLATE
);
6236 && (TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
6237 || TREE_CODE (arg
) == UNBOUND_CLASS_TEMPLATE
))
6238 arg
= TYPE_STUB_DECL (arg
);
6240 is_type
= TYPE_P (arg
) || is_tmpl_type
;
6242 if (requires_type
&& ! is_type
&& TREE_CODE (arg
) == SCOPE_REF
6243 && TREE_CODE (TREE_OPERAND (arg
, 0)) == TEMPLATE_TYPE_PARM
)
6245 if (TREE_CODE (TREE_OPERAND (arg
, 1)) == BIT_NOT_EXPR
)
6247 if (complain
& tf_error
)
6248 error ("invalid use of destructor %qE as a type", orig_arg
);
6249 return error_mark_node
;
6252 permerror (input_location
,
6253 "to refer to a type member of a template parameter, "
6254 "use %<typename %E%>", orig_arg
);
6256 orig_arg
= make_typename_type (TREE_OPERAND (arg
, 0),
6257 TREE_OPERAND (arg
, 1),
6263 if (is_type
!= requires_type
)
6267 if (complain
& tf_error
)
6269 error ("type/value mismatch at argument %d in template "
6270 "parameter list for %qD",
6273 error (" expected a constant of type %qT, got %qT",
6275 (DECL_P (arg
) ? DECL_NAME (arg
) : orig_arg
));
6276 else if (requires_tmpl_type
)
6277 error (" expected a class template, got %qE", orig_arg
);
6279 error (" expected a type, got %qE", orig_arg
);
6282 return error_mark_node
;
6284 if (is_tmpl_type
^ requires_tmpl_type
)
6286 if (in_decl
&& (complain
& tf_error
))
6288 error ("type/value mismatch at argument %d in template "
6289 "parameter list for %qD",
6292 error (" expected a type, got %qT", DECL_NAME (arg
));
6294 error (" expected a class template, got %qT", orig_arg
);
6296 return error_mark_node
;
6301 if (requires_tmpl_type
)
6303 if (template_parameter_pack_p (parm
) && ARGUMENT_PACK_P (orig_arg
))
6305 else if (TREE_CODE (TREE_TYPE (arg
)) == UNBOUND_CLASS_TEMPLATE
)
6306 /* The number of argument required is not known yet.
6307 Just accept it for now. */
6308 val
= TREE_TYPE (arg
);
6311 tree parmparm
= DECL_INNERMOST_TEMPLATE_PARMS (parm
);
6314 argparm
= DECL_INNERMOST_TEMPLATE_PARMS (arg
);
6316 if (coerce_template_template_parms (parmparm
, argparm
,
6322 /* TEMPLATE_TEMPLATE_PARM node is preferred over
6324 if (val
!= error_mark_node
)
6326 if (DECL_TEMPLATE_TEMPLATE_PARM_P (val
))
6327 val
= TREE_TYPE (val
);
6328 if (TREE_CODE (orig_arg
) == TYPE_PACK_EXPANSION
)
6329 val
= make_pack_expansion (val
);
6334 if (in_decl
&& (complain
& tf_error
))
6336 error ("type/value mismatch at argument %d in "
6337 "template parameter list for %qD",
6339 error (" expected a template of type %qD, got %qT",
6343 val
= error_mark_node
;
6349 /* We only form one instance of each template specialization.
6350 Therefore, if we use a non-canonical variant (i.e., a
6351 typedef), any future messages referring to the type will use
6352 the typedef, which is confusing if those future uses do not
6353 themselves also use the typedef. */
6355 val
= canonicalize_type_argument (val
, complain
);
6359 tree t
= tsubst (TREE_TYPE (parm
), args
, complain
, in_decl
);
6361 if (invalid_nontype_parm_type_p (t
, complain
))
6362 return error_mark_node
;
6364 if (template_parameter_pack_p (parm
) && ARGUMENT_PACK_P (orig_arg
))
6366 if (same_type_p (t
, TREE_TYPE (orig_arg
)))
6370 /* Not sure if this is reachable, but it doesn't hurt
6372 error ("type mismatch in nontype parameter pack");
6373 val
= error_mark_node
;
6376 else if (!dependent_template_arg_p (orig_arg
)
6377 && !uses_template_parms (t
))
6378 /* We used to call digest_init here. However, digest_init
6379 will report errors, which we don't want when complain
6380 is zero. More importantly, digest_init will try too
6381 hard to convert things: for example, `0' should not be
6382 converted to pointer type at this point according to
6383 the standard. Accepting this is not merely an
6384 extension, since deciding whether or not these
6385 conversions can occur is part of determining which
6386 function template to call, or whether a given explicit
6387 argument specification is valid. */
6388 val
= convert_nontype_argument (t
, orig_arg
, complain
);
6390 val
= strip_typedefs_expr (orig_arg
);
6392 if (val
== NULL_TREE
)
6393 val
= error_mark_node
;
6394 else if (val
== error_mark_node
&& (complain
& tf_error
))
6395 error ("could not convert template argument %qE to %qT", orig_arg
, t
);
6397 if (TREE_CODE (val
) == SCOPE_REF
)
6399 /* Strip typedefs from the SCOPE_REF. */
6400 tree type
= canonicalize_type_argument (TREE_TYPE (val
), complain
);
6401 tree scope
= canonicalize_type_argument (TREE_OPERAND (val
, 0),
6403 val
= build_qualified_name (type
, scope
, TREE_OPERAND (val
, 1),
6404 QUALIFIED_NAME_IS_TEMPLATE (val
));
6411 /* Coerces the remaining template arguments in INNER_ARGS (from
6412 ARG_IDX to the end) into the parameter pack at PARM_IDX in PARMS.
6413 Returns the coerced argument pack. PARM_IDX is the position of this
6414 parameter in the template parameter list. ARGS is the original
6415 template argument list. */
6417 coerce_template_parameter_pack (tree parms
,
6425 tsubst_flags_t complain
)
6427 tree parm
= TREE_VEC_ELT (parms
, parm_idx
);
6428 int nargs
= inner_args
? NUM_TMPL_ARGS (inner_args
) : 0;
6431 tree packed_types
= NULL_TREE
;
6433 if (arg_idx
> nargs
)
6436 packed_args
= make_tree_vec (nargs
- arg_idx
);
6438 if (TREE_CODE (TREE_VALUE (parm
)) == PARM_DECL
6439 && uses_parameter_packs (TREE_TYPE (TREE_VALUE (parm
))))
6441 /* When the template parameter is a non-type template
6442 parameter pack whose type uses parameter packs, we need
6443 to look at each of the template arguments
6444 separately. Build a vector of the types for these
6445 non-type template parameters in PACKED_TYPES. */
6447 = make_pack_expansion (TREE_TYPE (TREE_VALUE (parm
)));
6448 packed_types
= tsubst_pack_expansion (expansion
, args
,
6451 if (packed_types
== error_mark_node
)
6452 return error_mark_node
;
6454 /* Check that we have the right number of arguments. */
6456 && !PACK_EXPANSION_P (TREE_VEC_ELT (inner_args
, arg_idx
))
6457 && nargs
- arg_idx
!= TREE_VEC_LENGTH (packed_types
))
6460 = TREE_VEC_LENGTH (parms
) - 1 + TREE_VEC_LENGTH (packed_types
);
6461 error ("wrong number of template arguments (%d, should be %d)",
6462 nargs
, needed_parms
);
6463 return error_mark_node
;
6466 /* If we aren't able to check the actual arguments now
6467 (because they haven't been expanded yet), we can at least
6468 verify that all of the types used for the non-type
6469 template parameter pack are, in fact, valid for non-type
6470 template parameters. */
6472 && PACK_EXPANSION_P (TREE_VEC_ELT (inner_args
, arg_idx
)))
6474 int j
, len
= TREE_VEC_LENGTH (packed_types
);
6475 for (j
= 0; j
< len
; ++j
)
6477 tree t
= TREE_VEC_ELT (packed_types
, j
);
6478 if (invalid_nontype_parm_type_p (t
, complain
))
6479 return error_mark_node
;
6484 /* Convert the remaining arguments, which will be a part of the
6485 parameter pack "parm". */
6486 for (; arg_idx
< nargs
; ++arg_idx
)
6488 tree arg
= TREE_VEC_ELT (inner_args
, arg_idx
);
6489 tree actual_parm
= TREE_VALUE (parm
);
6491 if (packed_types
&& !PACK_EXPANSION_P (arg
))
6493 /* When we have a vector of types (corresponding to the
6494 non-type template parameter pack that uses parameter
6495 packs in its type, as mention above), and the
6496 argument is not an expansion (which expands to a
6497 currently unknown number of arguments), clone the
6498 parm and give it the next type in PACKED_TYPES. */
6499 actual_parm
= copy_node (actual_parm
);
6500 TREE_TYPE (actual_parm
) =
6501 TREE_VEC_ELT (packed_types
, arg_idx
- parm_idx
);
6504 if (arg
== error_mark_node
)
6506 if (complain
& tf_error
)
6507 error ("template argument %d is invalid", arg_idx
+ 1);
6510 arg
= convert_template_argument (actual_parm
,
6511 arg
, new_args
, complain
, parm_idx
,
6513 if (arg
== error_mark_node
)
6515 TREE_VEC_ELT (packed_args
, arg_idx
- parm_idx
) = arg
;
6518 if (TREE_CODE (TREE_VALUE (parm
)) == TYPE_DECL
6519 || TREE_CODE (TREE_VALUE (parm
)) == TEMPLATE_DECL
)
6520 argument_pack
= cxx_make_type (TYPE_ARGUMENT_PACK
);
6523 argument_pack
= make_node (NONTYPE_ARGUMENT_PACK
);
6524 TREE_TYPE (argument_pack
)
6525 = tsubst (TREE_TYPE (TREE_VALUE (parm
)), new_args
, complain
, in_decl
);
6526 TREE_CONSTANT (argument_pack
) = 1;
6529 SET_ARGUMENT_PACK_ARGS (argument_pack
, packed_args
);
6530 #ifdef ENABLE_CHECKING
6531 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (packed_args
,
6532 TREE_VEC_LENGTH (packed_args
));
6534 return argument_pack
;
6537 /* Returns true if the template argument vector ARGS contains
6538 any pack expansions, false otherwise. */
6541 any_pack_expanson_args_p (tree args
)
6545 for (i
= 0; i
< TREE_VEC_LENGTH (args
); ++i
)
6546 if (PACK_EXPANSION_P (TREE_VEC_ELT (args
, i
)))
6551 /* Convert all template arguments to their appropriate types, and
6552 return a vector containing the innermost resulting template
6553 arguments. If any error occurs, return error_mark_node. Error and
6554 warning messages are issued under control of COMPLAIN.
6556 If REQUIRE_ALL_ARGS is false, argument deduction will be performed
6557 for arguments not specified in ARGS. Otherwise, if
6558 USE_DEFAULT_ARGS is true, default arguments will be used to fill in
6559 unspecified arguments. If REQUIRE_ALL_ARGS is true, but
6560 USE_DEFAULT_ARGS is false, then all arguments must be specified in
6564 coerce_template_parms (tree parms
,
6567 tsubst_flags_t complain
,
6568 bool require_all_args
,
6569 bool use_default_args
)
6571 int nparms
, nargs
, parm_idx
, arg_idx
, lost
= 0;
6574 tree new_inner_args
;
6575 int saved_unevaluated_operand
;
6576 int saved_inhibit_evaluation_warnings
;
6578 /* When used as a boolean value, indicates whether this is a
6579 variadic template parameter list. Since it's an int, we can also
6580 subtract it from nparms to get the number of non-variadic
6583 int post_variadic_parms
= 0;
6585 if (args
== error_mark_node
)
6586 return error_mark_node
;
6588 nparms
= TREE_VEC_LENGTH (parms
);
6590 /* Determine if there are any parameter packs. */
6591 for (parm_idx
= 0; parm_idx
< nparms
; ++parm_idx
)
6593 tree tparm
= TREE_VALUE (TREE_VEC_ELT (parms
, parm_idx
));
6595 ++post_variadic_parms
;
6596 if (template_parameter_pack_p (tparm
))
6600 inner_args
= INNERMOST_TEMPLATE_ARGS (args
);
6601 /* If there are no parameters that follow a parameter pack, we need to
6602 expand any argument packs so that we can deduce a parameter pack from
6603 some non-packed args followed by an argument pack, as in variadic85.C.
6604 If there are such parameters, we need to leave argument packs intact
6605 so the arguments are assigned properly. This can happen when dealing
6606 with a nested class inside a partial specialization of a class
6607 template, as in variadic92.C, or when deducing a template parameter pack
6608 from a sub-declarator, as in variadic114.C. */
6609 if (!post_variadic_parms
)
6610 inner_args
= expand_template_argument_pack (inner_args
);
6612 nargs
= inner_args
? NUM_TMPL_ARGS (inner_args
) : 0;
6613 if ((nargs
> nparms
&& !variadic_p
)
6614 || (nargs
< nparms
- variadic_p
6616 && !any_pack_expanson_args_p (inner_args
)
6617 && (!use_default_args
6618 || (TREE_VEC_ELT (parms
, nargs
) != error_mark_node
6619 && !TREE_PURPOSE (TREE_VEC_ELT (parms
, nargs
))))))
6621 if (complain
& tf_error
)
6625 nparms
-= variadic_p
;
6626 error ("wrong number of template arguments "
6627 "(%d, should be %d or more)", nargs
, nparms
);
6630 error ("wrong number of template arguments "
6631 "(%d, should be %d)", nargs
, nparms
);
6634 error ("provided for %q+D", in_decl
);
6637 return error_mark_node
;
6640 /* We need to evaluate the template arguments, even though this
6641 template-id may be nested within a "sizeof". */
6642 saved_unevaluated_operand
= cp_unevaluated_operand
;
6643 cp_unevaluated_operand
= 0;
6644 saved_inhibit_evaluation_warnings
= c_inhibit_evaluation_warnings
;
6645 c_inhibit_evaluation_warnings
= 0;
6646 new_inner_args
= make_tree_vec (nparms
);
6647 new_args
= add_outermost_template_args (args
, new_inner_args
);
6648 for (parm_idx
= 0, arg_idx
= 0; parm_idx
< nparms
; parm_idx
++, arg_idx
++)
6653 /* Get the Ith template parameter. */
6654 parm
= TREE_VEC_ELT (parms
, parm_idx
);
6656 if (parm
== error_mark_node
)
6658 TREE_VEC_ELT (new_inner_args
, arg_idx
) = error_mark_node
;
6662 /* Calculate the next argument. */
6663 if (arg_idx
< nargs
)
6664 arg
= TREE_VEC_ELT (inner_args
, arg_idx
);
6668 if (template_parameter_pack_p (TREE_VALUE (parm
))
6669 && !(arg
&& ARGUMENT_PACK_P (arg
)))
6671 /* All remaining arguments will be placed in the
6672 template parameter pack PARM. */
6673 arg
= coerce_template_parameter_pack (parms
, parm_idx
, args
,
6674 inner_args
, arg_idx
,
6678 /* Store this argument. */
6679 if (arg
== error_mark_node
)
6681 TREE_VEC_ELT (new_inner_args
, parm_idx
) = arg
;
6683 /* We are done with all of the arguments. */
6690 if (PACK_EXPANSION_P (arg
))
6692 /* We don't know how many args we have yet, just
6693 use the unconverted ones for now. */
6694 new_inner_args
= inner_args
;
6698 else if (require_all_args
)
6700 /* There must be a default arg in this case. */
6701 arg
= tsubst_template_arg (TREE_PURPOSE (parm
), new_args
,
6703 /* The position of the first default template argument,
6704 is also the number of non-defaulted arguments in NEW_INNER_ARGS.
6706 if (!NON_DEFAULT_TEMPLATE_ARGS_COUNT (new_inner_args
))
6707 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (new_inner_args
, arg_idx
);
6712 if (arg
== error_mark_node
)
6714 if (complain
& tf_error
)
6715 error ("template argument %d is invalid", arg_idx
+ 1);
6718 /* This only occurs if there was an error in the template
6719 parameter list itself (which we would already have
6720 reported) that we are trying to recover from, e.g., a class
6721 template with a parameter list such as
6722 template<typename..., typename>. */
6725 arg
= convert_template_argument (TREE_VALUE (parm
),
6726 arg
, new_args
, complain
,
6729 if (arg
== error_mark_node
)
6731 TREE_VEC_ELT (new_inner_args
, arg_idx
) = arg
;
6733 cp_unevaluated_operand
= saved_unevaluated_operand
;
6734 c_inhibit_evaluation_warnings
= saved_inhibit_evaluation_warnings
;
6737 return error_mark_node
;
6739 #ifdef ENABLE_CHECKING
6740 if (!NON_DEFAULT_TEMPLATE_ARGS_COUNT (new_inner_args
))
6741 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (new_inner_args
,
6742 TREE_VEC_LENGTH (new_inner_args
));
6745 return new_inner_args
;
6748 /* Like coerce_template_parms. If PARMS represents all template
6749 parameters levels, this function returns a vector of vectors
6750 representing all the resulting argument levels. Note that in this
6751 case, only the innermost arguments are coerced because the
6752 outermost ones are supposed to have been coerced already.
6754 Otherwise, if PARMS represents only (the innermost) vector of
6755 parameters, this function returns a vector containing just the
6756 innermost resulting arguments. */
6759 coerce_innermost_template_parms (tree parms
,
6762 tsubst_flags_t complain
,
6763 bool require_all_args
,
6764 bool use_default_args
)
6766 int parms_depth
= TMPL_PARMS_DEPTH (parms
);
6767 int args_depth
= TMPL_ARGS_DEPTH (args
);
6770 if (parms_depth
> 1)
6772 coerced_args
= make_tree_vec (parms_depth
);
6776 for (level
= parms
, cur_depth
= parms_depth
;
6777 parms_depth
> 0 && level
!= NULL_TREE
;
6778 level
= TREE_CHAIN (level
), --cur_depth
)
6781 if (cur_depth
== args_depth
)
6782 l
= coerce_template_parms (TREE_VALUE (level
),
6783 args
, in_decl
, complain
,
6787 l
= TMPL_ARGS_LEVEL (args
, cur_depth
);
6789 if (l
== error_mark_node
)
6790 return error_mark_node
;
6792 SET_TMPL_ARGS_LEVEL (coerced_args
, cur_depth
, l
);
6796 coerced_args
= coerce_template_parms (INNERMOST_TEMPLATE_PARMS (parms
),
6797 args
, in_decl
, complain
,
6800 return coerced_args
;
6803 /* Returns 1 if template args OT and NT are equivalent. */
6806 template_args_equal (tree ot
, tree nt
)
6810 if (nt
== NULL_TREE
|| ot
== NULL_TREE
)
6813 if (TREE_CODE (nt
) == TREE_VEC
)
6814 /* For member templates */
6815 return TREE_CODE (ot
) == TREE_VEC
&& comp_template_args (ot
, nt
);
6816 else if (PACK_EXPANSION_P (ot
))
6817 return (PACK_EXPANSION_P (nt
)
6818 && template_args_equal (PACK_EXPANSION_PATTERN (ot
),
6819 PACK_EXPANSION_PATTERN (nt
))
6820 && template_args_equal (PACK_EXPANSION_EXTRA_ARGS (ot
),
6821 PACK_EXPANSION_EXTRA_ARGS (nt
)));
6822 else if (ARGUMENT_PACK_P (ot
))
6827 if (!ARGUMENT_PACK_P (nt
))
6830 opack
= ARGUMENT_PACK_ARGS (ot
);
6831 npack
= ARGUMENT_PACK_ARGS (nt
);
6832 len
= TREE_VEC_LENGTH (opack
);
6833 if (TREE_VEC_LENGTH (npack
) != len
)
6835 for (i
= 0; i
< len
; ++i
)
6836 if (!template_args_equal (TREE_VEC_ELT (opack
, i
),
6837 TREE_VEC_ELT (npack
, i
)))
6841 else if (ot
&& TREE_CODE (ot
) == ARGUMENT_PACK_SELECT
)
6843 /* We get here probably because we are in the middle of substituting
6844 into the pattern of a pack expansion. In that case the
6845 ARGUMENT_PACK_SELECT temporarily replaces the pack argument we are
6846 interested in. So we want to use the initial pack argument for
6848 ot
= ARGUMENT_PACK_SELECT_FROM_PACK (ot
);
6849 if (nt
&& TREE_CODE (nt
) == ARGUMENT_PACK_SELECT
)
6850 nt
= ARGUMENT_PACK_SELECT_FROM_PACK (nt
);
6851 return template_args_equal (ot
, nt
);
6853 else if (TYPE_P (nt
))
6854 return TYPE_P (ot
) && same_type_p (ot
, nt
);
6855 else if (TREE_CODE (ot
) == TREE_VEC
|| TYPE_P (ot
))
6858 return cp_tree_equal (ot
, nt
);
6861 /* Returns 1 iff the OLDARGS and NEWARGS are in fact identical sets of
6862 template arguments. Returns 0 otherwise, and updates OLDARG_PTR and
6863 NEWARG_PTR with the offending arguments if they are non-NULL. */
6866 comp_template_args_with_info (tree oldargs
, tree newargs
,
6867 tree
*oldarg_ptr
, tree
*newarg_ptr
)
6871 if (oldargs
== newargs
)
6874 if (!oldargs
|| !newargs
)
6877 if (TREE_VEC_LENGTH (oldargs
) != TREE_VEC_LENGTH (newargs
))
6880 for (i
= 0; i
< TREE_VEC_LENGTH (oldargs
); ++i
)
6882 tree nt
= TREE_VEC_ELT (newargs
, i
);
6883 tree ot
= TREE_VEC_ELT (oldargs
, i
);
6885 if (! template_args_equal (ot
, nt
))
6887 if (oldarg_ptr
!= NULL
)
6889 if (newarg_ptr
!= NULL
)
6897 /* Returns 1 iff the OLDARGS and NEWARGS are in fact identical sets
6898 of template arguments. Returns 0 otherwise. */
6901 comp_template_args (tree oldargs
, tree newargs
)
6903 return comp_template_args_with_info (oldargs
, newargs
, NULL
, NULL
);
6907 add_pending_template (tree d
)
6909 tree ti
= (TYPE_P (d
)
6910 ? CLASSTYPE_TEMPLATE_INFO (d
)
6911 : DECL_TEMPLATE_INFO (d
));
6912 struct pending_template
*pt
;
6915 if (TI_PENDING_TEMPLATE_FLAG (ti
))
6918 /* We are called both from instantiate_decl, where we've already had a
6919 tinst_level pushed, and instantiate_template, where we haven't.
6921 level
= !current_tinst_level
|| current_tinst_level
->decl
!= d
;
6924 push_tinst_level (d
);
6926 pt
= ggc_alloc_pending_template ();
6928 pt
->tinst
= current_tinst_level
;
6929 if (last_pending_template
)
6930 last_pending_template
->next
= pt
;
6932 pending_templates
= pt
;
6934 last_pending_template
= pt
;
6936 TI_PENDING_TEMPLATE_FLAG (ti
) = 1;
6943 /* Return a TEMPLATE_ID_EXPR corresponding to the indicated FNS and
6944 ARGLIST. Valid choices for FNS are given in the cp-tree.def
6945 documentation for TEMPLATE_ID_EXPR. */
6948 lookup_template_function (tree fns
, tree arglist
)
6952 if (fns
== error_mark_node
|| arglist
== error_mark_node
)
6953 return error_mark_node
;
6955 gcc_assert (!arglist
|| TREE_CODE (arglist
) == TREE_VEC
);
6957 if (!is_overloaded_fn (fns
) && TREE_CODE (fns
) != IDENTIFIER_NODE
)
6959 error ("%q#D is not a function template", fns
);
6960 return error_mark_node
;
6963 if (BASELINK_P (fns
))
6965 BASELINK_FUNCTIONS (fns
) = build2 (TEMPLATE_ID_EXPR
,
6967 BASELINK_FUNCTIONS (fns
),
6972 type
= TREE_TYPE (fns
);
6973 if (TREE_CODE (fns
) == OVERLOAD
|| !type
)
6974 type
= unknown_type_node
;
6976 return build2 (TEMPLATE_ID_EXPR
, type
, fns
, arglist
);
6979 /* Within the scope of a template class S<T>, the name S gets bound
6980 (in build_self_reference) to a TYPE_DECL for the class, not a
6981 TEMPLATE_DECL. If DECL is a TYPE_DECL for current_class_type,
6982 or one of its enclosing classes, and that type is a template,
6983 return the associated TEMPLATE_DECL. Otherwise, the original
6986 Also handle the case when DECL is a TREE_LIST of ambiguous
6987 injected-class-names from different bases. */
6990 maybe_get_template_decl_from_type_decl (tree decl
)
6992 if (decl
== NULL_TREE
)
6995 /* DR 176: A lookup that finds an injected-class-name (10.2
6996 [class.member.lookup]) can result in an ambiguity in certain cases
6997 (for example, if it is found in more than one base class). If all of
6998 the injected-class-names that are found refer to specializations of
6999 the same class template, and if the name is followed by a
7000 template-argument-list, the reference refers to the class template
7001 itself and not a specialization thereof, and is not ambiguous. */
7002 if (TREE_CODE (decl
) == TREE_LIST
)
7004 tree t
, tmpl
= NULL_TREE
;
7005 for (t
= decl
; t
; t
= TREE_CHAIN (t
))
7007 tree elt
= maybe_get_template_decl_from_type_decl (TREE_VALUE (t
));
7010 else if (tmpl
!= elt
)
7013 if (tmpl
&& t
== NULL_TREE
)
7019 return (decl
!= NULL_TREE
7020 && DECL_SELF_REFERENCE_P (decl
)
7021 && CLASSTYPE_TEMPLATE_INFO (TREE_TYPE (decl
)))
7022 ? CLASSTYPE_TI_TEMPLATE (TREE_TYPE (decl
)) : decl
;
7025 /* Given an IDENTIFIER_NODE (or type TEMPLATE_DECL) and a chain of
7026 parameters, find the desired type.
7028 D1 is the PTYPENAME terminal, and ARGLIST is the list of arguments.
7030 IN_DECL, if non-NULL, is the template declaration we are trying to
7033 If ENTERING_SCOPE is nonzero, we are about to enter the scope of
7034 the class we are looking up.
7036 Issue error and warning messages under control of COMPLAIN.
7038 If the template class is really a local class in a template
7039 function, then the FUNCTION_CONTEXT is the function in which it is
7042 ??? Note that this function is currently called *twice* for each
7043 template-id: the first time from the parser, while creating the
7044 incomplete type (finish_template_type), and the second type during the
7045 real instantiation (instantiate_template_class). This is surely something
7046 that we want to avoid. It also causes some problems with argument
7047 coercion (see convert_nontype_argument for more information on this). */
7050 lookup_template_class_1 (tree d1
, tree arglist
, tree in_decl
, tree context
,
7051 int entering_scope
, tsubst_flags_t complain
)
7053 tree templ
= NULL_TREE
, parmlist
;
7060 if (TREE_CODE (d1
) == IDENTIFIER_NODE
)
7062 tree value
= innermost_non_namespace_value (d1
);
7063 if (value
&& DECL_TEMPLATE_TEMPLATE_PARM_P (value
))
7068 push_decl_namespace (context
);
7069 templ
= lookup_name (d1
);
7070 templ
= maybe_get_template_decl_from_type_decl (templ
);
7072 pop_decl_namespace ();
7075 context
= DECL_CONTEXT (templ
);
7077 else if (TREE_CODE (d1
) == TYPE_DECL
&& MAYBE_CLASS_TYPE_P (TREE_TYPE (d1
)))
7079 tree type
= TREE_TYPE (d1
);
7081 /* If we are declaring a constructor, say A<T>::A<T>, we will get
7082 an implicit typename for the second A. Deal with it. */
7083 if (TREE_CODE (type
) == TYPENAME_TYPE
&& TREE_TYPE (type
))
7084 type
= TREE_TYPE (type
);
7086 if (CLASSTYPE_TEMPLATE_INFO (type
))
7088 templ
= CLASSTYPE_TI_TEMPLATE (type
);
7089 d1
= DECL_NAME (templ
);
7092 else if (TREE_CODE (d1
) == ENUMERAL_TYPE
7093 || (TYPE_P (d1
) && MAYBE_CLASS_TYPE_P (d1
)))
7095 templ
= TYPE_TI_TEMPLATE (d1
);
7096 d1
= DECL_NAME (templ
);
7098 else if (TREE_CODE (d1
) == TEMPLATE_DECL
7099 && DECL_TEMPLATE_RESULT (d1
)
7100 && TREE_CODE (DECL_TEMPLATE_RESULT (d1
)) == TYPE_DECL
)
7103 d1
= DECL_NAME (templ
);
7104 context
= DECL_CONTEXT (templ
);
7106 else if (DECL_TEMPLATE_TEMPLATE_PARM_P (d1
))
7109 d1
= DECL_NAME (templ
);
7112 /* Issue an error message if we didn't find a template. */
7115 if (complain
& tf_error
)
7116 error ("%qT is not a template", d1
);
7117 return error_mark_node
;
7120 if (TREE_CODE (templ
) != TEMPLATE_DECL
7121 /* Make sure it's a user visible template, if it was named by
7123 || ((complain
& tf_user
) && !DECL_TEMPLATE_PARM_P (templ
)
7124 && !PRIMARY_TEMPLATE_P (templ
)))
7126 if (complain
& tf_error
)
7128 error ("non-template type %qT used as a template", d1
);
7130 error ("for template declaration %q+D", in_decl
);
7132 return error_mark_node
;
7135 complain
&= ~tf_user
;
7137 if (DECL_TEMPLATE_TEMPLATE_PARM_P (templ
))
7139 /* Create a new TEMPLATE_DECL and TEMPLATE_TEMPLATE_PARM node to store
7140 template arguments */
7146 parmlist
= DECL_INNERMOST_TEMPLATE_PARMS (templ
);
7148 /* Consider an example where a template template parameter declared as
7150 template <class T, class U = std::allocator<T> > class TT
7152 The template parameter level of T and U are one level larger than
7153 of TT. To proper process the default argument of U, say when an
7154 instantiation `TT<int>' is seen, we need to build the full
7155 arguments containing {int} as the innermost level. Outer levels,
7156 available when not appearing as default template argument, can be
7157 obtained from the arguments of the enclosing template.
7159 Suppose that TT is later substituted with std::vector. The above
7160 instantiation is `TT<int, std::allocator<T> >' with TT at
7161 level 1, and T at level 2, while the template arguments at level 1
7162 becomes {std::vector} and the inner level 2 is {int}. */
7164 outer
= DECL_CONTEXT (templ
);
7166 outer
= TI_ARGS (get_template_info (DECL_TEMPLATE_RESULT (outer
)));
7167 else if (current_template_parms
)
7168 /* This is an argument of the current template, so we haven't set
7169 DECL_CONTEXT yet. */
7170 outer
= current_template_args ();
7173 arglist
= add_to_template_args (outer
, arglist
);
7175 arglist2
= coerce_template_parms (parmlist
, arglist
, templ
,
7177 /*require_all_args=*/true,
7178 /*use_default_args=*/true);
7179 if (arglist2
== error_mark_node
7180 || (!uses_template_parms (arglist2
)
7181 && check_instantiated_args (templ
, arglist2
, complain
)))
7182 return error_mark_node
;
7184 parm
= bind_template_template_parm (TREE_TYPE (templ
), arglist2
);
7189 tree template_type
= TREE_TYPE (templ
);
7192 tree found
= NULL_TREE
;
7195 int is_dependent_type
;
7196 int use_partial_inst_tmpl
= false;
7198 if (template_type
== error_mark_node
)
7199 /* An error occured while building the template TEMPL, and a
7200 diagnostic has most certainly been emitted for that
7201 already. Let's propagate that error. */
7202 return error_mark_node
;
7204 gen_tmpl
= most_general_template (templ
);
7205 parmlist
= DECL_TEMPLATE_PARMS (gen_tmpl
);
7206 parm_depth
= TMPL_PARMS_DEPTH (parmlist
);
7207 arg_depth
= TMPL_ARGS_DEPTH (arglist
);
7209 if (arg_depth
== 1 && parm_depth
> 1)
7211 /* We've been given an incomplete set of template arguments.
7214 template <class T> struct S1 {
7215 template <class U> struct S2 {};
7216 template <class U> struct S2<U*> {};
7219 we will be called with an ARGLIST of `U*', but the
7220 TEMPLATE will be `template <class T> template
7221 <class U> struct S1<T>::S2'. We must fill in the missing
7224 = add_outermost_template_args (TYPE_TI_ARGS (TREE_TYPE (templ
)),
7226 arg_depth
= TMPL_ARGS_DEPTH (arglist
);
7229 /* Now we should have enough arguments. */
7230 gcc_assert (parm_depth
== arg_depth
);
7232 /* From here on, we're only interested in the most general
7235 /* Calculate the BOUND_ARGS. These will be the args that are
7236 actually tsubst'd into the definition to create the
7240 /* We have multiple levels of arguments to coerce, at once. */
7242 int saved_depth
= TMPL_ARGS_DEPTH (arglist
);
7244 tree bound_args
= make_tree_vec (parm_depth
);
7246 for (i
= saved_depth
,
7247 t
= DECL_TEMPLATE_PARMS (gen_tmpl
);
7248 i
> 0 && t
!= NULL_TREE
;
7249 --i
, t
= TREE_CHAIN (t
))
7252 if (i
== saved_depth
)
7253 a
= coerce_template_parms (TREE_VALUE (t
),
7256 /*require_all_args=*/true,
7257 /*use_default_args=*/true);
7259 /* Outer levels should have already been coerced. */
7260 a
= TMPL_ARGS_LEVEL (arglist
, i
);
7262 /* Don't process further if one of the levels fails. */
7263 if (a
== error_mark_node
)
7265 /* Restore the ARGLIST to its full size. */
7266 TREE_VEC_LENGTH (arglist
) = saved_depth
;
7267 return error_mark_node
;
7270 SET_TMPL_ARGS_LEVEL (bound_args
, i
, a
);
7272 /* We temporarily reduce the length of the ARGLIST so
7273 that coerce_template_parms will see only the arguments
7274 corresponding to the template parameters it is
7276 TREE_VEC_LENGTH (arglist
)--;
7279 /* Restore the ARGLIST to its full size. */
7280 TREE_VEC_LENGTH (arglist
) = saved_depth
;
7282 arglist
= bound_args
;
7286 = coerce_template_parms (INNERMOST_TEMPLATE_PARMS (parmlist
),
7287 INNERMOST_TEMPLATE_ARGS (arglist
),
7290 /*require_all_args=*/true,
7291 /*use_default_args=*/true);
7293 if (arglist
== error_mark_node
)
7294 /* We were unable to bind the arguments. */
7295 return error_mark_node
;
7297 /* In the scope of a template class, explicit references to the
7298 template class refer to the type of the template, not any
7299 instantiation of it. For example, in:
7301 template <class T> class C { void f(C<T>); }
7303 the `C<T>' is just the same as `C'. Outside of the
7304 class, however, such a reference is an instantiation. */
7306 || !PRIMARY_TEMPLATE_P (gen_tmpl
)
7307 || currently_open_class (template_type
))
7308 /* comp_template_args is expensive, check it last. */
7309 && comp_template_args (TYPE_TI_ARGS (template_type
),
7311 return template_type
;
7313 /* If we already have this specialization, return it. */
7314 elt
.tmpl
= gen_tmpl
;
7316 hash
= hash_specialization (&elt
);
7317 entry
= (spec_entry
*) htab_find_with_hash (type_specializations
,
7323 is_dependent_type
= uses_template_parms (arglist
);
7325 /* If the deduced arguments are invalid, then the binding
7327 if (!is_dependent_type
7328 && check_instantiated_args (gen_tmpl
,
7329 INNERMOST_TEMPLATE_ARGS (arglist
),
7331 return error_mark_node
;
7333 if (!is_dependent_type
7334 && !PRIMARY_TEMPLATE_P (gen_tmpl
)
7335 && !LAMBDA_TYPE_P (TREE_TYPE (gen_tmpl
))
7336 && TREE_CODE (CP_DECL_CONTEXT (gen_tmpl
)) == NAMESPACE_DECL
)
7338 found
= xref_tag_from_type (TREE_TYPE (gen_tmpl
),
7339 DECL_NAME (gen_tmpl
),
7340 /*tag_scope=*/ts_global
);
7344 context
= tsubst (DECL_CONTEXT (gen_tmpl
), arglist
,
7346 if (context
== error_mark_node
)
7347 return error_mark_node
;
7350 context
= global_namespace
;
7352 /* Create the type. */
7353 if (TREE_CODE (template_type
) == ENUMERAL_TYPE
)
7355 if (!is_dependent_type
)
7357 set_current_access_from_decl (TYPE_NAME (template_type
));
7358 t
= start_enum (TYPE_IDENTIFIER (template_type
), NULL_TREE
,
7359 tsubst (ENUM_UNDERLYING_TYPE (template_type
),
7360 arglist
, complain
, in_decl
),
7361 SCOPED_ENUM_P (template_type
), NULL
);
7365 /* We don't want to call start_enum for this type, since
7366 the values for the enumeration constants may involve
7367 template parameters. And, no one should be interested
7368 in the enumeration constants for such a type. */
7369 t
= cxx_make_type (ENUMERAL_TYPE
);
7370 SET_SCOPED_ENUM_P (t
, SCOPED_ENUM_P (template_type
));
7372 SET_OPAQUE_ENUM_P (t
, OPAQUE_ENUM_P (template_type
));
7373 ENUM_FIXED_UNDERLYING_TYPE_P (t
)
7374 = ENUM_FIXED_UNDERLYING_TYPE_P (template_type
);
7376 else if (DECL_ALIAS_TEMPLATE_P (gen_tmpl
))
7378 /* The user referred to a specialization of an alias
7379 template represented by GEN_TMPL.
7381 [temp.alias]/2 says:
7383 When a template-id refers to the specialization of an
7384 alias template, it is equivalent to the associated
7385 type obtained by substitution of its
7386 template-arguments for the template-parameters in the
7387 type-id of the alias template. */
7389 t
= tsubst (TREE_TYPE (gen_tmpl
), arglist
, complain
, in_decl
);
7390 /* Note that the call above (by indirectly calling
7391 register_specialization in tsubst_decl) registers the
7392 TYPE_DECL representing the specialization of the alias
7393 template. So next time someone substitutes ARGLIST for
7394 the template parms into the alias template (GEN_TMPL),
7395 she'll get that TYPE_DECL back. */
7397 if (t
== error_mark_node
)
7400 else if (CLASS_TYPE_P (template_type
))
7402 t
= make_class_type (TREE_CODE (template_type
));
7403 CLASSTYPE_DECLARED_CLASS (t
)
7404 = CLASSTYPE_DECLARED_CLASS (template_type
);
7405 SET_CLASSTYPE_IMPLICIT_INSTANTIATION (t
);
7406 TYPE_FOR_JAVA (t
) = TYPE_FOR_JAVA (template_type
);
7408 /* A local class. Make sure the decl gets registered properly. */
7409 if (context
== current_function_decl
)
7410 pushtag (DECL_NAME (gen_tmpl
), t
, /*tag_scope=*/ts_current
);
7412 if (comp_template_args (CLASSTYPE_TI_ARGS (template_type
), arglist
))
7413 /* This instantiation is another name for the primary
7414 template type. Set the TYPE_CANONICAL field
7416 TYPE_CANONICAL (t
) = template_type
;
7417 else if (any_template_arguments_need_structural_equality_p (arglist
))
7418 /* Some of the template arguments require structural
7419 equality testing, so this template class requires
7420 structural equality testing. */
7421 SET_TYPE_STRUCTURAL_EQUALITY (t
);
7426 /* If we called start_enum or pushtag above, this information
7427 will already be set up. */
7430 TYPE_CONTEXT (t
) = FROB_CONTEXT (context
);
7432 type_decl
= create_implicit_typedef (DECL_NAME (gen_tmpl
), t
);
7433 DECL_CONTEXT (type_decl
) = TYPE_CONTEXT (t
);
7434 DECL_SOURCE_LOCATION (type_decl
)
7435 = DECL_SOURCE_LOCATION (TYPE_STUB_DECL (template_type
));
7438 type_decl
= TYPE_NAME (t
);
7440 if (CLASS_TYPE_P (template_type
))
7442 TREE_PRIVATE (type_decl
)
7443 = TREE_PRIVATE (TYPE_MAIN_DECL (template_type
));
7444 TREE_PROTECTED (type_decl
)
7445 = TREE_PROTECTED (TYPE_MAIN_DECL (template_type
));
7446 if (CLASSTYPE_VISIBILITY_SPECIFIED (template_type
))
7448 DECL_VISIBILITY_SPECIFIED (type_decl
) = 1;
7449 DECL_VISIBILITY (type_decl
) = CLASSTYPE_VISIBILITY (template_type
);
7453 /* Let's consider the explicit specialization of a member
7454 of a class template specialization that is implicitely instantiated,
7459 template<class U> struct M {}; //#0
7464 struct S<int>::M<char> //#1
7468 [temp.expl.spec]/4 says this is valid.
7470 In this case, when we write:
7473 M is instantiated from the CLASSTYPE_TI_TEMPLATE of #1, not from
7476 When we encounter #1, we want to store the partial instantiation
7477 of M (template<class T> S<int>::M<T>) in it's CLASSTYPE_TI_TEMPLATE.
7479 For all cases other than this "explicit specialization of member of a
7480 class template", we just want to store the most general template into
7481 the CLASSTYPE_TI_TEMPLATE of M.
7483 This case of "explicit specialization of member of a class template"
7485 1/ the enclosing class is an instantiation of, and therefore not
7486 the same as, the context of the most general template, and
7487 2/ we aren't looking at the partial instantiation itself, i.e.
7488 the innermost arguments are not the same as the innermost parms of
7489 the most general template.
7491 So it's only when 1/ and 2/ happens that we want to use the partial
7492 instantiation of the member template in lieu of its most general
7495 if (PRIMARY_TEMPLATE_P (gen_tmpl
)
7496 && TMPL_ARGS_HAVE_MULTIPLE_LEVELS (arglist
)
7497 /* the enclosing class must be an instantiation... */
7498 && CLASS_TYPE_P (context
)
7499 && !same_type_p (context
, DECL_CONTEXT (gen_tmpl
)))
7501 tree partial_inst_args
;
7502 TREE_VEC_LENGTH (arglist
)--;
7503 ++processing_template_decl
;
7505 tsubst (INNERMOST_TEMPLATE_ARGS
7506 (TYPE_TI_ARGS (TREE_TYPE (gen_tmpl
))),
7507 arglist
, complain
, NULL_TREE
);
7508 --processing_template_decl
;
7509 TREE_VEC_LENGTH (arglist
)++;
7510 use_partial_inst_tmpl
=
7511 /*...and we must not be looking at the partial instantiation
7513 !comp_template_args (INNERMOST_TEMPLATE_ARGS (arglist
),
7517 if (!use_partial_inst_tmpl
)
7518 /* This case is easy; there are no member templates involved. */
7522 /* This is a full instantiation of a member template. Find
7523 the partial instantiation of which this is an instance. */
7525 /* Temporarily reduce by one the number of levels in the ARGLIST
7526 so as to avoid comparing the last set of arguments. */
7527 TREE_VEC_LENGTH (arglist
)--;
7528 found
= tsubst (gen_tmpl
, arglist
, complain
, NULL_TREE
);
7529 TREE_VEC_LENGTH (arglist
)++;
7530 /* FOUND is either a proper class type, or an alias
7531 template specialization. In the later case, it's a
7532 TYPE_DECL, resulting from the substituting of arguments
7533 for parameters in the TYPE_DECL of the alias template
7534 done earlier. So be careful while getting the template
7536 found
= TREE_CODE (found
) == TYPE_DECL
7537 ? TYPE_TI_TEMPLATE (TREE_TYPE (found
))
7538 : CLASSTYPE_TI_TEMPLATE (found
);
7541 SET_TYPE_TEMPLATE_INFO (t
, build_template_info (found
, arglist
));
7544 slot
= htab_find_slot_with_hash (type_specializations
,
7545 &elt
, hash
, INSERT
);
7546 entry
= ggc_alloc_spec_entry ();
7550 /* Note this use of the partial instantiation so we can check it
7551 later in maybe_process_partial_specialization. */
7552 DECL_TEMPLATE_INSTANTIATIONS (templ
)
7553 = tree_cons (arglist
, t
,
7554 DECL_TEMPLATE_INSTANTIATIONS (templ
));
7556 if (TREE_CODE (template_type
) == ENUMERAL_TYPE
&& !is_dependent_type
)
7557 /* Now that the type has been registered on the instantiations
7558 list, we set up the enumerators. Because the enumeration
7559 constants may involve the enumeration type itself, we make
7560 sure to register the type first, and then create the
7561 constants. That way, doing tsubst_expr for the enumeration
7562 constants won't result in recursive calls here; we'll find
7563 the instantiation and exit above. */
7564 tsubst_enum (template_type
, t
, arglist
);
7566 if (CLASS_TYPE_P (template_type
) && is_dependent_type
)
7567 /* If the type makes use of template parameters, the
7568 code that generates debugging information will crash. */
7569 DECL_IGNORED_P (TYPE_STUB_DECL (t
)) = 1;
7571 /* Possibly limit visibility based on template args. */
7572 TREE_PUBLIC (type_decl
) = 1;
7573 determine_visibility (type_decl
);
7579 /* Wrapper for lookup_template_class_1. */
7582 lookup_template_class (tree d1
, tree arglist
, tree in_decl
, tree context
,
7583 int entering_scope
, tsubst_flags_t complain
)
7586 timevar_push (TV_TEMPLATE_INST
);
7587 ret
= lookup_template_class_1 (d1
, arglist
, in_decl
, context
,
7588 entering_scope
, complain
);
7589 timevar_pop (TV_TEMPLATE_INST
);
7597 /* True when we should also visit template parameters that occur in
7598 non-deduced contexts. */
7599 bool include_nondeduced_p
;
7600 struct pointer_set_t
*visited
;
7603 /* Called from for_each_template_parm via walk_tree. */
7606 for_each_template_parm_r (tree
*tp
, int *walk_subtrees
, void *d
)
7609 struct pair_fn_data
*pfd
= (struct pair_fn_data
*) d
;
7610 tree_fn_t fn
= pfd
->fn
;
7611 void *data
= pfd
->data
;
7614 && (pfd
->include_nondeduced_p
|| TREE_CODE (t
) != TYPENAME_TYPE
)
7615 && for_each_template_parm (TYPE_CONTEXT (t
), fn
, data
, pfd
->visited
,
7616 pfd
->include_nondeduced_p
))
7617 return error_mark_node
;
7619 switch (TREE_CODE (t
))
7622 if (TYPE_PTRMEMFUNC_P (t
))
7628 if (!TYPE_TEMPLATE_INFO (t
))
7630 else if (for_each_template_parm (TI_ARGS (TYPE_TEMPLATE_INFO (t
)),
7631 fn
, data
, pfd
->visited
,
7632 pfd
->include_nondeduced_p
))
7633 return error_mark_node
;
7637 if (for_each_template_parm (TYPE_MIN_VALUE (t
),
7638 fn
, data
, pfd
->visited
,
7639 pfd
->include_nondeduced_p
)
7640 || for_each_template_parm (TYPE_MAX_VALUE (t
),
7641 fn
, data
, pfd
->visited
,
7642 pfd
->include_nondeduced_p
))
7643 return error_mark_node
;
7647 /* Since we're not going to walk subtrees, we have to do this
7649 if (for_each_template_parm (TYPE_METHOD_BASETYPE (t
), fn
, data
,
7650 pfd
->visited
, pfd
->include_nondeduced_p
))
7651 return error_mark_node
;
7655 /* Check the return type. */
7656 if (for_each_template_parm (TREE_TYPE (t
), fn
, data
, pfd
->visited
,
7657 pfd
->include_nondeduced_p
))
7658 return error_mark_node
;
7660 /* Check the parameter types. Since default arguments are not
7661 instantiated until they are needed, the TYPE_ARG_TYPES may
7662 contain expressions that involve template parameters. But,
7663 no-one should be looking at them yet. And, once they're
7664 instantiated, they don't contain template parameters, so
7665 there's no point in looking at them then, either. */
7669 for (parm
= TYPE_ARG_TYPES (t
); parm
; parm
= TREE_CHAIN (parm
))
7670 if (for_each_template_parm (TREE_VALUE (parm
), fn
, data
,
7671 pfd
->visited
, pfd
->include_nondeduced_p
))
7672 return error_mark_node
;
7674 /* Since we've already handled the TYPE_ARG_TYPES, we don't
7675 want walk_tree walking into them itself. */
7681 case UNDERLYING_TYPE
:
7682 if (pfd
->include_nondeduced_p
7683 && for_each_template_parm (TYPE_FIELDS (t
), fn
, data
,
7685 pfd
->include_nondeduced_p
))
7686 return error_mark_node
;
7691 if (DECL_LANG_SPECIFIC (t
) && DECL_TEMPLATE_INFO (t
)
7692 && for_each_template_parm (DECL_TI_ARGS (t
), fn
, data
,
7693 pfd
->visited
, pfd
->include_nondeduced_p
))
7694 return error_mark_node
;
7699 if (TREE_CODE (t
) == CONST_DECL
&& DECL_TEMPLATE_PARM_P (t
)
7700 && for_each_template_parm (DECL_INITIAL (t
), fn
, data
,
7701 pfd
->visited
, pfd
->include_nondeduced_p
))
7702 return error_mark_node
;
7703 if (DECL_CONTEXT (t
)
7704 && pfd
->include_nondeduced_p
7705 && for_each_template_parm (DECL_CONTEXT (t
), fn
, data
,
7706 pfd
->visited
, pfd
->include_nondeduced_p
))
7707 return error_mark_node
;
7710 case BOUND_TEMPLATE_TEMPLATE_PARM
:
7711 /* Record template parameters such as `T' inside `TT<T>'. */
7712 if (for_each_template_parm (TYPE_TI_ARGS (t
), fn
, data
, pfd
->visited
,
7713 pfd
->include_nondeduced_p
))
7714 return error_mark_node
;
7717 case TEMPLATE_TEMPLATE_PARM
:
7718 case TEMPLATE_TYPE_PARM
:
7719 case TEMPLATE_PARM_INDEX
:
7720 if (fn
&& (*fn
)(t
, data
))
7721 return error_mark_node
;
7723 return error_mark_node
;
7727 /* A template template parameter is encountered. */
7728 if (DECL_TEMPLATE_TEMPLATE_PARM_P (t
)
7729 && for_each_template_parm (TREE_TYPE (t
), fn
, data
, pfd
->visited
,
7730 pfd
->include_nondeduced_p
))
7731 return error_mark_node
;
7733 /* Already substituted template template parameter */
7739 || for_each_template_parm (TYPENAME_TYPE_FULLNAME (t
), fn
,
7741 pfd
->include_nondeduced_p
))
7742 return error_mark_node
;
7746 if (TREE_TYPE (t
) && TYPE_PTRMEMFUNC_P (TREE_TYPE (t
))
7747 && pfd
->include_nondeduced_p
7748 && for_each_template_parm (TYPE_PTRMEMFUNC_FN_TYPE
7749 (TREE_TYPE (t
)), fn
, data
,
7750 pfd
->visited
, pfd
->include_nondeduced_p
))
7751 return error_mark_node
;
7756 /* If there's no type, then this thing must be some expression
7757 involving template parameters. */
7758 if (!fn
&& !TREE_TYPE (t
))
7759 return error_mark_node
;
7764 case IMPLICIT_CONV_EXPR
:
7765 case REINTERPRET_CAST_EXPR
:
7766 case CONST_CAST_EXPR
:
7767 case STATIC_CAST_EXPR
:
7768 case DYNAMIC_CAST_EXPR
:
7772 case PSEUDO_DTOR_EXPR
:
7774 return error_mark_node
;
7781 /* We didn't find any template parameters we liked. */
7785 /* For each TEMPLATE_TYPE_PARM, TEMPLATE_TEMPLATE_PARM,
7786 BOUND_TEMPLATE_TEMPLATE_PARM or TEMPLATE_PARM_INDEX in T,
7787 call FN with the parameter and the DATA.
7788 If FN returns nonzero, the iteration is terminated, and
7789 for_each_template_parm returns 1. Otherwise, the iteration
7790 continues. If FN never returns a nonzero value, the value
7791 returned by for_each_template_parm is 0. If FN is NULL, it is
7792 considered to be the function which always returns 1.
7794 If INCLUDE_NONDEDUCED_P, then this routine will also visit template
7795 parameters that occur in non-deduced contexts. When false, only
7796 visits those template parameters that can be deduced. */
7799 for_each_template_parm (tree t
, tree_fn_t fn
, void* data
,
7800 struct pointer_set_t
*visited
,
7801 bool include_nondeduced_p
)
7803 struct pair_fn_data pfd
;
7809 pfd
.include_nondeduced_p
= include_nondeduced_p
;
7811 /* Walk the tree. (Conceptually, we would like to walk without
7812 duplicates, but for_each_template_parm_r recursively calls
7813 for_each_template_parm, so we would need to reorganize a fair
7814 bit to use walk_tree_without_duplicates, so we keep our own
7817 pfd
.visited
= visited
;
7819 pfd
.visited
= pointer_set_create ();
7820 result
= cp_walk_tree (&t
,
7821 for_each_template_parm_r
,
7823 pfd
.visited
) != NULL_TREE
;
7828 pointer_set_destroy (pfd
.visited
);
7835 /* Returns true if T depends on any template parameter. */
7838 uses_template_parms (tree t
)
7841 int saved_processing_template_decl
;
7843 saved_processing_template_decl
= processing_template_decl
;
7844 if (!saved_processing_template_decl
)
7845 processing_template_decl
= 1;
7847 dependent_p
= dependent_type_p (t
);
7848 else if (TREE_CODE (t
) == TREE_VEC
)
7849 dependent_p
= any_dependent_template_arguments_p (t
);
7850 else if (TREE_CODE (t
) == TREE_LIST
)
7851 dependent_p
= (uses_template_parms (TREE_VALUE (t
))
7852 || uses_template_parms (TREE_CHAIN (t
)));
7853 else if (TREE_CODE (t
) == TYPE_DECL
)
7854 dependent_p
= dependent_type_p (TREE_TYPE (t
));
7857 || TREE_CODE (t
) == TEMPLATE_PARM_INDEX
7858 || TREE_CODE (t
) == OVERLOAD
7860 || TREE_CODE (t
) == IDENTIFIER_NODE
7861 || TREE_CODE (t
) == TRAIT_EXPR
7862 || TREE_CODE (t
) == CONSTRUCTOR
7863 || CONSTANT_CLASS_P (t
))
7864 dependent_p
= (type_dependent_expression_p (t
)
7865 || value_dependent_expression_p (t
));
7868 gcc_assert (t
== error_mark_node
);
7869 dependent_p
= false;
7872 processing_template_decl
= saved_processing_template_decl
;
7877 /* Returns true iff current_function_decl is an incompletely instantiated
7878 template. Useful instead of processing_template_decl because the latter
7879 is set to 0 during fold_non_dependent_expr. */
7882 in_template_function (void)
7884 tree fn
= current_function_decl
;
7886 ++processing_template_decl
;
7887 ret
= (fn
&& DECL_LANG_SPECIFIC (fn
)
7888 && DECL_TEMPLATE_INFO (fn
)
7889 && any_dependent_template_arguments_p (DECL_TI_ARGS (fn
)));
7890 --processing_template_decl
;
7894 /* Returns true if T depends on any template parameter with level LEVEL. */
7897 uses_template_parms_level (tree t
, int level
)
7899 return for_each_template_parm (t
, template_parm_this_level_p
, &level
, NULL
,
7900 /*include_nondeduced_p=*/true);
7903 /* Returns TRUE iff INST is an instantiation we don't need to do in an
7904 ill-formed translation unit, i.e. a variable or function that isn't
7905 usable in a constant expression. */
7908 neglectable_inst_p (tree d
)
7911 && !(TREE_CODE (d
) == FUNCTION_DECL
? DECL_DECLARED_CONSTEXPR_P (d
)
7912 : decl_maybe_constant_var_p (d
)));
7915 /* Returns TRUE iff we should refuse to instantiate DECL because it's
7916 neglectable and instantiated from within an erroneous instantiation. */
7919 limit_bad_template_recursion (tree decl
)
7921 struct tinst_level
*lev
= current_tinst_level
;
7922 int errs
= errorcount
+ sorrycount
;
7923 if (lev
== NULL
|| errs
== 0 || !neglectable_inst_p (decl
))
7926 for (; lev
; lev
= lev
->next
)
7927 if (neglectable_inst_p (lev
->decl
))
7930 return (lev
&& errs
> lev
->errors
);
7933 static int tinst_depth
;
7934 extern int max_tinst_depth
;
7937 static GTY(()) struct tinst_level
*last_error_tinst_level
;
7939 /* We're starting to instantiate D; record the template instantiation context
7940 for diagnostics and to restore it later. */
7943 push_tinst_level (tree d
)
7945 struct tinst_level
*new_level
;
7947 if (tinst_depth
>= max_tinst_depth
)
7949 last_error_tinst_level
= current_tinst_level
;
7950 if (TREE_CODE (d
) == TREE_LIST
)
7951 error ("template instantiation depth exceeds maximum of %d (use "
7952 "-ftemplate-depth= to increase the maximum) substituting %qS",
7953 max_tinst_depth
, d
);
7955 error ("template instantiation depth exceeds maximum of %d (use "
7956 "-ftemplate-depth= to increase the maximum) instantiating %qD",
7957 max_tinst_depth
, d
);
7959 print_instantiation_context ();
7964 /* If the current instantiation caused problems, don't let it instantiate
7965 anything else. Do allow deduction substitution and decls usable in
7966 constant expressions. */
7967 if (limit_bad_template_recursion (d
))
7970 new_level
= ggc_alloc_tinst_level ();
7971 new_level
->decl
= d
;
7972 new_level
->locus
= input_location
;
7973 new_level
->errors
= errorcount
+sorrycount
;
7974 new_level
->in_system_header_p
= in_system_header
;
7975 new_level
->next
= current_tinst_level
;
7976 current_tinst_level
= new_level
;
7979 if (GATHER_STATISTICS
&& (tinst_depth
> depth_reached
))
7980 depth_reached
= tinst_depth
;
7985 /* We're done instantiating this template; return to the instantiation
7989 pop_tinst_level (void)
7991 /* Restore the filename and line number stashed away when we started
7992 this instantiation. */
7993 input_location
= current_tinst_level
->locus
;
7994 current_tinst_level
= current_tinst_level
->next
;
7998 /* We're instantiating a deferred template; restore the template
7999 instantiation context in which the instantiation was requested, which
8000 is one step out from LEVEL. Return the corresponding DECL or TYPE. */
8003 reopen_tinst_level (struct tinst_level
*level
)
8005 struct tinst_level
*t
;
8008 for (t
= level
; t
; t
= t
->next
)
8011 current_tinst_level
= level
;
8013 if (current_tinst_level
)
8014 current_tinst_level
->errors
= errorcount
+sorrycount
;
8018 /* Returns the TINST_LEVEL which gives the original instantiation
8021 struct tinst_level
*
8022 outermost_tinst_level (void)
8024 struct tinst_level
*level
= current_tinst_level
;
8027 level
= level
->next
;
8031 /* DECL is a friend FUNCTION_DECL or TEMPLATE_DECL. ARGS is the
8032 vector of template arguments, as for tsubst.
8034 Returns an appropriate tsubst'd friend declaration. */
8037 tsubst_friend_function (tree decl
, tree args
)
8041 if (TREE_CODE (decl
) == FUNCTION_DECL
8042 && DECL_TEMPLATE_INSTANTIATION (decl
)
8043 && TREE_CODE (DECL_TI_TEMPLATE (decl
)) != TEMPLATE_DECL
)
8044 /* This was a friend declared with an explicit template
8045 argument list, e.g.:
8049 to indicate that f was a template instantiation, not a new
8050 function declaration. Now, we have to figure out what
8051 instantiation of what template. */
8053 tree template_id
, arglist
, fns
;
8056 tree ns
= decl_namespace_context (TYPE_MAIN_DECL (current_class_type
));
8058 /* Friend functions are looked up in the containing namespace scope.
8059 We must enter that scope, to avoid finding member functions of the
8060 current class with same name. */
8061 push_nested_namespace (ns
);
8062 fns
= tsubst_expr (DECL_TI_TEMPLATE (decl
), args
,
8063 tf_warning_or_error
, NULL_TREE
,
8064 /*integral_constant_expression_p=*/false);
8065 pop_nested_namespace (ns
);
8066 arglist
= tsubst (DECL_TI_ARGS (decl
), args
,
8067 tf_warning_or_error
, NULL_TREE
);
8068 template_id
= lookup_template_function (fns
, arglist
);
8070 new_friend
= tsubst (decl
, args
, tf_warning_or_error
, NULL_TREE
);
8071 tmpl
= determine_specialization (template_id
, new_friend
,
8073 /*need_member_template=*/0,
8074 TREE_VEC_LENGTH (args
),
8076 return instantiate_template (tmpl
, new_args
, tf_error
);
8079 new_friend
= tsubst (decl
, args
, tf_warning_or_error
, NULL_TREE
);
8081 /* The NEW_FRIEND will look like an instantiation, to the
8082 compiler, but is not an instantiation from the point of view of
8083 the language. For example, we might have had:
8085 template <class T> struct S {
8086 template <class U> friend void f(T, U);
8089 Then, in S<int>, template <class U> void f(int, U) is not an
8090 instantiation of anything. */
8091 if (new_friend
== error_mark_node
)
8092 return error_mark_node
;
8094 DECL_USE_TEMPLATE (new_friend
) = 0;
8095 if (TREE_CODE (decl
) == TEMPLATE_DECL
)
8097 DECL_USE_TEMPLATE (DECL_TEMPLATE_RESULT (new_friend
)) = 0;
8098 DECL_SAVED_TREE (DECL_TEMPLATE_RESULT (new_friend
))
8099 = DECL_SAVED_TREE (DECL_TEMPLATE_RESULT (decl
));
8102 /* The mangled name for the NEW_FRIEND is incorrect. The function
8103 is not a template instantiation and should not be mangled like
8104 one. Therefore, we forget the mangling here; we'll recompute it
8105 later if we need it. */
8106 if (TREE_CODE (new_friend
) != TEMPLATE_DECL
)
8108 SET_DECL_RTL (new_friend
, NULL
);
8109 SET_DECL_ASSEMBLER_NAME (new_friend
, NULL_TREE
);
8112 if (DECL_NAMESPACE_SCOPE_P (new_friend
))
8115 tree new_friend_template_info
;
8116 tree new_friend_result_template_info
;
8118 int new_friend_is_defn
;
8120 /* We must save some information from NEW_FRIEND before calling
8121 duplicate decls since that function will free NEW_FRIEND if
8123 new_friend_template_info
= DECL_TEMPLATE_INFO (new_friend
);
8124 new_friend_is_defn
=
8125 (DECL_INITIAL (DECL_TEMPLATE_RESULT
8126 (template_for_substitution (new_friend
)))
8128 if (TREE_CODE (new_friend
) == TEMPLATE_DECL
)
8130 /* This declaration is a `primary' template. */
8131 DECL_PRIMARY_TEMPLATE (new_friend
) = new_friend
;
8133 new_friend_result_template_info
8134 = DECL_TEMPLATE_INFO (DECL_TEMPLATE_RESULT (new_friend
));
8137 new_friend_result_template_info
= NULL_TREE
;
8139 /* Make the init_value nonzero so pushdecl knows this is a defn. */
8140 if (new_friend_is_defn
)
8141 DECL_INITIAL (new_friend
) = error_mark_node
;
8143 /* Inside pushdecl_namespace_level, we will push into the
8144 current namespace. However, the friend function should go
8145 into the namespace of the template. */
8146 ns
= decl_namespace_context (new_friend
);
8147 push_nested_namespace (ns
);
8148 old_decl
= pushdecl_namespace_level (new_friend
, /*is_friend=*/true);
8149 pop_nested_namespace (ns
);
8151 if (old_decl
== error_mark_node
)
8152 return error_mark_node
;
8154 if (old_decl
!= new_friend
)
8156 /* This new friend declaration matched an existing
8157 declaration. For example, given:
8159 template <class T> void f(T);
8160 template <class U> class C {
8161 template <class T> friend void f(T) {}
8164 the friend declaration actually provides the definition
8165 of `f', once C has been instantiated for some type. So,
8166 old_decl will be the out-of-class template declaration,
8167 while new_friend is the in-class definition.
8169 But, if `f' was called before this point, the
8170 instantiation of `f' will have DECL_TI_ARGS corresponding
8171 to `T' but not to `U', references to which might appear
8172 in the definition of `f'. Previously, the most general
8173 template for an instantiation of `f' was the out-of-class
8174 version; now it is the in-class version. Therefore, we
8175 run through all specialization of `f', adding to their
8176 DECL_TI_ARGS appropriately. In particular, they need a
8177 new set of outer arguments, corresponding to the
8178 arguments for this class instantiation.
8180 The same situation can arise with something like this:
8183 template <class T> class C {
8187 when `C<int>' is instantiated. Now, `f(int)' is defined
8190 if (!new_friend_is_defn
)
8191 /* On the other hand, if the in-class declaration does
8192 *not* provide a definition, then we don't want to alter
8193 existing definitions. We can just leave everything
8198 tree new_template
= TI_TEMPLATE (new_friend_template_info
);
8199 tree new_args
= TI_ARGS (new_friend_template_info
);
8201 /* Overwrite whatever template info was there before, if
8202 any, with the new template information pertaining to
8204 DECL_TEMPLATE_INFO (old_decl
) = new_friend_template_info
;
8206 if (TREE_CODE (old_decl
) != TEMPLATE_DECL
)
8208 /* We should have called reregister_specialization in
8210 gcc_assert (retrieve_specialization (new_template
,
8214 /* Instantiate it if the global has already been used. */
8215 if (DECL_ODR_USED (old_decl
))
8216 instantiate_decl (old_decl
, /*defer_ok=*/true,
8217 /*expl_inst_class_mem_p=*/false);
8223 /* Indicate that the old function template is a partial
8225 DECL_TEMPLATE_INFO (DECL_TEMPLATE_RESULT (old_decl
))
8226 = new_friend_result_template_info
;
8228 gcc_assert (new_template
8229 == most_general_template (new_template
));
8230 gcc_assert (new_template
!= old_decl
);
8232 /* Reassign any specializations already in the hash table
8233 to the new more general template, and add the
8234 additional template args. */
8235 for (t
= DECL_TEMPLATE_INSTANTIATIONS (old_decl
);
8239 tree spec
= TREE_VALUE (t
);
8242 elt
.tmpl
= old_decl
;
8243 elt
.args
= DECL_TI_ARGS (spec
);
8244 elt
.spec
= NULL_TREE
;
8246 htab_remove_elt (decl_specializations
, &elt
);
8249 = add_outermost_template_args (new_args
,
8250 DECL_TI_ARGS (spec
));
8252 register_specialization
8253 (spec
, new_template
, DECL_TI_ARGS (spec
), true, 0);
8256 DECL_TEMPLATE_INSTANTIATIONS (old_decl
) = NULL_TREE
;
8260 /* The information from NEW_FRIEND has been merged into OLD_DECL
8261 by duplicate_decls. */
8262 new_friend
= old_decl
;
8267 tree context
= DECL_CONTEXT (new_friend
);
8271 template <class T> class C {
8272 template <class U> friend void C1<U>::f (); // case 1
8273 friend void C2<T>::f (); // case 2
8275 we only need to make sure CONTEXT is a complete type for
8276 case 2. To distinguish between the two cases, we note that
8277 CONTEXT of case 1 remains dependent type after tsubst while
8278 this isn't true for case 2. */
8279 ++processing_template_decl
;
8280 dependent_p
= dependent_type_p (context
);
8281 --processing_template_decl
;
8284 && !complete_type_or_else (context
, NULL_TREE
))
8285 return error_mark_node
;
8287 if (COMPLETE_TYPE_P (context
))
8289 /* Check to see that the declaration is really present, and,
8290 possibly obtain an improved declaration. */
8291 tree fn
= check_classfn (context
,
8292 new_friend
, NULL_TREE
);
8302 /* FRIEND_TMPL is a friend TEMPLATE_DECL. ARGS is the vector of
8303 template arguments, as for tsubst.
8305 Returns an appropriate tsubst'd friend type or error_mark_node on
8309 tsubst_friend_class (tree friend_tmpl
, tree args
)
8315 if (DECL_TEMPLATE_TEMPLATE_PARM_P (friend_tmpl
))
8317 tree t
= tsubst (TREE_TYPE (friend_tmpl
), args
, tf_none
, NULL_TREE
);
8318 return TREE_TYPE (t
);
8321 context
= CP_DECL_CONTEXT (friend_tmpl
);
8323 if (context
!= global_namespace
)
8325 if (TREE_CODE (context
) == NAMESPACE_DECL
)
8326 push_nested_namespace (context
);
8328 push_nested_class (tsubst (context
, args
, tf_none
, NULL_TREE
));
8331 /* Look for a class template declaration. We look for hidden names
8332 because two friend declarations of the same template are the
8333 same. For example, in:
8336 template <typename> friend class F;
8338 template <typename> struct B {
8339 template <typename> friend class F;
8342 both F templates are the same. */
8343 tmpl
= lookup_name_real (DECL_NAME (friend_tmpl
), 0, 0,
8344 /*block_p=*/true, 0, LOOKUP_HIDDEN
);
8346 /* But, if we don't find one, it might be because we're in a
8347 situation like this:
8355 Here, in the scope of (say) S<int>, `S' is bound to a TYPE_DECL
8356 for `S<int>', not the TEMPLATE_DECL. */
8357 if (!tmpl
|| !DECL_CLASS_TEMPLATE_P (tmpl
))
8359 tmpl
= lookup_name_prefer_type (DECL_NAME (friend_tmpl
), 1);
8360 tmpl
= maybe_get_template_decl_from_type_decl (tmpl
);
8363 if (tmpl
&& DECL_CLASS_TEMPLATE_P (tmpl
))
8365 /* The friend template has already been declared. Just
8366 check to see that the declarations match, and install any new
8367 default parameters. We must tsubst the default parameters,
8368 of course. We only need the innermost template parameters
8369 because that is all that redeclare_class_template will look
8371 if (TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (friend_tmpl
))
8372 > TMPL_ARGS_DEPTH (args
))
8375 location_t saved_input_location
;
8376 parms
= tsubst_template_parms (DECL_TEMPLATE_PARMS (friend_tmpl
),
8377 args
, tf_warning_or_error
);
8379 saved_input_location
= input_location
;
8380 input_location
= DECL_SOURCE_LOCATION (friend_tmpl
);
8381 redeclare_class_template (TREE_TYPE (tmpl
), parms
);
8382 input_location
= saved_input_location
;
8386 friend_type
= TREE_TYPE (tmpl
);
8390 /* The friend template has not already been declared. In this
8391 case, the instantiation of the template class will cause the
8392 injection of this template into the global scope. */
8393 tmpl
= tsubst (friend_tmpl
, args
, tf_warning_or_error
, NULL_TREE
);
8394 if (tmpl
== error_mark_node
)
8395 return error_mark_node
;
8397 /* The new TMPL is not an instantiation of anything, so we
8398 forget its origins. We don't reset CLASSTYPE_TI_TEMPLATE for
8399 the new type because that is supposed to be the corresponding
8400 template decl, i.e., TMPL. */
8401 DECL_USE_TEMPLATE (tmpl
) = 0;
8402 DECL_TEMPLATE_INFO (tmpl
) = NULL_TREE
;
8403 CLASSTYPE_USE_TEMPLATE (TREE_TYPE (tmpl
)) = 0;
8404 CLASSTYPE_TI_ARGS (TREE_TYPE (tmpl
))
8405 = INNERMOST_TEMPLATE_ARGS (CLASSTYPE_TI_ARGS (TREE_TYPE (tmpl
)));
8407 /* Inject this template into the global scope. */
8408 friend_type
= TREE_TYPE (pushdecl_top_level_maybe_friend (tmpl
, true));
8411 if (context
!= global_namespace
)
8413 if (TREE_CODE (context
) == NAMESPACE_DECL
)
8414 pop_nested_namespace (context
);
8416 pop_nested_class ();
8422 /* Returns zero if TYPE cannot be completed later due to circularity.
8423 Otherwise returns one. */
8426 can_complete_type_without_circularity (tree type
)
8428 if (type
== NULL_TREE
|| type
== error_mark_node
)
8430 else if (COMPLETE_TYPE_P (type
))
8432 else if (TREE_CODE (type
) == ARRAY_TYPE
&& TYPE_DOMAIN (type
))
8433 return can_complete_type_without_circularity (TREE_TYPE (type
));
8434 else if (CLASS_TYPE_P (type
)
8435 && TYPE_BEING_DEFINED (TYPE_MAIN_VARIANT (type
)))
8441 /* Apply any attributes which had to be deferred until instantiation
8442 time. DECL_P, ATTRIBUTES and ATTR_FLAGS are as cplus_decl_attributes;
8443 ARGS, COMPLAIN, IN_DECL are as tsubst. */
8446 apply_late_template_attributes (tree
*decl_p
, tree attributes
, int attr_flags
,
8447 tree args
, tsubst_flags_t complain
, tree in_decl
)
8449 tree last_dep
= NULL_TREE
;
8453 for (t
= attributes
; t
; t
= TREE_CHAIN (t
))
8454 if (ATTR_IS_DEPENDENT (t
))
8457 attributes
= copy_list (attributes
);
8461 if (DECL_P (*decl_p
))
8463 if (TREE_TYPE (*decl_p
) == error_mark_node
)
8465 p
= &DECL_ATTRIBUTES (*decl_p
);
8468 p
= &TYPE_ATTRIBUTES (*decl_p
);
8472 tree late_attrs
= NULL_TREE
;
8473 tree
*q
= &late_attrs
;
8475 for (*p
= attributes
; *p
; )
8478 if (ATTR_IS_DEPENDENT (t
))
8480 *p
= TREE_CHAIN (t
);
8481 TREE_CHAIN (t
) = NULL_TREE
;
8482 /* If the first attribute argument is an identifier, don't
8483 pass it through tsubst. Attributes like mode, format,
8484 cleanup and several target specific attributes expect it
8487 && TREE_CODE (TREE_VALUE (t
)) == TREE_LIST
8488 && TREE_VALUE (TREE_VALUE (t
))
8489 && (TREE_CODE (TREE_VALUE (TREE_VALUE (t
)))
8490 == IDENTIFIER_NODE
))
8493 = tsubst_expr (TREE_CHAIN (TREE_VALUE (t
)), args
, complain
,
8495 /*integral_constant_expression_p=*/false);
8496 if (chain
!= TREE_CHAIN (TREE_VALUE (t
)))
8498 = tree_cons (NULL_TREE
, TREE_VALUE (TREE_VALUE (t
)),
8503 = tsubst_expr (TREE_VALUE (t
), args
, complain
, in_decl
,
8504 /*integral_constant_expression_p=*/false);
8506 q
= &TREE_CHAIN (t
);
8509 p
= &TREE_CHAIN (t
);
8512 cplus_decl_attributes (decl_p
, late_attrs
, attr_flags
);
8516 /* Perform (or defer) access check for typedefs that were referenced
8517 from within the template TMPL code.
8518 This is a subroutine of instantiate_decl and instantiate_class_template.
8519 TMPL is the template to consider and TARGS is the list of arguments of
8523 perform_typedefs_access_check (tree tmpl
, tree targs
)
8525 location_t saved_location
;
8527 qualified_typedef_usage_t
*iter
;
8530 || (!CLASS_TYPE_P (tmpl
)
8531 && TREE_CODE (tmpl
) != FUNCTION_DECL
))
8534 saved_location
= input_location
;
8535 FOR_EACH_VEC_SAFE_ELT (get_types_needing_access_check (tmpl
), i
, iter
)
8537 tree type_decl
= iter
->typedef_decl
;
8538 tree type_scope
= iter
->context
;
8540 if (!type_decl
|| !type_scope
|| !CLASS_TYPE_P (type_scope
))
8543 if (uses_template_parms (type_decl
))
8544 type_decl
= tsubst (type_decl
, targs
, tf_error
, NULL_TREE
);
8545 if (uses_template_parms (type_scope
))
8546 type_scope
= tsubst (type_scope
, targs
, tf_error
, NULL_TREE
);
8548 /* Make access check error messages point to the location
8549 of the use of the typedef. */
8550 input_location
= iter
->locus
;
8551 perform_or_defer_access_check (TYPE_BINFO (type_scope
),
8552 type_decl
, type_decl
,
8553 tf_warning_or_error
);
8555 input_location
= saved_location
;
8559 instantiate_class_template_1 (tree type
)
8561 tree templ
, args
, pattern
, t
, member
;
8565 unsigned int saved_maximum_field_alignment
;
8568 if (type
== error_mark_node
)
8569 return error_mark_node
;
8571 if (COMPLETE_OR_OPEN_TYPE_P (type
)
8572 || uses_template_parms (type
))
8575 /* Figure out which template is being instantiated. */
8576 templ
= most_general_template (CLASSTYPE_TI_TEMPLATE (type
));
8577 gcc_assert (TREE_CODE (templ
) == TEMPLATE_DECL
);
8579 /* Determine what specialization of the original template to
8581 t
= most_specialized_class (type
, tf_warning_or_error
);
8582 if (t
== error_mark_node
)
8584 TYPE_BEING_DEFINED (type
) = 1;
8585 return error_mark_node
;
8589 /* This TYPE is actually an instantiation of a partial
8590 specialization. We replace the innermost set of ARGS with
8591 the arguments appropriate for substitution. For example,
8594 template <class T> struct S {};
8595 template <class T> struct S<T*> {};
8597 and supposing that we are instantiating S<int*>, ARGS will
8598 presently be {int*} -- but we need {int}. */
8599 pattern
= TREE_TYPE (t
);
8600 args
= TREE_PURPOSE (t
);
8604 pattern
= TREE_TYPE (templ
);
8605 args
= CLASSTYPE_TI_ARGS (type
);
8608 /* If the template we're instantiating is incomplete, then clearly
8609 there's nothing we can do. */
8610 if (!COMPLETE_TYPE_P (pattern
))
8613 /* If we've recursively instantiated too many templates, stop. */
8614 if (! push_tinst_level (type
))
8617 /* Now we're really doing the instantiation. Mark the type as in
8618 the process of being defined. */
8619 TYPE_BEING_DEFINED (type
) = 1;
8621 /* We may be in the middle of deferred access check. Disable
8623 push_deferring_access_checks (dk_no_deferred
);
8625 fn_context
= decl_function_context (TYPE_MAIN_DECL (type
));
8627 push_to_top_level ();
8628 /* Use #pragma pack from the template context. */
8629 saved_maximum_field_alignment
= maximum_field_alignment
;
8630 maximum_field_alignment
= TYPE_PRECISION (pattern
);
8632 SET_CLASSTYPE_INTERFACE_UNKNOWN (type
);
8634 /* Set the input location to the most specialized template definition.
8635 This is needed if tsubsting causes an error. */
8636 typedecl
= TYPE_MAIN_DECL (pattern
);
8637 input_location
= DECL_SOURCE_LOCATION (TYPE_NAME (type
)) =
8638 DECL_SOURCE_LOCATION (typedecl
);
8640 TYPE_PACKED (type
) = TYPE_PACKED (pattern
);
8641 TYPE_ALIGN (type
) = TYPE_ALIGN (pattern
);
8642 TYPE_USER_ALIGN (type
) = TYPE_USER_ALIGN (pattern
);
8643 TYPE_FOR_JAVA (type
) = TYPE_FOR_JAVA (pattern
); /* For libjava's JArray<T> */
8644 if (ANON_AGGR_TYPE_P (pattern
))
8645 SET_ANON_AGGR_TYPE_P (type
);
8646 if (CLASSTYPE_VISIBILITY_SPECIFIED (pattern
))
8648 CLASSTYPE_VISIBILITY_SPECIFIED (type
) = 1;
8649 CLASSTYPE_VISIBILITY (type
) = CLASSTYPE_VISIBILITY (pattern
);
8650 /* Adjust visibility for template arguments. */
8651 determine_visibility (TYPE_MAIN_DECL (type
));
8653 CLASSTYPE_FINAL (type
) = CLASSTYPE_FINAL (pattern
);
8655 pbinfo
= TYPE_BINFO (pattern
);
8657 /* We should never instantiate a nested class before its enclosing
8658 class; we need to look up the nested class by name before we can
8659 instantiate it, and that lookup should instantiate the enclosing
8661 gcc_assert (!DECL_CLASS_SCOPE_P (TYPE_MAIN_DECL (pattern
))
8662 || COMPLETE_OR_OPEN_TYPE_P (TYPE_CONTEXT (type
)));
8664 base_list
= NULL_TREE
;
8665 if (BINFO_N_BASE_BINFOS (pbinfo
))
8671 /* We must enter the scope containing the type, as that is where
8672 the accessibility of types named in dependent bases are
8674 pushed_scope
= push_scope (CP_TYPE_CONTEXT (type
));
8676 /* Substitute into each of the bases to determine the actual
8678 for (i
= 0; BINFO_BASE_ITERATE (pbinfo
, i
, pbase_binfo
); i
++)
8681 tree access
= BINFO_BASE_ACCESS (pbinfo
, i
);
8682 tree expanded_bases
= NULL_TREE
;
8685 if (PACK_EXPANSION_P (BINFO_TYPE (pbase_binfo
)))
8688 tsubst_pack_expansion (BINFO_TYPE (pbase_binfo
),
8689 args
, tf_error
, NULL_TREE
);
8690 if (expanded_bases
== error_mark_node
)
8693 len
= TREE_VEC_LENGTH (expanded_bases
);
8696 for (idx
= 0; idx
< len
; idx
++)
8699 /* Extract the already-expanded base class. */
8700 base
= TREE_VEC_ELT (expanded_bases
, idx
);
8702 /* Substitute to figure out the base class. */
8703 base
= tsubst (BINFO_TYPE (pbase_binfo
), args
, tf_error
,
8706 if (base
== error_mark_node
)
8709 base_list
= tree_cons (access
, base
, base_list
);
8710 if (BINFO_VIRTUAL_P (pbase_binfo
))
8711 TREE_TYPE (base_list
) = integer_type_node
;
8715 /* The list is now in reverse order; correct that. */
8716 base_list
= nreverse (base_list
);
8719 pop_scope (pushed_scope
);
8721 /* Now call xref_basetypes to set up all the base-class
8723 xref_basetypes (type
, base_list
);
8725 apply_late_template_attributes (&type
, TYPE_ATTRIBUTES (pattern
),
8726 (int) ATTR_FLAG_TYPE_IN_PLACE
,
8727 args
, tf_error
, NULL_TREE
);
8728 fixup_attribute_variants (type
);
8730 /* Now that our base classes are set up, enter the scope of the
8731 class, so that name lookups into base classes, etc. will work
8732 correctly. This is precisely analogous to what we do in
8733 begin_class_definition when defining an ordinary non-template
8734 class, except we also need to push the enclosing classes. */
8735 push_nested_class (type
);
8737 /* Now members are processed in the order of declaration. */
8738 for (member
= CLASSTYPE_DECL_LIST (pattern
);
8739 member
; member
= TREE_CHAIN (member
))
8741 tree t
= TREE_VALUE (member
);
8743 if (TREE_PURPOSE (member
))
8747 /* Build new CLASSTYPE_NESTED_UTDS. */
8750 bool class_template_p
;
8752 class_template_p
= (TREE_CODE (t
) != ENUMERAL_TYPE
8753 && TYPE_LANG_SPECIFIC (t
)
8754 && CLASSTYPE_IS_TEMPLATE (t
));
8755 /* If the member is a class template, then -- even after
8756 substitution -- there may be dependent types in the
8757 template argument list for the class. We increment
8758 PROCESSING_TEMPLATE_DECL so that dependent_type_p, as
8759 that function will assume that no types are dependent
8760 when outside of a template. */
8761 if (class_template_p
)
8762 ++processing_template_decl
;
8763 newtag
= tsubst (t
, args
, tf_error
, NULL_TREE
);
8764 if (class_template_p
)
8765 --processing_template_decl
;
8766 if (newtag
== error_mark_node
)
8769 if (TREE_CODE (newtag
) != ENUMERAL_TYPE
)
8771 tree name
= TYPE_IDENTIFIER (t
);
8773 if (class_template_p
)
8774 /* Unfortunately, lookup_template_class sets
8775 CLASSTYPE_IMPLICIT_INSTANTIATION for a partial
8776 instantiation (i.e., for the type of a member
8777 template class nested within a template class.)
8778 This behavior is required for
8779 maybe_process_partial_specialization to work
8780 correctly, but is not accurate in this case;
8781 the TAG is not an instantiation of anything.
8782 (The corresponding TEMPLATE_DECL is an
8783 instantiation, but the TYPE is not.) */
8784 CLASSTYPE_USE_TEMPLATE (newtag
) = 0;
8786 /* Now, we call pushtag to put this NEWTAG into the scope of
8787 TYPE. We first set up the IDENTIFIER_TYPE_VALUE to avoid
8788 pushtag calling push_template_decl. We don't have to do
8789 this for enums because it will already have been done in
8792 SET_IDENTIFIER_TYPE_VALUE (name
, newtag
);
8793 pushtag (name
, newtag
, /*tag_scope=*/ts_current
);
8796 else if (TREE_CODE (t
) == FUNCTION_DECL
8797 || DECL_FUNCTION_TEMPLATE_P (t
))
8799 /* Build new TYPE_METHODS. */
8802 if (TREE_CODE (t
) == TEMPLATE_DECL
)
8803 ++processing_template_decl
;
8804 r
= tsubst (t
, args
, tf_error
, NULL_TREE
);
8805 if (TREE_CODE (t
) == TEMPLATE_DECL
)
8806 --processing_template_decl
;
8807 set_current_access_from_decl (r
);
8808 finish_member_declaration (r
);
8809 /* Instantiate members marked with attribute used. */
8810 if (r
!= error_mark_node
&& DECL_PRESERVE_P (r
))
8815 /* Build new TYPE_FIELDS. */
8816 if (TREE_CODE (t
) == STATIC_ASSERT
)
8820 ++c_inhibit_evaluation_warnings
;
8822 tsubst_expr (STATIC_ASSERT_CONDITION (t
), args
,
8823 tf_warning_or_error
, NULL_TREE
,
8824 /*integral_constant_expression_p=*/true);
8825 --c_inhibit_evaluation_warnings
;
8827 finish_static_assert (condition
,
8828 STATIC_ASSERT_MESSAGE (t
),
8829 STATIC_ASSERT_SOURCE_LOCATION (t
),
8832 else if (TREE_CODE (t
) != CONST_DECL
)
8836 /* The file and line for this declaration, to
8837 assist in error message reporting. Since we
8838 called push_tinst_level above, we don't need to
8840 input_location
= DECL_SOURCE_LOCATION (t
);
8842 if (TREE_CODE (t
) == TEMPLATE_DECL
)
8843 ++processing_template_decl
;
8844 r
= tsubst (t
, args
, tf_warning_or_error
, NULL_TREE
);
8845 if (TREE_CODE (t
) == TEMPLATE_DECL
)
8846 --processing_template_decl
;
8847 if (TREE_CODE (r
) == VAR_DECL
)
8851 [t]he initialization (and any associated
8852 side-effects) of a static data member does
8853 not occur unless the static data member is
8854 itself used in a way that requires the
8855 definition of the static data member to
8858 Therefore, we do not substitute into the
8859 initialized for the static data member here. */
8860 finish_static_data_member_decl
8863 /*init_const_expr_p=*/false,
8864 /*asmspec_tree=*/NULL_TREE
,
8866 /* Instantiate members marked with attribute used. */
8867 if (r
!= error_mark_node
&& DECL_PRESERVE_P (r
))
8870 else if (TREE_CODE (r
) == FIELD_DECL
)
8872 /* Determine whether R has a valid type and can be
8873 completed later. If R is invalid, then it is
8874 replaced by error_mark_node so that it will not be
8875 added to TYPE_FIELDS. */
8876 tree rtype
= TREE_TYPE (r
);
8877 if (can_complete_type_without_circularity (rtype
))
8878 complete_type (rtype
);
8880 if (!COMPLETE_TYPE_P (rtype
))
8882 cxx_incomplete_type_error (r
, rtype
);
8883 r
= error_mark_node
;
8887 /* If it is a TYPE_DECL for a class-scoped ENUMERAL_TYPE,
8888 such a thing will already have been added to the field
8889 list by tsubst_enum in finish_member_declaration in the
8890 CLASSTYPE_NESTED_UTDS case above. */
8891 if (!(TREE_CODE (r
) == TYPE_DECL
8892 && TREE_CODE (TREE_TYPE (r
)) == ENUMERAL_TYPE
8893 && DECL_ARTIFICIAL (r
)))
8895 set_current_access_from_decl (r
);
8896 finish_member_declaration (r
);
8903 if (TYPE_P (t
) || DECL_CLASS_TEMPLATE_P (t
)
8904 || DECL_TEMPLATE_TEMPLATE_PARM_P (t
))
8906 /* Build new CLASSTYPE_FRIEND_CLASSES. */
8908 tree friend_type
= t
;
8909 bool adjust_processing_template_decl
= false;
8911 if (TREE_CODE (friend_type
) == TEMPLATE_DECL
)
8913 /* template <class T> friend class C; */
8914 friend_type
= tsubst_friend_class (friend_type
, args
);
8915 adjust_processing_template_decl
= true;
8917 else if (TREE_CODE (friend_type
) == UNBOUND_CLASS_TEMPLATE
)
8919 /* template <class T> friend class C::D; */
8920 friend_type
= tsubst (friend_type
, args
,
8921 tf_warning_or_error
, NULL_TREE
);
8922 if (TREE_CODE (friend_type
) == TEMPLATE_DECL
)
8923 friend_type
= TREE_TYPE (friend_type
);
8924 adjust_processing_template_decl
= true;
8926 else if (TREE_CODE (friend_type
) == TYPENAME_TYPE
8927 || TREE_CODE (friend_type
) == TEMPLATE_TYPE_PARM
)
8929 /* This could be either
8933 when dependent_type_p is false or
8935 template <class U> friend class T::C;
8938 friend_type
= tsubst (friend_type
, args
,
8939 tf_warning_or_error
, NULL_TREE
);
8940 /* Bump processing_template_decl for correct
8941 dependent_type_p calculation. */
8942 ++processing_template_decl
;
8943 if (dependent_type_p (friend_type
))
8944 adjust_processing_template_decl
= true;
8945 --processing_template_decl
;
8947 else if (!CLASSTYPE_USE_TEMPLATE (friend_type
)
8948 && hidden_name_p (TYPE_NAME (friend_type
)))
8952 where C hasn't been declared yet. Let's lookup name
8953 from namespace scope directly, bypassing any name that
8954 come from dependent base class. */
8955 tree ns
= decl_namespace_context (TYPE_MAIN_DECL (friend_type
));
8957 /* The call to xref_tag_from_type does injection for friend
8959 push_nested_namespace (ns
);
8961 xref_tag_from_type (friend_type
, NULL_TREE
,
8962 /*tag_scope=*/ts_current
);
8963 pop_nested_namespace (ns
);
8965 else if (uses_template_parms (friend_type
))
8966 /* friend class C<T>; */
8967 friend_type
= tsubst (friend_type
, args
,
8968 tf_warning_or_error
, NULL_TREE
);
8973 where C is already declared or
8975 friend class C<int>;
8977 We don't have to do anything in these cases. */
8979 if (adjust_processing_template_decl
)
8980 /* Trick make_friend_class into realizing that the friend
8981 we're adding is a template, not an ordinary class. It's
8982 important that we use make_friend_class since it will
8983 perform some error-checking and output cross-reference
8985 ++processing_template_decl
;
8987 if (friend_type
!= error_mark_node
)
8988 make_friend_class (type
, friend_type
, /*complain=*/false);
8990 if (adjust_processing_template_decl
)
8991 --processing_template_decl
;
8995 /* Build new DECL_FRIENDLIST. */
8998 /* The file and line for this declaration, to
8999 assist in error message reporting. Since we
9000 called push_tinst_level above, we don't need to
9002 input_location
= DECL_SOURCE_LOCATION (t
);
9004 if (TREE_CODE (t
) == TEMPLATE_DECL
)
9006 ++processing_template_decl
;
9007 push_deferring_access_checks (dk_no_check
);
9010 r
= tsubst_friend_function (t
, args
);
9011 add_friend (type
, r
, /*complain=*/false);
9012 if (TREE_CODE (t
) == TEMPLATE_DECL
)
9014 pop_deferring_access_checks ();
9015 --processing_template_decl
;
9021 if (tree expr
= CLASSTYPE_LAMBDA_EXPR (type
))
9023 tree decl
= lambda_function (type
);
9026 instantiate_decl (decl
, false, false);
9028 /* We need to instantiate the capture list from the template
9029 after we've instantiated the closure members, but before we
9030 consider adding the conversion op. Also keep any captures
9031 that may have been added during instantiation of the op(). */
9032 tree tmpl_expr
= CLASSTYPE_LAMBDA_EXPR (pattern
);
9034 = tsubst_copy_and_build (LAMBDA_EXPR_CAPTURE_LIST (tmpl_expr
),
9035 args
, tf_warning_or_error
, NULL_TREE
,
9038 LAMBDA_EXPR_CAPTURE_LIST (expr
)
9039 = chainon (tmpl_cap
, nreverse (LAMBDA_EXPR_CAPTURE_LIST (expr
)));
9041 maybe_add_lambda_conv_op (type
);
9044 gcc_assert (errorcount
);
9047 /* Set the file and line number information to whatever is given for
9048 the class itself. This puts error messages involving generated
9049 implicit functions at a predictable point, and the same point
9050 that would be used for non-template classes. */
9051 input_location
= DECL_SOURCE_LOCATION (typedecl
);
9053 unreverse_member_declarations (type
);
9054 finish_struct_1 (type
);
9055 TYPE_BEING_DEFINED (type
) = 0;
9057 /* We don't instantiate default arguments for member functions. 14.7.1:
9059 The implicit instantiation of a class template specialization causes
9060 the implicit instantiation of the declarations, but not of the
9061 definitions or default arguments, of the class member functions,
9062 member classes, static data members and member templates.... */
9064 /* Some typedefs referenced from within the template code need to be access
9065 checked at template instantiation time, i.e now. These types were
9066 added to the template at parsing time. Let's get those and perform
9067 the access checks then. */
9068 perform_typedefs_access_check (pattern
, args
);
9069 perform_deferred_access_checks (tf_warning_or_error
);
9070 pop_nested_class ();
9071 maximum_field_alignment
= saved_maximum_field_alignment
;
9073 pop_from_top_level ();
9074 pop_deferring_access_checks ();
9077 /* The vtable for a template class can be emitted in any translation
9078 unit in which the class is instantiated. When there is no key
9079 method, however, finish_struct_1 will already have added TYPE to
9080 the keyed_classes list. */
9081 if (TYPE_CONTAINS_VPTR_P (type
) && CLASSTYPE_KEY_METHOD (type
))
9082 keyed_classes
= tree_cons (NULL_TREE
, type
, keyed_classes
);
9087 /* Wrapper for instantiate_class_template_1. */
9090 instantiate_class_template (tree type
)
9093 timevar_push (TV_TEMPLATE_INST
);
9094 ret
= instantiate_class_template_1 (type
);
9095 timevar_pop (TV_TEMPLATE_INST
);
9100 tsubst_template_arg (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
9106 else if (TYPE_P (t
))
9107 r
= tsubst (t
, args
, complain
, in_decl
);
9110 if (!(complain
& tf_warning
))
9111 ++c_inhibit_evaluation_warnings
;
9112 r
= tsubst_expr (t
, args
, complain
, in_decl
,
9113 /*integral_constant_expression_p=*/true);
9114 if (!(complain
& tf_warning
))
9115 --c_inhibit_evaluation_warnings
;
9120 /* Given a function parameter pack TMPL_PARM and some function parameters
9121 instantiated from it at *SPEC_P, return a NONTYPE_ARGUMENT_PACK of them
9122 and set *SPEC_P to point at the next point in the list. */
9125 extract_fnparm_pack (tree tmpl_parm
, tree
*spec_p
)
9127 /* Collect all of the extra "packed" parameters into an
9131 tree argpack
= make_node (NONTYPE_ARGUMENT_PACK
);
9132 tree argtypepack
= cxx_make_type (TYPE_ARGUMENT_PACK
);
9133 tree spec_parm
= *spec_p
;
9136 for (len
= 0; spec_parm
; ++len
, spec_parm
= TREE_CHAIN (spec_parm
))
9138 && !function_parameter_expanded_from_pack_p (spec_parm
, tmpl_parm
))
9141 /* Fill in PARMVEC and PARMTYPEVEC with all of the parameters. */
9142 parmvec
= make_tree_vec (len
);
9143 parmtypevec
= make_tree_vec (len
);
9144 spec_parm
= *spec_p
;
9145 for (i
= 0; i
< len
; i
++, spec_parm
= DECL_CHAIN (spec_parm
))
9147 TREE_VEC_ELT (parmvec
, i
) = spec_parm
;
9148 TREE_VEC_ELT (parmtypevec
, i
) = TREE_TYPE (spec_parm
);
9151 /* Build the argument packs. */
9152 SET_ARGUMENT_PACK_ARGS (argpack
, parmvec
);
9153 SET_ARGUMENT_PACK_ARGS (argtypepack
, parmtypevec
);
9154 TREE_TYPE (argpack
) = argtypepack
;
9155 *spec_p
= spec_parm
;
9160 /* Give a chain SPEC_PARM of PARM_DECLs, pack them into a
9161 NONTYPE_ARGUMENT_PACK. */
9164 make_fnparm_pack (tree spec_parm
)
9166 return extract_fnparm_pack (NULL_TREE
, &spec_parm
);
9169 /* Return true iff the Ith element of the argument pack ARG_PACK is a
9173 argument_pack_element_is_expansion_p (tree arg_pack
, int i
)
9175 tree vec
= ARGUMENT_PACK_ARGS (arg_pack
);
9176 if (i
>= TREE_VEC_LENGTH (vec
))
9178 return PACK_EXPANSION_P (TREE_VEC_ELT (vec
, i
));
9182 /* Creates and return an ARGUMENT_PACK_SELECT tree node. */
9185 make_argument_pack_select (tree arg_pack
, unsigned index
)
9187 tree aps
= make_node (ARGUMENT_PACK_SELECT
);
9189 ARGUMENT_PACK_SELECT_FROM_PACK (aps
) = arg_pack
;
9190 ARGUMENT_PACK_SELECT_INDEX (aps
) = index
;
9195 /* This is a subroutine of tsubst_pack_expansion.
9197 It returns TRUE if we need to use the PACK_EXPANSION_EXTRA_ARGS
9198 mechanism to store the (non complete list of) arguments of the
9199 substitution and return a non substituted pack expansion, in order
9200 to wait for when we have enough arguments to really perform the
9204 use_pack_expansion_extra_args_p (tree parm_packs
,
9208 /* If one pack has an expansion and another pack has a normal
9209 argument or if one pack has an empty argument and an another
9210 one hasn't then tsubst_pack_expansion cannot perform the
9211 substitution and need to fall back on the
9212 PACK_EXPANSION_EXTRA mechanism. */
9213 if (parm_packs
== NULL_TREE
)
9215 else if (has_empty_arg
)
9218 bool has_expansion_arg
= false;
9219 for (int i
= 0 ; i
< arg_pack_len
; ++i
)
9221 bool has_non_expansion_arg
= false;
9222 for (tree parm_pack
= parm_packs
;
9224 parm_pack
= TREE_CHAIN (parm_pack
))
9226 tree arg
= TREE_VALUE (parm_pack
);
9228 if (argument_pack_element_is_expansion_p (arg
, i
))
9229 has_expansion_arg
= true;
9231 has_non_expansion_arg
= true;
9234 if (has_expansion_arg
&& has_non_expansion_arg
)
9240 /* [temp.variadic]/6 says that:
9242 The instantiation of a pack expansion [...]
9243 produces a list E1,E2, ..., En, where N is the number of elements
9244 in the pack expansion parameters.
9246 This subroutine of tsubst_pack_expansion produces one of these Ei.
9248 PATTERN is the pattern of the pack expansion. PARM_PACKS is a
9249 TREE_LIST in which each TREE_PURPOSE is a parameter pack of
9250 PATTERN, and each TREE_VALUE is its corresponding argument pack.
9251 INDEX is the index 'i' of the element Ei to produce. ARGS,
9252 COMPLAIN, and IN_DECL are the same parameters as for the
9253 tsubst_pack_expansion function.
9255 The function returns the resulting Ei upon successful completion,
9258 Note that this function possibly modifies the ARGS parameter, so
9259 it's the responsibility of the caller to restore it. */
9262 gen_elem_of_pack_expansion_instantiation (tree pattern
,
9265 tree args
/* This parm gets
9267 tsubst_flags_t complain
,
9271 bool ith_elem_is_expansion
= false;
9273 /* For each parameter pack, change the substitution of the parameter
9274 pack to the ith argument in its argument pack, then expand the
9276 for (tree pack
= parm_packs
; pack
; pack
= TREE_CHAIN (pack
))
9278 tree parm
= TREE_PURPOSE (pack
);
9279 tree arg_pack
= TREE_VALUE (pack
);
9280 tree aps
; /* instance of ARGUMENT_PACK_SELECT. */
9282 ith_elem_is_expansion
|=
9283 argument_pack_element_is_expansion_p (arg_pack
, index
);
9285 /* Select the Ith argument from the pack. */
9286 if (TREE_CODE (parm
) == PARM_DECL
)
9290 aps
= make_argument_pack_select (arg_pack
, index
);
9292 register_local_specialization (aps
, parm
);
9295 aps
= retrieve_local_specialization (parm
);
9300 template_parm_level_and_index (parm
, &level
, &idx
);
9304 aps
= make_argument_pack_select (arg_pack
, index
);
9305 /* Update the corresponding argument. */
9306 TMPL_ARG (args
, level
, idx
) = aps
;
9309 /* Re-use the ARGUMENT_PACK_SELECT. */
9310 aps
= TMPL_ARG (args
, level
, idx
);
9312 ARGUMENT_PACK_SELECT_INDEX (aps
) = index
;
9315 /* Substitute into the PATTERN with the (possibly altered)
9317 if (!TYPE_P (pattern
))
9318 t
= tsubst_expr (pattern
, args
, complain
, in_decl
,
9319 /*integral_constant_expression_p=*/false);
9321 t
= tsubst (pattern
, args
, complain
, in_decl
);
9323 /* If the Ith argument pack element is a pack expansion, then
9324 the Ith element resulting from the substituting is going to
9325 be a pack expansion as well. */
9326 if (ith_elem_is_expansion
)
9327 t
= make_pack_expansion (t
);
9332 /* Substitute ARGS into T, which is an pack expansion
9333 (i.e. TYPE_PACK_EXPANSION or EXPR_PACK_EXPANSION). Returns a
9334 TREE_VEC with the substituted arguments, a PACK_EXPANSION_* node
9335 (if only a partial substitution could be performed) or
9336 ERROR_MARK_NODE if there was an error. */
9338 tsubst_pack_expansion (tree t
, tree args
, tsubst_flags_t complain
,
9342 tree pack
, packs
= NULL_TREE
;
9343 bool unsubstituted_packs
= false;
9346 struct pointer_map_t
*saved_local_specializations
= NULL
;
9347 bool need_local_specializations
= false;
9350 gcc_assert (PACK_EXPANSION_P (t
));
9351 pattern
= PACK_EXPANSION_PATTERN (t
);
9353 /* Add in any args remembered from an earlier partial instantiation. */
9354 args
= add_to_template_args (PACK_EXPANSION_EXTRA_ARGS (t
), args
);
9356 levels
= TMPL_ARGS_DEPTH (args
);
9358 /* Determine the argument packs that will instantiate the parameter
9359 packs used in the expansion expression. While we're at it,
9360 compute the number of arguments to be expanded and make sure it
9362 for (pack
= PACK_EXPANSION_PARAMETER_PACKS (t
); pack
;
9363 pack
= TREE_CHAIN (pack
))
9365 tree parm_pack
= TREE_VALUE (pack
);
9366 tree arg_pack
= NULL_TREE
;
9367 tree orig_arg
= NULL_TREE
;
9370 if (TREE_CODE (parm_pack
) == BASES
)
9372 if (BASES_DIRECT (parm_pack
))
9373 return calculate_direct_bases (tsubst_expr (BASES_TYPE (parm_pack
),
9374 args
, complain
, in_decl
, false));
9376 return calculate_bases (tsubst_expr (BASES_TYPE (parm_pack
),
9377 args
, complain
, in_decl
, false));
9379 if (TREE_CODE (parm_pack
) == PARM_DECL
)
9381 if (PACK_EXPANSION_LOCAL_P (t
))
9382 arg_pack
= retrieve_local_specialization (parm_pack
);
9385 /* We can't rely on local_specializations for a parameter
9386 name used later in a function declaration (such as in a
9387 late-specified return type). Even if it exists, it might
9388 have the wrong value for a recursive call. Just make a
9389 dummy decl, since it's only used for its type. */
9390 arg_pack
= tsubst_decl (parm_pack
, args
, complain
);
9391 if (arg_pack
&& FUNCTION_PARAMETER_PACK_P (arg_pack
))
9392 /* Partial instantiation of the parm_pack, we can't build
9393 up an argument pack yet. */
9394 arg_pack
= NULL_TREE
;
9396 arg_pack
= make_fnparm_pack (arg_pack
);
9397 need_local_specializations
= true;
9403 template_parm_level_and_index (parm_pack
, &level
, &idx
);
9405 if (level
<= levels
)
9406 arg_pack
= TMPL_ARG (args
, level
, idx
);
9409 orig_arg
= arg_pack
;
9410 if (arg_pack
&& TREE_CODE (arg_pack
) == ARGUMENT_PACK_SELECT
)
9411 arg_pack
= ARGUMENT_PACK_SELECT_FROM_PACK (arg_pack
);
9413 if (arg_pack
&& !ARGUMENT_PACK_P (arg_pack
))
9414 /* This can only happen if we forget to expand an argument
9415 pack somewhere else. Just return an error, silently. */
9417 result
= make_tree_vec (1);
9418 TREE_VEC_ELT (result
, 0) = error_mark_node
;
9425 TREE_VEC_LENGTH (ARGUMENT_PACK_ARGS (arg_pack
));
9427 /* Don't bother trying to do a partial substitution with
9428 incomplete packs; we'll try again after deduction. */
9429 if (ARGUMENT_PACK_INCOMPLETE_P (arg_pack
))
9434 else if (len
!= my_len
)
9436 if (!(complain
& tf_error
))
9437 /* Fail quietly. */;
9438 else if (TREE_CODE (t
) == TYPE_PACK_EXPANSION
)
9439 error ("mismatched argument pack lengths while expanding "
9443 error ("mismatched argument pack lengths while expanding "
9446 return error_mark_node
;
9449 /* Keep track of the parameter packs and their corresponding
9451 packs
= tree_cons (parm_pack
, arg_pack
, packs
);
9452 TREE_TYPE (packs
) = orig_arg
;
9456 /* We can't substitute for this parameter pack. We use a flag as
9457 well as the missing_level counter because function parameter
9458 packs don't have a level. */
9459 unsubstituted_packs
= true;
9463 /* We cannot expand this expansion expression, because we don't have
9464 all of the argument packs we need. */
9465 if (use_pack_expansion_extra_args_p (packs
, len
, unsubstituted_packs
))
9467 /* We got some full packs, but we can't substitute them in until we
9468 have values for all the packs. So remember these until then. */
9470 t
= make_pack_expansion (pattern
);
9471 PACK_EXPANSION_EXTRA_ARGS (t
) = args
;
9474 else if (unsubstituted_packs
)
9476 /* There were no real arguments, we're just replacing a parameter
9477 pack with another version of itself. Substitute into the
9478 pattern and return a PACK_EXPANSION_*. The caller will need to
9480 if (TREE_CODE (t
) == EXPR_PACK_EXPANSION
)
9481 t
= tsubst_expr (pattern
, args
, complain
, in_decl
,
9482 /*integral_constant_expression_p=*/false);
9484 t
= tsubst (pattern
, args
, complain
, in_decl
);
9485 t
= make_pack_expansion (t
);
9489 gcc_assert (len
>= 0);
9491 if (need_local_specializations
)
9493 /* We're in a late-specified return type, so create our own local
9494 specializations map; the current map is either NULL or (in the
9495 case of recursive unification) might have bindings that we don't
9496 want to use or alter. */
9497 saved_local_specializations
= local_specializations
;
9498 local_specializations
= pointer_map_create ();
9501 /* For each argument in each argument pack, substitute into the
9503 result
= make_tree_vec (len
);
9504 for (i
= 0; i
< len
; ++i
)
9506 t
= gen_elem_of_pack_expansion_instantiation (pattern
, packs
,
9510 TREE_VEC_ELT (result
, i
) = t
;
9511 if (t
== error_mark_node
)
9513 result
= error_mark_node
;
9518 /* Update ARGS to restore the substitution from parameter packs to
9519 their argument packs. */
9520 for (pack
= packs
; pack
; pack
= TREE_CHAIN (pack
))
9522 tree parm
= TREE_PURPOSE (pack
);
9524 if (TREE_CODE (parm
) == PARM_DECL
)
9525 register_local_specialization (TREE_TYPE (pack
), parm
);
9530 if (TREE_VALUE (pack
) == NULL_TREE
)
9533 template_parm_level_and_index (parm
, &level
, &idx
);
9535 /* Update the corresponding argument. */
9536 if (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (args
))
9537 TREE_VEC_ELT (TREE_VEC_ELT (args
, level
-1 ), idx
) =
9540 TREE_VEC_ELT (args
, idx
) = TREE_TYPE (pack
);
9544 if (need_local_specializations
)
9546 pointer_map_destroy (local_specializations
);
9547 local_specializations
= saved_local_specializations
;
9553 /* Given PARM_DECL PARM, find the corresponding PARM_DECL in the template
9554 TMPL. We do this using DECL_PARM_INDEX, which should work even with
9555 parameter packs; all parms generated from a function parameter pack will
9556 have the same DECL_PARM_INDEX. */
9559 get_pattern_parm (tree parm
, tree tmpl
)
9561 tree pattern
= DECL_TEMPLATE_RESULT (tmpl
);
9564 if (DECL_ARTIFICIAL (parm
))
9566 for (patparm
= DECL_ARGUMENTS (pattern
);
9567 patparm
; patparm
= DECL_CHAIN (patparm
))
9568 if (DECL_ARTIFICIAL (patparm
)
9569 && DECL_NAME (parm
) == DECL_NAME (patparm
))
9574 patparm
= FUNCTION_FIRST_USER_PARM (DECL_TEMPLATE_RESULT (tmpl
));
9575 patparm
= chain_index (DECL_PARM_INDEX (parm
)-1, patparm
);
9576 gcc_assert (DECL_PARM_INDEX (patparm
)
9577 == DECL_PARM_INDEX (parm
));
9583 /* Substitute ARGS into the vector or list of template arguments T. */
9586 tsubst_template_args (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
9589 int len
, need_new
= 0, i
, expanded_len_adjust
= 0, out
;
9592 if (t
== error_mark_node
)
9593 return error_mark_node
;
9595 len
= TREE_VEC_LENGTH (t
);
9596 elts
= XALLOCAVEC (tree
, len
);
9598 for (i
= 0; i
< len
; i
++)
9600 tree orig_arg
= TREE_VEC_ELT (t
, i
);
9603 if (TREE_CODE (orig_arg
) == TREE_VEC
)
9604 new_arg
= tsubst_template_args (orig_arg
, args
, complain
, in_decl
);
9605 else if (PACK_EXPANSION_P (orig_arg
))
9607 /* Substitute into an expansion expression. */
9608 new_arg
= tsubst_pack_expansion (orig_arg
, args
, complain
, in_decl
);
9610 if (TREE_CODE (new_arg
) == TREE_VEC
)
9611 /* Add to the expanded length adjustment the number of
9612 expanded arguments. We subtract one from this
9613 measurement, because the argument pack expression
9614 itself is already counted as 1 in
9615 LEN. EXPANDED_LEN_ADJUST can actually be negative, if
9616 the argument pack is empty. */
9617 expanded_len_adjust
+= TREE_VEC_LENGTH (new_arg
) - 1;
9619 else if (ARGUMENT_PACK_P (orig_arg
))
9621 /* Substitute into each of the arguments. */
9622 new_arg
= TYPE_P (orig_arg
)
9623 ? cxx_make_type (TREE_CODE (orig_arg
))
9624 : make_node (TREE_CODE (orig_arg
));
9626 SET_ARGUMENT_PACK_ARGS (
9628 tsubst_template_args (ARGUMENT_PACK_ARGS (orig_arg
),
9629 args
, complain
, in_decl
));
9631 if (ARGUMENT_PACK_ARGS (new_arg
) == error_mark_node
)
9632 new_arg
= error_mark_node
;
9634 if (TREE_CODE (new_arg
) == NONTYPE_ARGUMENT_PACK
) {
9635 TREE_TYPE (new_arg
) = tsubst (TREE_TYPE (orig_arg
), args
,
9637 TREE_CONSTANT (new_arg
) = TREE_CONSTANT (orig_arg
);
9639 if (TREE_TYPE (new_arg
) == error_mark_node
)
9640 new_arg
= error_mark_node
;
9644 new_arg
= tsubst_template_arg (orig_arg
, args
, complain
, in_decl
);
9646 if (new_arg
== error_mark_node
)
9647 return error_mark_node
;
9650 if (new_arg
!= orig_arg
)
9657 /* Make space for the expanded arguments coming from template
9659 t
= make_tree_vec (len
+ expanded_len_adjust
);
9660 /* ORIG_T can contain TREE_VECs. That happens if ORIG_T contains the
9661 arguments for a member template.
9662 In that case each TREE_VEC in ORIG_T represents a level of template
9663 arguments, and ORIG_T won't carry any non defaulted argument count.
9664 It will rather be the nested TREE_VECs that will carry one.
9665 In other words, ORIG_T carries a non defaulted argument count only
9666 if it doesn't contain any nested TREE_VEC. */
9667 if (NON_DEFAULT_TEMPLATE_ARGS_COUNT (orig_t
))
9669 int count
= GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (orig_t
);
9670 count
+= expanded_len_adjust
;
9671 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (t
, count
);
9673 for (i
= 0, out
= 0; i
< len
; i
++)
9675 if ((PACK_EXPANSION_P (TREE_VEC_ELT (orig_t
, i
))
9676 || ARGUMENT_PACK_P (TREE_VEC_ELT (orig_t
, i
)))
9677 && TREE_CODE (elts
[i
]) == TREE_VEC
)
9681 /* Now expand the template argument pack "in place". */
9682 for (idx
= 0; idx
< TREE_VEC_LENGTH (elts
[i
]); idx
++, out
++)
9683 TREE_VEC_ELT (t
, out
) = TREE_VEC_ELT (elts
[i
], idx
);
9687 TREE_VEC_ELT (t
, out
) = elts
[i
];
9695 /* Return the result of substituting ARGS into the template parameters
9696 given by PARMS. If there are m levels of ARGS and m + n levels of
9697 PARMS, then the result will contain n levels of PARMS. For
9698 example, if PARMS is `template <class T> template <class U>
9699 template <T*, U, class V>' and ARGS is {{int}, {double}} then the
9700 result will be `template <int*, double, class V>'. */
9703 tsubst_template_parms (tree parms
, tree args
, tsubst_flags_t complain
)
9708 /* When substituting into a template, we must set
9709 PROCESSING_TEMPLATE_DECL as the template parameters may be
9710 dependent if they are based on one-another, and the dependency
9711 predicates are short-circuit outside of templates. */
9712 ++processing_template_decl
;
9714 for (new_parms
= &r
;
9715 parms
&& TMPL_PARMS_DEPTH (parms
) > TMPL_ARGS_DEPTH (args
);
9716 new_parms
= &(TREE_CHAIN (*new_parms
)),
9717 parms
= TREE_CHAIN (parms
))
9720 make_tree_vec (TREE_VEC_LENGTH (TREE_VALUE (parms
)));
9723 for (i
= 0; i
< TREE_VEC_LENGTH (new_vec
); ++i
)
9727 if (parms
== error_mark_node
)
9730 tuple
= TREE_VEC_ELT (TREE_VALUE (parms
), i
);
9732 if (tuple
== error_mark_node
)
9735 TREE_VEC_ELT (new_vec
, i
) =
9736 tsubst_template_parm (tuple
, args
, complain
);
9740 tree_cons (size_int (TMPL_PARMS_DEPTH (parms
)
9741 - TMPL_ARGS_DEPTH (args
)),
9742 new_vec
, NULL_TREE
);
9745 --processing_template_decl
;
9750 /* Return the result of substituting ARGS into one template parameter
9751 given by T. T Must be a TREE_LIST which TREE_VALUE is the template
9752 parameter and which TREE_PURPOSE is the default argument of the
9753 template parameter. */
9756 tsubst_template_parm (tree t
, tree args
, tsubst_flags_t complain
)
9758 tree default_value
, parm_decl
;
9760 if (args
== NULL_TREE
9762 || t
== error_mark_node
)
9765 gcc_assert (TREE_CODE (t
) == TREE_LIST
);
9767 default_value
= TREE_PURPOSE (t
);
9768 parm_decl
= TREE_VALUE (t
);
9770 parm_decl
= tsubst (parm_decl
, args
, complain
, NULL_TREE
);
9771 if (TREE_CODE (parm_decl
) == PARM_DECL
9772 && invalid_nontype_parm_type_p (TREE_TYPE (parm_decl
), complain
))
9773 parm_decl
= error_mark_node
;
9774 default_value
= tsubst_template_arg (default_value
, args
,
9775 complain
, NULL_TREE
);
9777 return build_tree_list (default_value
, parm_decl
);
9780 /* Substitute the ARGS into the indicated aggregate (or enumeration)
9781 type T. If T is not an aggregate or enumeration type, it is
9782 handled as if by tsubst. IN_DECL is as for tsubst. If
9783 ENTERING_SCOPE is nonzero, T is the context for a template which
9784 we are presently tsubst'ing. Return the substituted value. */
9787 tsubst_aggr_type (tree t
,
9789 tsubst_flags_t complain
,
9796 switch (TREE_CODE (t
))
9799 if (TYPE_PTRMEMFUNC_P (t
))
9800 return tsubst (TYPE_PTRMEMFUNC_FN_TYPE (t
), args
, complain
, in_decl
);
9802 /* Else fall through. */
9805 if (TYPE_TEMPLATE_INFO (t
) && uses_template_parms (t
))
9810 int saved_unevaluated_operand
;
9811 int saved_inhibit_evaluation_warnings
;
9813 /* In "sizeof(X<I>)" we need to evaluate "I". */
9814 saved_unevaluated_operand
= cp_unevaluated_operand
;
9815 cp_unevaluated_operand
= 0;
9816 saved_inhibit_evaluation_warnings
= c_inhibit_evaluation_warnings
;
9817 c_inhibit_evaluation_warnings
= 0;
9819 /* First, determine the context for the type we are looking
9821 context
= TYPE_CONTEXT (t
);
9822 if (context
&& TYPE_P (context
))
9824 context
= tsubst_aggr_type (context
, args
, complain
,
9825 in_decl
, /*entering_scope=*/1);
9826 /* If context is a nested class inside a class template,
9827 it may still need to be instantiated (c++/33959). */
9828 context
= complete_type (context
);
9831 /* Then, figure out what arguments are appropriate for the
9832 type we are trying to find. For example, given:
9834 template <class T> struct S;
9835 template <class T, class U> void f(T, U) { S<U> su; }
9837 and supposing that we are instantiating f<int, double>,
9838 then our ARGS will be {int, double}, but, when looking up
9839 S we only want {double}. */
9840 argvec
= tsubst_template_args (TYPE_TI_ARGS (t
), args
,
9842 if (argvec
== error_mark_node
)
9843 r
= error_mark_node
;
9846 r
= lookup_template_class (t
, argvec
, in_decl
, context
,
9847 entering_scope
, complain
);
9848 r
= cp_build_qualified_type_real (r
, cp_type_quals (t
), complain
);
9851 cp_unevaluated_operand
= saved_unevaluated_operand
;
9852 c_inhibit_evaluation_warnings
= saved_inhibit_evaluation_warnings
;
9857 /* This is not a template type, so there's nothing to do. */
9861 return tsubst (t
, args
, complain
, in_decl
);
9865 /* Substitute into the default argument ARG (a default argument for
9866 FN), which has the indicated TYPE. */
9869 tsubst_default_argument (tree fn
, tree type
, tree arg
, tsubst_flags_t complain
)
9871 tree saved_class_ptr
= NULL_TREE
;
9872 tree saved_class_ref
= NULL_TREE
;
9873 int errs
= errorcount
+ sorrycount
;
9875 /* This can happen in invalid code. */
9876 if (TREE_CODE (arg
) == DEFAULT_ARG
)
9879 /* This default argument came from a template. Instantiate the
9880 default argument here, not in tsubst. In the case of
9889 we must be careful to do name lookup in the scope of S<T>,
9890 rather than in the current class. */
9891 push_access_scope (fn
);
9892 /* The "this" pointer is not valid in a default argument. */
9895 saved_class_ptr
= current_class_ptr
;
9896 cp_function_chain
->x_current_class_ptr
= NULL_TREE
;
9897 saved_class_ref
= current_class_ref
;
9898 cp_function_chain
->x_current_class_ref
= NULL_TREE
;
9901 push_deferring_access_checks(dk_no_deferred
);
9902 /* The default argument expression may cause implicitly defined
9903 member functions to be synthesized, which will result in garbage
9904 collection. We must treat this situation as if we were within
9905 the body of function so as to avoid collecting live data on the
9908 arg
= tsubst_expr (arg
, DECL_TI_ARGS (fn
),
9909 complain
, NULL_TREE
,
9910 /*integral_constant_expression_p=*/false);
9912 pop_deferring_access_checks();
9914 /* Restore the "this" pointer. */
9917 cp_function_chain
->x_current_class_ptr
= saved_class_ptr
;
9918 cp_function_chain
->x_current_class_ref
= saved_class_ref
;
9921 if (errorcount
+sorrycount
> errs
9922 && (complain
& tf_warning_or_error
))
9923 inform (input_location
,
9924 " when instantiating default argument for call to %D", fn
);
9926 /* Make sure the default argument is reasonable. */
9927 arg
= check_default_argument (type
, arg
, complain
);
9929 pop_access_scope (fn
);
9934 /* Substitute into all the default arguments for FN. */
9937 tsubst_default_arguments (tree fn
, tsubst_flags_t complain
)
9942 tmpl_args
= DECL_TI_ARGS (fn
);
9944 /* If this function is not yet instantiated, we certainly don't need
9945 its default arguments. */
9946 if (uses_template_parms (tmpl_args
))
9948 /* Don't do this again for clones. */
9949 if (DECL_CLONED_FUNCTION_P (fn
))
9952 for (arg
= TYPE_ARG_TYPES (TREE_TYPE (fn
));
9954 arg
= TREE_CHAIN (arg
))
9955 if (TREE_PURPOSE (arg
))
9956 TREE_PURPOSE (arg
) = tsubst_default_argument (fn
,
9962 /* Substitute the ARGS into the T, which is a _DECL. Return the
9963 result of the substitution. Issue error and warning messages under
9964 control of COMPLAIN. */
9967 tsubst_decl (tree t
, tree args
, tsubst_flags_t complain
)
9969 #define RETURN(EXP) do { r = (EXP); goto out; } while(0)
9970 location_t saved_loc
;
9975 /* Set the filename and linenumber to improve error-reporting. */
9976 saved_loc
= input_location
;
9977 input_location
= DECL_SOURCE_LOCATION (t
);
9979 switch (TREE_CODE (t
))
9983 /* We can get here when processing a member function template,
9984 member class template, or template template parameter. */
9985 tree decl
= DECL_TEMPLATE_RESULT (t
);
9990 if (DECL_TEMPLATE_TEMPLATE_PARM_P (t
))
9992 /* Template template parameter is treated here. */
9993 tree new_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
9994 if (new_type
== error_mark_node
)
9995 RETURN (error_mark_node
);
9996 /* If we get a real template back, return it. This can happen in
9997 the context of most_specialized_class. */
9998 if (TREE_CODE (new_type
) == TEMPLATE_DECL
)
10002 DECL_CHAIN (r
) = NULL_TREE
;
10003 TREE_TYPE (r
) = new_type
;
10004 DECL_TEMPLATE_RESULT (r
)
10005 = build_decl (DECL_SOURCE_LOCATION (decl
),
10006 TYPE_DECL
, DECL_NAME (decl
), new_type
);
10007 DECL_TEMPLATE_PARMS (r
)
10008 = tsubst_template_parms (DECL_TEMPLATE_PARMS (t
), args
,
10010 TYPE_NAME (new_type
) = r
;
10014 /* We might already have an instance of this template.
10015 The ARGS are for the surrounding class type, so the
10016 full args contain the tsubst'd args for the context,
10017 plus the innermost args from the template decl. */
10018 tmpl_args
= DECL_CLASS_TEMPLATE_P (t
)
10019 ? CLASSTYPE_TI_ARGS (TREE_TYPE (t
))
10020 : DECL_TI_ARGS (DECL_TEMPLATE_RESULT (t
));
10021 /* Because this is a template, the arguments will still be
10022 dependent, even after substitution. If
10023 PROCESSING_TEMPLATE_DECL is not set, the dependency
10024 predicates will short-circuit. */
10025 ++processing_template_decl
;
10026 full_args
= tsubst_template_args (tmpl_args
, args
,
10027 complain
, in_decl
);
10028 --processing_template_decl
;
10029 if (full_args
== error_mark_node
)
10030 RETURN (error_mark_node
);
10032 /* If this is a default template template argument,
10033 tsubst might not have changed anything. */
10034 if (full_args
== tmpl_args
)
10037 hash
= hash_tmpl_and_args (t
, full_args
);
10038 spec
= retrieve_specialization (t
, full_args
, hash
);
10039 if (spec
!= NULL_TREE
)
10045 /* Make a new template decl. It will be similar to the
10046 original, but will record the current template arguments.
10047 We also create a new function declaration, which is just
10048 like the old one, but points to this new template, rather
10049 than the old one. */
10051 gcc_assert (DECL_LANG_SPECIFIC (r
) != 0);
10052 DECL_CHAIN (r
) = NULL_TREE
;
10054 DECL_TEMPLATE_INFO (r
) = build_template_info (t
, args
);
10056 if (TREE_CODE (decl
) == TYPE_DECL
10057 && !TYPE_DECL_ALIAS_P (decl
))
10060 ++processing_template_decl
;
10061 new_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10062 --processing_template_decl
;
10063 if (new_type
== error_mark_node
)
10064 RETURN (error_mark_node
);
10066 TREE_TYPE (r
) = new_type
;
10067 CLASSTYPE_TI_TEMPLATE (new_type
) = r
;
10068 DECL_TEMPLATE_RESULT (r
) = TYPE_MAIN_DECL (new_type
);
10069 DECL_TI_ARGS (r
) = CLASSTYPE_TI_ARGS (new_type
);
10070 DECL_CONTEXT (r
) = TYPE_CONTEXT (new_type
);
10075 ++processing_template_decl
;
10076 new_decl
= tsubst (decl
, args
, complain
, in_decl
);
10077 --processing_template_decl
;
10078 if (new_decl
== error_mark_node
)
10079 RETURN (error_mark_node
);
10081 DECL_TEMPLATE_RESULT (r
) = new_decl
;
10082 DECL_TI_TEMPLATE (new_decl
) = r
;
10083 TREE_TYPE (r
) = TREE_TYPE (new_decl
);
10084 DECL_TI_ARGS (r
) = DECL_TI_ARGS (new_decl
);
10085 DECL_CONTEXT (r
) = DECL_CONTEXT (new_decl
);
10088 SET_DECL_IMPLICIT_INSTANTIATION (r
);
10089 DECL_TEMPLATE_INSTANTIATIONS (r
) = NULL_TREE
;
10090 DECL_TEMPLATE_SPECIALIZATIONS (r
) = NULL_TREE
;
10092 /* The template parameters for this new template are all the
10093 template parameters for the old template, except the
10094 outermost level of parameters. */
10095 DECL_TEMPLATE_PARMS (r
)
10096 = tsubst_template_parms (DECL_TEMPLATE_PARMS (t
), args
,
10099 if (PRIMARY_TEMPLATE_P (t
))
10100 DECL_PRIMARY_TEMPLATE (r
) = r
;
10102 if (TREE_CODE (decl
) != TYPE_DECL
)
10103 /* Record this non-type partial instantiation. */
10104 register_specialization (r
, t
,
10105 DECL_TI_ARGS (DECL_TEMPLATE_RESULT (r
)),
10110 case FUNCTION_DECL
:
10113 tree argvec
= NULL_TREE
;
10121 /* Nobody should be tsubst'ing into non-template functions. */
10122 gcc_assert (DECL_TEMPLATE_INFO (t
) != NULL_TREE
);
10124 if (TREE_CODE (DECL_TI_TEMPLATE (t
)) == TEMPLATE_DECL
)
10129 /* If T is not dependent, just return it. We have to
10130 increment PROCESSING_TEMPLATE_DECL because
10131 value_dependent_expression_p assumes that nothing is
10132 dependent when PROCESSING_TEMPLATE_DECL is zero. */
10133 ++processing_template_decl
;
10134 dependent_p
= value_dependent_expression_p (t
);
10135 --processing_template_decl
;
10139 /* Calculate the most general template of which R is a
10140 specialization, and the complete set of arguments used to
10142 gen_tmpl
= most_general_template (DECL_TI_TEMPLATE (t
));
10143 argvec
= tsubst_template_args (DECL_TI_ARGS
10144 (DECL_TEMPLATE_RESULT
10145 (DECL_TI_TEMPLATE (t
))),
10146 args
, complain
, in_decl
);
10147 if (argvec
== error_mark_node
)
10148 RETURN (error_mark_node
);
10150 /* Check to see if we already have this specialization. */
10151 hash
= hash_tmpl_and_args (gen_tmpl
, argvec
);
10152 spec
= retrieve_specialization (gen_tmpl
, argvec
, hash
);
10160 /* We can see more levels of arguments than parameters if
10161 there was a specialization of a member template, like
10164 template <class T> struct S { template <class U> void f(); }
10165 template <> template <class U> void S<int>::f(U);
10167 Here, we'll be substituting into the specialization,
10168 because that's where we can find the code we actually
10169 want to generate, but we'll have enough arguments for
10170 the most general template.
10172 We also deal with the peculiar case:
10174 template <class T> struct S {
10175 template <class U> friend void f();
10177 template <class U> void f() {}
10179 template void f<double>();
10181 Here, the ARGS for the instantiation of will be {int,
10182 double}. But, we only need as many ARGS as there are
10183 levels of template parameters in CODE_PATTERN. We are
10184 careful not to get fooled into reducing the ARGS in
10187 template <class T> struct S { template <class U> void f(U); }
10188 template <class T> template <> void S<T>::f(int) {}
10190 which we can spot because the pattern will be a
10191 specialization in this case. */
10192 args_depth
= TMPL_ARGS_DEPTH (args
);
10194 TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (DECL_TI_TEMPLATE (t
)));
10195 if (args_depth
> parms_depth
10196 && !DECL_TEMPLATE_SPECIALIZATION (t
))
10197 args
= get_innermost_template_args (args
, parms_depth
);
10201 /* This special case arises when we have something like this:
10203 template <class T> struct S {
10204 friend void f<int>(int, double);
10207 Here, the DECL_TI_TEMPLATE for the friend declaration
10208 will be an IDENTIFIER_NODE. We are being called from
10209 tsubst_friend_function, and we want only to create a
10210 new decl (R) with appropriate types so that we can call
10211 determine_specialization. */
10212 gen_tmpl
= NULL_TREE
;
10215 if (DECL_CLASS_SCOPE_P (t
))
10217 if (DECL_NAME (t
) == constructor_name (DECL_CONTEXT (t
)))
10221 ctx
= tsubst_aggr_type (DECL_CONTEXT (t
), args
,
10222 complain
, t
, /*entering_scope=*/1);
10227 ctx
= DECL_CONTEXT (t
);
10229 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10230 if (type
== error_mark_node
)
10231 RETURN (error_mark_node
);
10233 /* If we hit excessive deduction depth, the type is bogus even if
10234 it isn't error_mark_node, so don't build a decl. */
10235 if (excessive_deduction_depth
)
10236 RETURN (error_mark_node
);
10238 /* We do NOT check for matching decls pushed separately at this
10239 point, as they may not represent instantiations of this
10240 template, and in any case are considered separate under the
10243 DECL_USE_TEMPLATE (r
) = 0;
10244 TREE_TYPE (r
) = type
;
10245 /* Clear out the mangled name and RTL for the instantiation. */
10246 SET_DECL_ASSEMBLER_NAME (r
, NULL_TREE
);
10247 SET_DECL_RTL (r
, NULL
);
10248 /* Leave DECL_INITIAL set on deleted instantiations. */
10249 if (!DECL_DELETED_FN (r
))
10250 DECL_INITIAL (r
) = NULL_TREE
;
10251 DECL_CONTEXT (r
) = ctx
;
10253 if (member
&& DECL_CONV_FN_P (r
))
10254 /* Type-conversion operator. Reconstruct the name, in
10255 case it's the name of one of the template's parameters. */
10256 DECL_NAME (r
) = mangle_conv_op_name_for_type (TREE_TYPE (type
));
10258 DECL_ARGUMENTS (r
) = tsubst (DECL_ARGUMENTS (t
), args
,
10260 DECL_RESULT (r
) = NULL_TREE
;
10262 TREE_STATIC (r
) = 0;
10263 TREE_PUBLIC (r
) = TREE_PUBLIC (t
);
10264 DECL_EXTERNAL (r
) = 1;
10265 /* If this is an instantiation of a function with internal
10266 linkage, we already know what object file linkage will be
10267 assigned to the instantiation. */
10268 DECL_INTERFACE_KNOWN (r
) = !TREE_PUBLIC (r
);
10269 DECL_DEFER_OUTPUT (r
) = 0;
10270 DECL_CHAIN (r
) = NULL_TREE
;
10271 DECL_PENDING_INLINE_INFO (r
) = 0;
10272 DECL_PENDING_INLINE_P (r
) = 0;
10273 DECL_SAVED_TREE (r
) = NULL_TREE
;
10274 DECL_STRUCT_FUNCTION (r
) = NULL
;
10276 /* We'll re-clone as appropriate in instantiate_template. */
10277 DECL_CLONED_FUNCTION (r
) = NULL_TREE
;
10279 /* If we aren't complaining now, return on error before we register
10280 the specialization so that we'll complain eventually. */
10281 if ((complain
& tf_error
) == 0
10282 && IDENTIFIER_OPNAME_P (DECL_NAME (r
))
10283 && !grok_op_properties (r
, /*complain=*/false))
10284 RETURN (error_mark_node
);
10286 /* Set up the DECL_TEMPLATE_INFO for R. There's no need to do
10287 this in the special friend case mentioned above where
10288 GEN_TMPL is NULL. */
10291 DECL_TEMPLATE_INFO (r
)
10292 = build_template_info (gen_tmpl
, argvec
);
10293 SET_DECL_IMPLICIT_INSTANTIATION (r
);
10294 register_specialization (r
, gen_tmpl
, argvec
, false, hash
);
10296 /* We're not supposed to instantiate default arguments
10297 until they are called, for a template. But, for a
10300 template <class T> void f ()
10301 { extern void g(int i = T()); }
10303 we should do the substitution when the template is
10304 instantiated. We handle the member function case in
10305 instantiate_class_template since the default arguments
10306 might refer to other members of the class. */
10308 && !PRIMARY_TEMPLATE_P (gen_tmpl
)
10309 && !uses_template_parms (argvec
))
10310 tsubst_default_arguments (r
, complain
);
10313 DECL_TEMPLATE_INFO (r
) = NULL_TREE
;
10315 /* Copy the list of befriending classes. */
10316 for (friends
= &DECL_BEFRIENDING_CLASSES (r
);
10318 friends
= &TREE_CHAIN (*friends
))
10320 *friends
= copy_node (*friends
);
10321 TREE_VALUE (*friends
) = tsubst (TREE_VALUE (*friends
),
10326 if (DECL_CONSTRUCTOR_P (r
) || DECL_DESTRUCTOR_P (r
))
10328 maybe_retrofit_in_chrg (r
);
10329 if (DECL_CONSTRUCTOR_P (r
))
10330 grok_ctor_properties (ctx
, r
);
10331 if (DECL_INHERITED_CTOR_BASE (r
))
10332 deduce_inheriting_ctor (r
);
10333 /* If this is an instantiation of a member template, clone it.
10334 If it isn't, that'll be handled by
10335 clone_constructors_and_destructors. */
10336 if (PRIMARY_TEMPLATE_P (gen_tmpl
))
10337 clone_function_decl (r
, /*update_method_vec_p=*/0);
10339 else if ((complain
& tf_error
) != 0
10340 && IDENTIFIER_OPNAME_P (DECL_NAME (r
))
10341 && !grok_op_properties (r
, /*complain=*/true))
10342 RETURN (error_mark_node
);
10344 if (DECL_FRIEND_P (t
) && DECL_FRIEND_CONTEXT (t
))
10345 SET_DECL_FRIEND_CONTEXT (r
,
10346 tsubst (DECL_FRIEND_CONTEXT (t
),
10347 args
, complain
, in_decl
));
10349 /* Possibly limit visibility based on template args. */
10350 DECL_VISIBILITY (r
) = VISIBILITY_DEFAULT
;
10351 if (DECL_VISIBILITY_SPECIFIED (t
))
10353 DECL_VISIBILITY_SPECIFIED (r
) = 0;
10354 DECL_ATTRIBUTES (r
)
10355 = remove_attribute ("visibility", DECL_ATTRIBUTES (r
));
10357 determine_visibility (r
);
10358 if (DECL_DEFAULTED_OUTSIDE_CLASS_P (r
)
10359 && !processing_template_decl
)
10360 defaulted_late_check (r
);
10362 apply_late_template_attributes (&r
, DECL_ATTRIBUTES (r
), 0,
10363 args
, complain
, in_decl
);
10369 tree type
= NULL_TREE
;
10371 tree expanded_types
= NULL_TREE
;
10372 tree prev_r
= NULL_TREE
;
10373 tree first_r
= NULL_TREE
;
10375 if (FUNCTION_PARAMETER_PACK_P (t
))
10377 /* If there is a local specialization that isn't a
10378 parameter pack, it means that we're doing a "simple"
10379 substitution from inside tsubst_pack_expansion. Just
10380 return the local specialization (which will be a single
10382 tree spec
= retrieve_local_specialization (t
);
10384 && TREE_CODE (spec
) == PARM_DECL
10385 && TREE_CODE (TREE_TYPE (spec
)) != TYPE_PACK_EXPANSION
)
10388 /* Expand the TYPE_PACK_EXPANSION that provides the types for
10389 the parameters in this function parameter pack. */
10390 expanded_types
= tsubst_pack_expansion (TREE_TYPE (t
), args
,
10391 complain
, in_decl
);
10392 if (TREE_CODE (expanded_types
) == TREE_VEC
)
10394 len
= TREE_VEC_LENGTH (expanded_types
);
10396 /* Zero-length parameter packs are boring. Just substitute
10399 RETURN (tsubst (TREE_CHAIN (t
), args
, complain
,
10404 /* All we did was update the type. Make a note of that. */
10405 type
= expanded_types
;
10406 expanded_types
= NULL_TREE
;
10410 /* Loop through all of the parameter's we'll build. When T is
10411 a function parameter pack, LEN is the number of expanded
10412 types in EXPANDED_TYPES; otherwise, LEN is 1. */
10414 for (i
= 0; i
< len
; ++i
)
10418 if (DECL_TEMPLATE_PARM_P (t
))
10419 SET_DECL_TEMPLATE_PARM_P (r
);
10421 if (expanded_types
)
10422 /* We're on the Ith parameter of the function parameter
10425 /* An argument of a function parameter pack is not a parameter
10427 FUNCTION_PARAMETER_PACK_P (r
) = false;
10429 /* Get the Ith type. */
10430 type
= TREE_VEC_ELT (expanded_types
, i
);
10432 /* Rename the parameter to include the index. */
10434 = make_ith_pack_parameter_name (DECL_NAME (r
), i
);
10437 /* We're dealing with a normal parameter. */
10438 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10440 type
= type_decays_to (type
);
10441 TREE_TYPE (r
) = type
;
10442 cp_apply_type_quals_to_decl (cp_type_quals (type
), r
);
10444 if (DECL_INITIAL (r
))
10446 if (TREE_CODE (DECL_INITIAL (r
)) != TEMPLATE_PARM_INDEX
)
10447 DECL_INITIAL (r
) = TREE_TYPE (r
);
10449 DECL_INITIAL (r
) = tsubst (DECL_INITIAL (r
), args
,
10450 complain
, in_decl
);
10453 DECL_CONTEXT (r
) = NULL_TREE
;
10455 if (!DECL_TEMPLATE_PARM_P (r
))
10456 DECL_ARG_TYPE (r
) = type_passed_as (type
);
10458 apply_late_template_attributes (&r
, DECL_ATTRIBUTES (r
), 0,
10459 args
, complain
, in_decl
);
10461 /* Keep track of the first new parameter we
10462 generate. That's what will be returned to the
10467 /* Build a proper chain of parameters when substituting
10468 into a function parameter pack. */
10470 DECL_CHAIN (prev_r
) = r
;
10473 /* If cp_unevaluated_operand is set, we're just looking for a
10474 single dummy parameter, so don't keep going. */
10475 if (DECL_CHAIN (t
) && !cp_unevaluated_operand
)
10476 DECL_CHAIN (r
) = tsubst (DECL_CHAIN (t
), args
,
10477 complain
, DECL_CHAIN (t
));
10479 /* FIRST_R contains the start of the chain we've built. */
10489 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10490 if (type
== error_mark_node
)
10491 RETURN (error_mark_node
);
10492 TREE_TYPE (r
) = type
;
10493 cp_apply_type_quals_to_decl (cp_type_quals (type
), r
);
10495 if (DECL_C_BIT_FIELD (r
))
10496 /* For bit-fields, DECL_INITIAL gives the number of bits. For
10497 non-bit-fields DECL_INITIAL is a non-static data member
10498 initializer, which gets deferred instantiation. */
10500 = tsubst_expr (DECL_INITIAL (t
), args
,
10502 /*integral_constant_expression_p=*/true);
10503 else if (DECL_INITIAL (t
))
10505 /* Set up DECL_TEMPLATE_INFO so that we can get at the
10506 NSDMI in perform_member_init. Still set DECL_INITIAL
10507 so that we know there is one. */
10508 DECL_INITIAL (r
) = void_zero_node
;
10509 gcc_assert (DECL_LANG_SPECIFIC (r
) == NULL
);
10510 retrofit_lang_decl (r
);
10511 DECL_TEMPLATE_INFO (r
) = build_template_info (t
, args
);
10513 /* We don't have to set DECL_CONTEXT here; it is set by
10514 finish_member_declaration. */
10515 DECL_CHAIN (r
) = NULL_TREE
;
10516 if (VOID_TYPE_P (type
))
10517 error ("instantiation of %q+D as type %qT", r
, type
);
10519 apply_late_template_attributes (&r
, DECL_ATTRIBUTES (r
), 0,
10520 args
, complain
, in_decl
);
10525 /* We reach here only for member using decls. We also need to check
10526 uses_template_parms because DECL_DEPENDENT_P is not set for a
10527 using-declaration that designates a member of the current
10528 instantiation (c++/53549). */
10529 if (DECL_DEPENDENT_P (t
)
10530 || uses_template_parms (USING_DECL_SCOPE (t
)))
10532 tree inst_scope
= tsubst_copy (USING_DECL_SCOPE (t
), args
,
10533 complain
, in_decl
);
10534 tree name
= tsubst_copy (DECL_NAME (t
), args
, complain
, in_decl
);
10535 r
= do_class_using_decl (inst_scope
, name
);
10537 r
= error_mark_node
;
10540 TREE_PROTECTED (r
) = TREE_PROTECTED (t
);
10541 TREE_PRIVATE (r
) = TREE_PRIVATE (t
);
10547 DECL_CHAIN (r
) = NULL_TREE
;
10554 tree argvec
= NULL_TREE
;
10555 tree gen_tmpl
= NULL_TREE
;
10557 tree tmpl
= NULL_TREE
;
10559 tree type
= NULL_TREE
;
10562 if (TREE_CODE (t
) == TYPE_DECL
10563 && t
== TYPE_MAIN_DECL (TREE_TYPE (t
)))
10565 /* If this is the canonical decl, we don't have to
10566 mess with instantiations, and often we can't (for
10567 typename, template type parms and such). Note that
10568 TYPE_NAME is not correct for the above test if
10569 we've copied the type for a typedef. */
10570 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10571 if (type
== error_mark_node
)
10572 RETURN (error_mark_node
);
10573 r
= TYPE_NAME (type
);
10577 /* Check to see if we already have the specialization we
10580 if (DECL_CLASS_SCOPE_P (t
) || DECL_NAMESPACE_SCOPE_P (t
))
10582 /* T is a static data member or namespace-scope entity.
10583 We have to substitute into namespace-scope variables
10584 (even though such entities are never templates) because
10587 template <class T> void f() { extern T t; }
10589 where the entity referenced is not known until
10590 instantiation time. */
10592 ctx
= DECL_CONTEXT (t
);
10593 if (DECL_CLASS_SCOPE_P (t
))
10595 ctx
= tsubst_aggr_type (ctx
, args
,
10597 in_decl
, /*entering_scope=*/1);
10598 /* If CTX is unchanged, then T is in fact the
10599 specialization we want. That situation occurs when
10600 referencing a static data member within in its own
10601 class. We can use pointer equality, rather than
10602 same_type_p, because DECL_CONTEXT is always
10604 if (ctx
== DECL_CONTEXT (t
)
10605 && (TREE_CODE (t
) != TYPE_DECL
10606 /* ... unless T is a member template; in which
10607 case our caller can be willing to create a
10608 specialization of that template represented
10610 || !(DECL_TI_TEMPLATE (t
)
10611 && DECL_MEMBER_TEMPLATE_P (DECL_TI_TEMPLATE (t
)))))
10617 tmpl
= DECL_TI_TEMPLATE (t
);
10618 gen_tmpl
= most_general_template (tmpl
);
10619 argvec
= tsubst (DECL_TI_ARGS (t
), args
, complain
, in_decl
);
10620 if (argvec
== error_mark_node
)
10621 RETURN (error_mark_node
);
10622 hash
= hash_tmpl_and_args (gen_tmpl
, argvec
);
10623 spec
= retrieve_specialization (gen_tmpl
, argvec
, hash
);
10628 /* A local variable. */
10630 /* Subsequent calls to pushdecl will fill this in. */
10632 spec
= retrieve_local_specialization (t
);
10634 /* If we already have the specialization we need, there is
10635 nothing more to do. */
10642 if (TREE_CODE (t
) == VAR_DECL
&& DECL_ANON_UNION_VAR_P (t
))
10644 /* Just use name lookup to find a member alias for an anonymous
10645 union, but then add it to the hash table. */
10646 r
= lookup_name (DECL_NAME (t
));
10647 gcc_assert (DECL_ANON_UNION_VAR_P (r
));
10648 register_local_specialization (r
, t
);
10652 /* Create a new node for the specialization we need. */
10654 if (type
== NULL_TREE
)
10656 if (is_typedef_decl (t
))
10657 type
= DECL_ORIGINAL_TYPE (t
);
10659 type
= TREE_TYPE (t
);
10660 if (TREE_CODE (t
) == VAR_DECL
10661 && VAR_HAD_UNKNOWN_BOUND (t
)
10662 && type
!= error_mark_node
)
10663 type
= strip_array_domain (type
);
10664 type
= tsubst (type
, args
, complain
, in_decl
);
10666 if (TREE_CODE (r
) == VAR_DECL
)
10668 /* Even if the original location is out of scope, the
10669 newly substituted one is not. */
10670 DECL_DEAD_FOR_LOCAL (r
) = 0;
10671 DECL_INITIALIZED_P (r
) = 0;
10672 DECL_TEMPLATE_INSTANTIATED (r
) = 0;
10673 if (type
== error_mark_node
)
10674 RETURN (error_mark_node
);
10675 if (TREE_CODE (type
) == FUNCTION_TYPE
)
10677 /* It may seem that this case cannot occur, since:
10682 declares a function, not a variable. However:
10685 template <typename T> void g() { T t; }
10686 template void g<f>();
10688 is an attempt to declare a variable with function
10690 error ("variable %qD has function type",
10691 /* R is not yet sufficiently initialized, so we
10692 just use its name. */
10694 RETURN (error_mark_node
);
10696 type
= complete_type (type
);
10697 /* Wait until cp_finish_decl to set this again, to handle
10698 circular dependency (template/instantiate6.C). */
10699 DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (r
) = 0;
10700 type
= check_var_type (DECL_NAME (r
), type
);
10702 if (DECL_HAS_VALUE_EXPR_P (t
))
10704 tree ve
= DECL_VALUE_EXPR (t
);
10705 ve
= tsubst_expr (ve
, args
, complain
, in_decl
,
10706 /*constant_expression_p=*/false);
10707 if (REFERENCE_REF_P (ve
))
10709 gcc_assert (TREE_CODE (type
) == REFERENCE_TYPE
);
10710 ve
= TREE_OPERAND (ve
, 0);
10712 SET_DECL_VALUE_EXPR (r
, ve
);
10715 else if (DECL_SELF_REFERENCE_P (t
))
10716 SET_DECL_SELF_REFERENCE_P (r
);
10717 TREE_TYPE (r
) = type
;
10718 cp_apply_type_quals_to_decl (cp_type_quals (type
), r
);
10719 DECL_CONTEXT (r
) = ctx
;
10720 /* Clear out the mangled name and RTL for the instantiation. */
10721 SET_DECL_ASSEMBLER_NAME (r
, NULL_TREE
);
10722 if (CODE_CONTAINS_STRUCT (TREE_CODE (t
), TS_DECL_WRTL
))
10723 SET_DECL_RTL (r
, NULL
);
10724 /* The initializer must not be expanded until it is required;
10725 see [temp.inst]. */
10726 DECL_INITIAL (r
) = NULL_TREE
;
10727 if (CODE_CONTAINS_STRUCT (TREE_CODE (t
), TS_DECL_WRTL
))
10728 SET_DECL_RTL (r
, NULL
);
10729 DECL_SIZE (r
) = DECL_SIZE_UNIT (r
) = 0;
10730 if (TREE_CODE (r
) == VAR_DECL
)
10732 /* Possibly limit visibility based on template args. */
10733 DECL_VISIBILITY (r
) = VISIBILITY_DEFAULT
;
10734 if (DECL_VISIBILITY_SPECIFIED (t
))
10736 DECL_VISIBILITY_SPECIFIED (r
) = 0;
10737 DECL_ATTRIBUTES (r
)
10738 = remove_attribute ("visibility", DECL_ATTRIBUTES (r
));
10740 determine_visibility (r
);
10745 /* A static data member declaration is always marked
10746 external when it is declared in-class, even if an
10747 initializer is present. We mimic the non-template
10748 processing here. */
10749 DECL_EXTERNAL (r
) = 1;
10751 register_specialization (r
, gen_tmpl
, argvec
, false, hash
);
10752 DECL_TEMPLATE_INFO (r
) = build_template_info (tmpl
, argvec
);
10753 SET_DECL_IMPLICIT_INSTANTIATION (r
);
10755 else if (cp_unevaluated_operand
)
10757 /* We're substituting this var in a decltype outside of its
10758 scope, such as for a lambda return type. Don't add it to
10759 local_specializations, do perform auto deduction. */
10760 tree auto_node
= type_uses_auto (type
);
10764 = tsubst_expr (DECL_INITIAL (t
), args
, complain
, in_decl
,
10765 /*constant_expression_p=*/false);
10766 init
= resolve_nondeduced_context (init
);
10767 TREE_TYPE (r
) = type
10768 = do_auto_deduction (type
, init
, auto_node
);
10772 register_local_specialization (r
, t
);
10774 DECL_CHAIN (r
) = NULL_TREE
;
10776 apply_late_template_attributes (&r
, DECL_ATTRIBUTES (r
),
10778 args
, complain
, in_decl
);
10780 /* Preserve a typedef that names a type. */
10781 if (is_typedef_decl (r
))
10783 DECL_ORIGINAL_TYPE (r
) = NULL_TREE
;
10784 set_underlying_type (r
);
10787 layout_decl (r
, 0);
10792 gcc_unreachable ();
10797 /* Restore the file and line information. */
10798 input_location
= saved_loc
;
10803 /* Substitute into the ARG_TYPES of a function type.
10804 If END is a TREE_CHAIN, leave it and any following types
10808 tsubst_arg_types (tree arg_types
,
10811 tsubst_flags_t complain
,
10814 tree remaining_arg_types
;
10815 tree type
= NULL_TREE
;
10817 tree expanded_args
= NULL_TREE
;
10820 if (!arg_types
|| arg_types
== void_list_node
|| arg_types
== end
)
10823 remaining_arg_types
= tsubst_arg_types (TREE_CHAIN (arg_types
),
10824 args
, end
, complain
, in_decl
);
10825 if (remaining_arg_types
== error_mark_node
)
10826 return error_mark_node
;
10828 if (PACK_EXPANSION_P (TREE_VALUE (arg_types
)))
10830 /* For a pack expansion, perform substitution on the
10831 entire expression. Later on, we'll handle the arguments
10833 expanded_args
= tsubst_pack_expansion (TREE_VALUE (arg_types
),
10834 args
, complain
, in_decl
);
10836 if (TREE_CODE (expanded_args
) == TREE_VEC
)
10837 /* So that we'll spin through the parameters, one by one. */
10838 i
= TREE_VEC_LENGTH (expanded_args
);
10841 /* We only partially substituted into the parameter
10842 pack. Our type is TYPE_PACK_EXPANSION. */
10843 type
= expanded_args
;
10844 expanded_args
= NULL_TREE
;
10852 type
= TREE_VEC_ELT (expanded_args
, i
);
10854 type
= tsubst (TREE_VALUE (arg_types
), args
, complain
, in_decl
);
10856 if (type
== error_mark_node
)
10857 return error_mark_node
;
10858 if (VOID_TYPE_P (type
))
10860 if (complain
& tf_error
)
10862 error ("invalid parameter type %qT", type
);
10864 error ("in declaration %q+D", in_decl
);
10866 return error_mark_node
;
10869 if (abstract_virtuals_error_sfinae (NULL_TREE
, type
, complain
))
10870 return error_mark_node
;
10872 /* Do array-to-pointer, function-to-pointer conversion, and ignore
10873 top-level qualifiers as required. */
10874 type
= cv_unqualified (type_decays_to (type
));
10876 /* We do not substitute into default arguments here. The standard
10877 mandates that they be instantiated only when needed, which is
10878 done in build_over_call. */
10879 default_arg
= TREE_PURPOSE (arg_types
);
10881 if (default_arg
&& TREE_CODE (default_arg
) == DEFAULT_ARG
)
10883 /* We've instantiated a template before its default arguments
10884 have been parsed. This can happen for a nested template
10885 class, and is not an error unless we require the default
10886 argument in a call of this function. */
10887 remaining_arg_types
=
10888 tree_cons (default_arg
, type
, remaining_arg_types
);
10889 vec_safe_push (DEFARG_INSTANTIATIONS(default_arg
), remaining_arg_types
);
10892 remaining_arg_types
=
10893 hash_tree_cons (default_arg
, type
, remaining_arg_types
);
10896 return remaining_arg_types
;
10899 /* Substitute into a FUNCTION_TYPE or METHOD_TYPE. This routine does
10900 *not* handle the exception-specification for FNTYPE, because the
10901 initial substitution of explicitly provided template parameters
10902 during argument deduction forbids substitution into the
10903 exception-specification:
10907 All references in the function type of the function template to the
10908 corresponding template parameters are replaced by the specified tem-
10909 plate argument values. If a substitution in a template parameter or
10910 in the function type of the function template results in an invalid
10911 type, type deduction fails. [Note: The equivalent substitution in
10912 exception specifications is done only when the function is instanti-
10913 ated, at which point a program is ill-formed if the substitution
10914 results in an invalid type.] */
10917 tsubst_function_type (tree t
,
10919 tsubst_flags_t complain
,
10926 /* The TYPE_CONTEXT is not used for function/method types. */
10927 gcc_assert (TYPE_CONTEXT (t
) == NULL_TREE
);
10929 /* Substitute the return type. */
10930 return_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10931 if (return_type
== error_mark_node
)
10932 return error_mark_node
;
10933 /* DR 486 clarifies that creation of a function type with an
10934 invalid return type is a deduction failure. */
10935 if (TREE_CODE (return_type
) == ARRAY_TYPE
10936 || TREE_CODE (return_type
) == FUNCTION_TYPE
)
10938 if (complain
& tf_error
)
10940 if (TREE_CODE (return_type
) == ARRAY_TYPE
)
10941 error ("function returning an array");
10943 error ("function returning a function");
10945 return error_mark_node
;
10948 if (abstract_virtuals_error_sfinae (NULL_TREE
, return_type
, complain
))
10949 return error_mark_node
;
10951 /* Substitute the argument types. */
10952 arg_types
= tsubst_arg_types (TYPE_ARG_TYPES (t
), args
, NULL_TREE
,
10953 complain
, in_decl
);
10954 if (arg_types
== error_mark_node
)
10955 return error_mark_node
;
10957 /* Construct a new type node and return it. */
10958 if (TREE_CODE (t
) == FUNCTION_TYPE
)
10960 fntype
= build_function_type (return_type
, arg_types
);
10961 fntype
= apply_memfn_quals (fntype
,
10962 type_memfn_quals (t
),
10963 type_memfn_rqual (t
));
10967 tree r
= TREE_TYPE (TREE_VALUE (arg_types
));
10968 if (! MAYBE_CLASS_TYPE_P (r
))
10972 Type deduction may fail for any of the following
10975 -- Attempting to create "pointer to member of T" when T
10976 is not a class type. */
10977 if (complain
& tf_error
)
10978 error ("creating pointer to member function of non-class type %qT",
10980 return error_mark_node
;
10983 fntype
= build_method_type_directly (r
, return_type
,
10984 TREE_CHAIN (arg_types
));
10985 fntype
= build_ref_qualified_type (fntype
, type_memfn_rqual (t
));
10987 fntype
= cp_build_type_attribute_variant (fntype
, TYPE_ATTRIBUTES (t
));
10992 /* FNTYPE is a FUNCTION_TYPE or METHOD_TYPE. Substitute the template
10993 ARGS into that specification, and return the substituted
10994 specification. If there is no specification, return NULL_TREE. */
10997 tsubst_exception_specification (tree fntype
,
10999 tsubst_flags_t complain
,
11006 specs
= TYPE_RAISES_EXCEPTIONS (fntype
);
11007 new_specs
= NULL_TREE
;
11008 if (specs
&& TREE_PURPOSE (specs
))
11010 /* A noexcept-specifier. */
11011 tree expr
= TREE_PURPOSE (specs
);
11012 if (TREE_CODE (expr
) == INTEGER_CST
)
11016 /* Defer instantiation of noexcept-specifiers to avoid
11017 excessive instantiations (c++/49107). */
11018 new_specs
= make_node (DEFERRED_NOEXCEPT
);
11019 if (DEFERRED_NOEXCEPT_SPEC_P (specs
))
11021 /* We already partially instantiated this member template,
11022 so combine the new args with the old. */
11023 DEFERRED_NOEXCEPT_PATTERN (new_specs
)
11024 = DEFERRED_NOEXCEPT_PATTERN (expr
);
11025 DEFERRED_NOEXCEPT_ARGS (new_specs
)
11026 = add_to_template_args (DEFERRED_NOEXCEPT_ARGS (expr
), args
);
11030 DEFERRED_NOEXCEPT_PATTERN (new_specs
) = expr
;
11031 DEFERRED_NOEXCEPT_ARGS (new_specs
) = args
;
11035 new_specs
= tsubst_copy_and_build
11036 (expr
, args
, complain
, in_decl
, /*function_p=*/false,
11037 /*integral_constant_expression_p=*/true);
11038 new_specs
= build_noexcept_spec (new_specs
, complain
);
11042 if (! TREE_VALUE (specs
))
11049 tree expanded_specs
= NULL_TREE
;
11051 if (PACK_EXPANSION_P (TREE_VALUE (specs
)))
11053 /* Expand the pack expansion type. */
11054 expanded_specs
= tsubst_pack_expansion (TREE_VALUE (specs
),
11058 if (expanded_specs
== error_mark_node
)
11059 return error_mark_node
;
11060 else if (TREE_CODE (expanded_specs
) == TREE_VEC
)
11061 len
= TREE_VEC_LENGTH (expanded_specs
);
11064 /* We're substituting into a member template, so
11065 we got a TYPE_PACK_EXPANSION back. Add that
11066 expansion and move on. */
11067 gcc_assert (TREE_CODE (expanded_specs
)
11068 == TYPE_PACK_EXPANSION
);
11069 new_specs
= add_exception_specifier (new_specs
,
11072 specs
= TREE_CHAIN (specs
);
11077 for (i
= 0; i
< len
; ++i
)
11079 if (expanded_specs
)
11080 spec
= TREE_VEC_ELT (expanded_specs
, i
);
11082 spec
= tsubst (TREE_VALUE (specs
), args
, complain
, in_decl
);
11083 if (spec
== error_mark_node
)
11085 new_specs
= add_exception_specifier (new_specs
, spec
,
11089 specs
= TREE_CHAIN (specs
);
11095 /* Take the tree structure T and replace template parameters used
11096 therein with the argument vector ARGS. IN_DECL is an associated
11097 decl for diagnostics. If an error occurs, returns ERROR_MARK_NODE.
11098 Issue error and warning messages under control of COMPLAIN. Note
11099 that we must be relatively non-tolerant of extensions here, in
11100 order to preserve conformance; if we allow substitutions that
11101 should not be allowed, we may allow argument deductions that should
11102 not succeed, and therefore report ambiguous overload situations
11103 where there are none. In theory, we could allow the substitution,
11104 but indicate that it should have failed, and allow our caller to
11105 make sure that the right thing happens, but we don't try to do this
11108 This function is used for dealing with types, decls and the like;
11109 for expressions, use tsubst_expr or tsubst_copy. */
11112 tsubst (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
11114 enum tree_code code
;
11115 tree type
, r
= NULL_TREE
;
11117 if (t
== NULL_TREE
|| t
== error_mark_node
11118 || t
== integer_type_node
11119 || t
== void_type_node
11120 || t
== char_type_node
11121 || t
== unknown_type_node
11122 || TREE_CODE (t
) == NAMESPACE_DECL
11123 || TREE_CODE (t
) == TRANSLATION_UNIT_DECL
)
11127 return tsubst_decl (t
, args
, complain
);
11129 if (args
== NULL_TREE
)
11132 code
= TREE_CODE (t
);
11134 if (code
== IDENTIFIER_NODE
)
11135 type
= IDENTIFIER_TYPE_VALUE (t
);
11137 type
= TREE_TYPE (t
);
11139 gcc_assert (type
!= unknown_type_node
);
11141 /* Reuse typedefs. We need to do this to handle dependent attributes,
11142 such as attribute aligned. */
11144 && typedef_variant_p (t
))
11146 tree decl
= TYPE_NAME (t
);
11148 if (alias_template_specialization_p (t
))
11150 /* DECL represents an alias template and we want to
11152 tree tmpl
= most_general_template (DECL_TI_TEMPLATE (decl
));
11153 tree gen_args
= tsubst (DECL_TI_ARGS (decl
), args
, complain
, in_decl
);
11154 r
= instantiate_alias_template (tmpl
, gen_args
, complain
);
11156 else if (DECL_CLASS_SCOPE_P (decl
)
11157 && CLASSTYPE_TEMPLATE_INFO (DECL_CONTEXT (decl
))
11158 && uses_template_parms (DECL_CONTEXT (decl
)))
11160 tree tmpl
= most_general_template (DECL_TI_TEMPLATE (decl
));
11161 tree gen_args
= tsubst (DECL_TI_ARGS (decl
), args
, complain
, in_decl
);
11162 r
= retrieve_specialization (tmpl
, gen_args
, 0);
11164 else if (DECL_FUNCTION_SCOPE_P (decl
)
11165 && DECL_TEMPLATE_INFO (DECL_CONTEXT (decl
))
11166 && uses_template_parms (DECL_TI_ARGS (DECL_CONTEXT (decl
))))
11167 r
= retrieve_local_specialization (decl
);
11169 /* The typedef is from a non-template context. */
11175 r
= cp_build_qualified_type_real
11176 (r
, cp_type_quals (t
) | cp_type_quals (r
),
11177 complain
| tf_ignore_bad_quals
);
11182 /* We don't have an instantiation yet, so drop the typedef. */
11183 int quals
= cp_type_quals (t
);
11184 t
= DECL_ORIGINAL_TYPE (decl
);
11185 t
= cp_build_qualified_type_real (t
, quals
,
11186 complain
| tf_ignore_bad_quals
);
11191 && code
!= TYPENAME_TYPE
11192 && code
!= TEMPLATE_TYPE_PARM
11193 && code
!= IDENTIFIER_NODE
11194 && code
!= FUNCTION_TYPE
11195 && code
!= METHOD_TYPE
)
11196 type
= tsubst (type
, args
, complain
, in_decl
);
11197 if (type
== error_mark_node
)
11198 return error_mark_node
;
11204 case ENUMERAL_TYPE
:
11205 return tsubst_aggr_type (t
, args
, complain
, in_decl
,
11206 /*entering_scope=*/0);
11209 case IDENTIFIER_NODE
:
11220 if (t
== integer_type_node
)
11223 if (TREE_CODE (TYPE_MIN_VALUE (t
)) == INTEGER_CST
11224 && TREE_CODE (TYPE_MAX_VALUE (t
)) == INTEGER_CST
)
11228 tree max
, omax
= TREE_OPERAND (TYPE_MAX_VALUE (t
), 0);
11230 max
= tsubst_expr (omax
, args
, complain
, in_decl
,
11231 /*integral_constant_expression_p=*/false);
11233 /* Fix up type of the magic NOP_EXPR with TREE_SIDE_EFFECTS if
11235 if (TREE_CODE (max
) == NOP_EXPR
11236 && TREE_SIDE_EFFECTS (omax
)
11237 && !TREE_TYPE (max
))
11238 TREE_TYPE (max
) = TREE_TYPE (TREE_OPERAND (max
, 0));
11240 /* If we're in a partial instantiation, preserve the magic NOP_EXPR
11241 with TREE_SIDE_EFFECTS that indicates this is not an integral
11242 constant expression. */
11243 if (processing_template_decl
11244 && TREE_SIDE_EFFECTS (omax
) && TREE_CODE (omax
) == NOP_EXPR
)
11246 gcc_assert (TREE_CODE (max
) == NOP_EXPR
);
11247 TREE_SIDE_EFFECTS (max
) = 1;
11250 return compute_array_index_type (NULL_TREE
, max
, complain
);
11253 case TEMPLATE_TYPE_PARM
:
11254 case TEMPLATE_TEMPLATE_PARM
:
11255 case BOUND_TEMPLATE_TEMPLATE_PARM
:
11256 case TEMPLATE_PARM_INDEX
:
11261 tree arg
= NULL_TREE
;
11265 gcc_assert (TREE_VEC_LENGTH (args
) > 0);
11266 template_parm_level_and_index (t
, &level
, &idx
);
11268 levels
= TMPL_ARGS_DEPTH (args
);
11269 if (level
<= levels
)
11271 arg
= TMPL_ARG (args
, level
, idx
);
11273 if (arg
&& TREE_CODE (arg
) == ARGUMENT_PACK_SELECT
)
11275 /* See through ARGUMENT_PACK_SELECT arguments. */
11276 arg
= ARGUMENT_PACK_SELECT_ARG (arg
);
11277 /* If the selected argument is an expansion E, that most
11278 likely means we were called from
11279 gen_elem_of_pack_expansion_instantiation during the
11280 substituting of pack an argument pack (which Ith
11281 element is a pack expansion, where I is
11282 ARGUMENT_PACK_SELECT_INDEX) into a pack expansion.
11283 In this case, the Ith element resulting from this
11284 substituting is going to be a pack expansion, which
11285 pattern is the pattern of E. Let's return the
11287 gen_elem_of_pack_expansion_instantiation will
11288 build the resulting pack expansion from it. */
11289 if (PACK_EXPANSION_P (arg
))
11290 arg
= PACK_EXPANSION_PATTERN (arg
);
11294 if (arg
== error_mark_node
)
11295 return error_mark_node
;
11296 else if (arg
!= NULL_TREE
)
11298 if (ARGUMENT_PACK_P (arg
))
11299 /* If ARG is an argument pack, we don't actually want to
11300 perform a substitution here, because substitutions
11301 for argument packs are only done
11302 element-by-element. We can get to this point when
11303 substituting the type of a non-type template
11304 parameter pack, when that type actually contains
11305 template parameter packs from an outer template, e.g.,
11307 template<typename... Types> struct A {
11308 template<Types... Values> struct B { };
11312 if (code
== TEMPLATE_TYPE_PARM
)
11315 gcc_assert (TYPE_P (arg
));
11317 quals
= cp_type_quals (arg
) | cp_type_quals (t
);
11319 return cp_build_qualified_type_real
11320 (arg
, quals
, complain
| tf_ignore_bad_quals
);
11322 else if (code
== BOUND_TEMPLATE_TEMPLATE_PARM
)
11324 /* We are processing a type constructed from a
11325 template template parameter. */
11326 tree argvec
= tsubst (TYPE_TI_ARGS (t
),
11327 args
, complain
, in_decl
);
11328 if (argvec
== error_mark_node
)
11329 return error_mark_node
;
11331 gcc_assert (TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
11332 || TREE_CODE (arg
) == TEMPLATE_DECL
11333 || TREE_CODE (arg
) == UNBOUND_CLASS_TEMPLATE
);
11335 if (TREE_CODE (arg
) == UNBOUND_CLASS_TEMPLATE
)
11336 /* Consider this code:
11338 template <template <class> class Template>
11340 template <class Arg> using Bind = Template<Arg>;
11343 template <template <class> class Template, class Arg>
11344 using Instantiate = Template<Arg>; //#0
11346 template <template <class> class Template,
11349 Instantiate<Internal<Template>::template Bind,
11352 When #1 is parsed, the
11353 BOUND_TEMPLATE_TEMPLATE_PARM representing the
11354 parameter `Template' in #0 matches the
11355 UNBOUND_CLASS_TEMPLATE representing the argument
11356 `Internal<Template>::template Bind'; We then want
11357 to assemble the type `Bind<Argument>' that can't
11358 be fully created right now, because
11359 `Internal<Template>' not being complete, the Bind
11360 template cannot be looked up in that context. So
11361 we need to "store" `Bind<Argument>' for later
11362 when the context of Bind becomes complete. Let's
11363 store that in a TYPENAME_TYPE. */
11364 return make_typename_type (TYPE_CONTEXT (arg
),
11365 build_nt (TEMPLATE_ID_EXPR
,
11366 TYPE_IDENTIFIER (arg
),
11371 /* We can get a TEMPLATE_TEMPLATE_PARM here when we
11372 are resolving nested-types in the signature of a
11373 member function templates. Otherwise ARG is a
11374 TEMPLATE_DECL and is the real template to be
11376 if (TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
)
11377 arg
= TYPE_NAME (arg
);
11379 r
= lookup_template_class (arg
,
11381 DECL_CONTEXT (arg
),
11382 /*entering_scope=*/0,
11384 return cp_build_qualified_type_real
11385 (r
, cp_type_quals (t
), complain
);
11388 /* TEMPLATE_TEMPLATE_PARM or TEMPLATE_PARM_INDEX. */
11389 return convert_from_reference (unshare_expr (arg
));
11393 /* This can happen during the attempted tsubst'ing in
11394 unify. This means that we don't yet have any information
11395 about the template parameter in question. */
11398 /* Early in template argument deduction substitution, we don't
11399 want to reduce the level of 'auto', or it will be confused
11400 with a normal template parm in subsequent deduction. */
11401 if (is_auto (t
) && (complain
& tf_partial
))
11404 /* If we get here, we must have been looking at a parm for a
11405 more deeply nested template. Make a new version of this
11406 template parameter, but with a lower level. */
11409 case TEMPLATE_TYPE_PARM
:
11410 case TEMPLATE_TEMPLATE_PARM
:
11411 case BOUND_TEMPLATE_TEMPLATE_PARM
:
11412 if (cp_type_quals (t
))
11414 r
= tsubst (TYPE_MAIN_VARIANT (t
), args
, complain
, in_decl
);
11415 r
= cp_build_qualified_type_real
11416 (r
, cp_type_quals (t
),
11417 complain
| (code
== TEMPLATE_TYPE_PARM
11418 ? tf_ignore_bad_quals
: 0));
11423 TEMPLATE_TYPE_PARM_INDEX (r
)
11424 = reduce_template_parm_level (TEMPLATE_TYPE_PARM_INDEX (t
),
11425 r
, levels
, args
, complain
);
11426 TYPE_STUB_DECL (r
) = TYPE_NAME (r
) = TEMPLATE_TYPE_DECL (r
);
11427 TYPE_MAIN_VARIANT (r
) = r
;
11428 TYPE_POINTER_TO (r
) = NULL_TREE
;
11429 TYPE_REFERENCE_TO (r
) = NULL_TREE
;
11431 if (TREE_CODE (r
) == TEMPLATE_TEMPLATE_PARM
)
11432 /* We have reduced the level of the template
11433 template parameter, but not the levels of its
11434 template parameters, so canonical_type_parameter
11435 will not be able to find the canonical template
11436 template parameter for this level. Thus, we
11437 require structural equality checking to compare
11438 TEMPLATE_TEMPLATE_PARMs. */
11439 SET_TYPE_STRUCTURAL_EQUALITY (r
);
11440 else if (TYPE_STRUCTURAL_EQUALITY_P (t
))
11441 SET_TYPE_STRUCTURAL_EQUALITY (r
);
11443 TYPE_CANONICAL (r
) = canonical_type_parameter (r
);
11445 if (code
== BOUND_TEMPLATE_TEMPLATE_PARM
)
11447 tree argvec
= tsubst (TYPE_TI_ARGS (t
), args
,
11448 complain
, in_decl
);
11449 if (argvec
== error_mark_node
)
11450 return error_mark_node
;
11452 TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (r
)
11453 = build_template_info (TYPE_TI_TEMPLATE (t
), argvec
);
11458 case TEMPLATE_PARM_INDEX
:
11459 r
= reduce_template_parm_level (t
, type
, levels
, args
, complain
);
11463 gcc_unreachable ();
11471 tree purpose
, value
, chain
;
11473 if (t
== void_list_node
)
11476 purpose
= TREE_PURPOSE (t
);
11479 purpose
= tsubst (purpose
, args
, complain
, in_decl
);
11480 if (purpose
== error_mark_node
)
11481 return error_mark_node
;
11483 value
= TREE_VALUE (t
);
11486 value
= tsubst (value
, args
, complain
, in_decl
);
11487 if (value
== error_mark_node
)
11488 return error_mark_node
;
11490 chain
= TREE_CHAIN (t
);
11491 if (chain
&& chain
!= void_type_node
)
11493 chain
= tsubst (chain
, args
, complain
, in_decl
);
11494 if (chain
== error_mark_node
)
11495 return error_mark_node
;
11497 if (purpose
== TREE_PURPOSE (t
)
11498 && value
== TREE_VALUE (t
)
11499 && chain
== TREE_CHAIN (t
))
11501 return hash_tree_cons (purpose
, value
, chain
);
11505 /* We should never be tsubsting a binfo. */
11506 gcc_unreachable ();
11509 /* A vector of template arguments. */
11510 gcc_assert (!type
);
11511 return tsubst_template_args (t
, args
, complain
, in_decl
);
11514 case REFERENCE_TYPE
:
11516 if (type
== TREE_TYPE (t
) && TREE_CODE (type
) != METHOD_TYPE
)
11521 Type deduction may fail for any of the following
11524 -- Attempting to create a pointer to reference type.
11525 -- Attempting to create a reference to a reference type or
11526 a reference to void.
11528 Core issue 106 says that creating a reference to a reference
11529 during instantiation is no longer a cause for failure. We
11530 only enforce this check in strict C++98 mode. */
11531 if ((TREE_CODE (type
) == REFERENCE_TYPE
11532 && (((cxx_dialect
== cxx98
) && flag_iso
) || code
!= REFERENCE_TYPE
))
11533 || (code
== REFERENCE_TYPE
&& TREE_CODE (type
) == VOID_TYPE
))
11535 static location_t last_loc
;
11537 /* We keep track of the last time we issued this error
11538 message to avoid spewing a ton of messages during a
11539 single bad template instantiation. */
11540 if (complain
& tf_error
11541 && last_loc
!= input_location
)
11543 if (TREE_CODE (type
) == VOID_TYPE
)
11544 error ("forming reference to void");
11545 else if (code
== POINTER_TYPE
)
11546 error ("forming pointer to reference type %qT", type
);
11548 error ("forming reference to reference type %qT", type
);
11549 last_loc
= input_location
;
11552 return error_mark_node
;
11554 else if (code
== POINTER_TYPE
)
11556 r
= build_pointer_type (type
);
11557 if (TREE_CODE (type
) == METHOD_TYPE
)
11558 r
= build_ptrmemfunc_type (r
);
11560 else if (TREE_CODE (type
) == REFERENCE_TYPE
)
11561 /* In C++0x, during template argument substitution, when there is an
11562 attempt to create a reference to a reference type, reference
11563 collapsing is applied as described in [14.3.1/4 temp.arg.type]:
11565 "If a template-argument for a template-parameter T names a type
11566 that is a reference to a type A, an attempt to create the type
11567 'lvalue reference to cv T' creates the type 'lvalue reference to
11568 A,' while an attempt to create the type type rvalue reference to
11569 cv T' creates the type T"
11571 r
= cp_build_reference_type
11573 TYPE_REF_IS_RVALUE (t
) && TYPE_REF_IS_RVALUE (type
));
11575 r
= cp_build_reference_type (type
, TYPE_REF_IS_RVALUE (t
));
11576 r
= cp_build_qualified_type_real (r
, cp_type_quals (t
), complain
);
11578 if (r
!= error_mark_node
)
11579 /* Will this ever be needed for TYPE_..._TO values? */
11586 r
= tsubst (TYPE_OFFSET_BASETYPE (t
), args
, complain
, in_decl
);
11587 if (r
== error_mark_node
|| !MAYBE_CLASS_TYPE_P (r
))
11591 Type deduction may fail for any of the following
11594 -- Attempting to create "pointer to member of T" when T
11595 is not a class type. */
11596 if (complain
& tf_error
)
11597 error ("creating pointer to member of non-class type %qT", r
);
11598 return error_mark_node
;
11600 if (TREE_CODE (type
) == REFERENCE_TYPE
)
11602 if (complain
& tf_error
)
11603 error ("creating pointer to member reference type %qT", type
);
11604 return error_mark_node
;
11606 if (TREE_CODE (type
) == VOID_TYPE
)
11608 if (complain
& tf_error
)
11609 error ("creating pointer to member of type void");
11610 return error_mark_node
;
11612 gcc_assert (TREE_CODE (type
) != METHOD_TYPE
);
11613 if (TREE_CODE (type
) == FUNCTION_TYPE
)
11615 /* The type of the implicit object parameter gets its
11616 cv-qualifiers from the FUNCTION_TYPE. */
11619 = build_memfn_type (type
, r
, type_memfn_quals (type
),
11620 type_memfn_rqual (type
));
11621 memptr
= build_ptrmemfunc_type (build_pointer_type (method_type
));
11622 return cp_build_qualified_type_real (memptr
, cp_type_quals (t
),
11626 return cp_build_qualified_type_real (build_ptrmem_type (r
, type
),
11630 case FUNCTION_TYPE
:
11635 fntype
= tsubst_function_type (t
, args
, complain
, in_decl
);
11636 if (fntype
== error_mark_node
)
11637 return error_mark_node
;
11639 /* Substitute the exception specification. */
11640 specs
= tsubst_exception_specification (t
, args
, complain
,
11641 in_decl
, /*defer_ok*/true);
11642 if (specs
== error_mark_node
)
11643 return error_mark_node
;
11645 fntype
= build_exception_variant (fntype
, specs
);
11650 tree domain
= tsubst (TYPE_DOMAIN (t
), args
, complain
, in_decl
);
11651 if (domain
== error_mark_node
)
11652 return error_mark_node
;
11654 /* As an optimization, we avoid regenerating the array type if
11655 it will obviously be the same as T. */
11656 if (type
== TREE_TYPE (t
) && domain
== TYPE_DOMAIN (t
))
11659 /* These checks should match the ones in grokdeclarator.
11663 The deduction may fail for any of the following reasons:
11665 -- Attempting to create an array with an element type that
11666 is void, a function type, or a reference type, or [DR337]
11667 an abstract class type. */
11668 if (TREE_CODE (type
) == VOID_TYPE
11669 || TREE_CODE (type
) == FUNCTION_TYPE
11670 || TREE_CODE (type
) == REFERENCE_TYPE
)
11672 if (complain
& tf_error
)
11673 error ("creating array of %qT", type
);
11674 return error_mark_node
;
11676 if (ABSTRACT_CLASS_TYPE_P (type
))
11678 if (complain
& tf_error
)
11679 error ("creating array of %qT, which is an abstract class type",
11681 return error_mark_node
;
11684 r
= build_cplus_array_type (type
, domain
);
11686 if (TYPE_USER_ALIGN (t
))
11688 TYPE_ALIGN (r
) = TYPE_ALIGN (t
);
11689 TYPE_USER_ALIGN (r
) = 1;
11695 case TYPENAME_TYPE
:
11697 tree ctx
= tsubst_aggr_type (TYPE_CONTEXT (t
), args
, complain
,
11698 in_decl
, /*entering_scope=*/1);
11699 tree f
= tsubst_copy (TYPENAME_TYPE_FULLNAME (t
), args
,
11700 complain
, in_decl
);
11702 if (ctx
== error_mark_node
|| f
== error_mark_node
)
11703 return error_mark_node
;
11705 if (!MAYBE_CLASS_TYPE_P (ctx
))
11707 if (complain
& tf_error
)
11708 error ("%qT is not a class, struct, or union type", ctx
);
11709 return error_mark_node
;
11711 else if (!uses_template_parms (ctx
) && !TYPE_BEING_DEFINED (ctx
))
11713 /* Normally, make_typename_type does not require that the CTX
11714 have complete type in order to allow things like:
11716 template <class T> struct S { typename S<T>::X Y; };
11718 But, such constructs have already been resolved by this
11719 point, so here CTX really should have complete type, unless
11720 it's a partial instantiation. */
11721 ctx
= complete_type (ctx
);
11722 if (!COMPLETE_TYPE_P (ctx
))
11724 if (complain
& tf_error
)
11725 cxx_incomplete_type_error (NULL_TREE
, ctx
);
11726 return error_mark_node
;
11730 f
= make_typename_type (ctx
, f
, typename_type
,
11731 complain
| tf_keep_type_decl
);
11732 if (f
== error_mark_node
)
11734 if (TREE_CODE (f
) == TYPE_DECL
)
11736 complain
|= tf_ignore_bad_quals
;
11740 if (TREE_CODE (f
) != TYPENAME_TYPE
)
11742 if (TYPENAME_IS_ENUM_P (t
) && TREE_CODE (f
) != ENUMERAL_TYPE
)
11744 if (complain
& tf_error
)
11745 error ("%qT resolves to %qT, which is not an enumeration type",
11748 return error_mark_node
;
11750 else if (TYPENAME_IS_CLASS_P (t
) && !CLASS_TYPE_P (f
))
11752 if (complain
& tf_error
)
11753 error ("%qT resolves to %qT, which is is not a class type",
11756 return error_mark_node
;
11760 return cp_build_qualified_type_real
11761 (f
, cp_type_quals (f
) | cp_type_quals (t
), complain
);
11764 case UNBOUND_CLASS_TEMPLATE
:
11766 tree ctx
= tsubst_aggr_type (TYPE_CONTEXT (t
), args
, complain
,
11767 in_decl
, /*entering_scope=*/1);
11768 tree name
= TYPE_IDENTIFIER (t
);
11769 tree parm_list
= DECL_TEMPLATE_PARMS (TYPE_NAME (t
));
11771 if (ctx
== error_mark_node
|| name
== error_mark_node
)
11772 return error_mark_node
;
11775 parm_list
= tsubst_template_parms (parm_list
, args
, complain
);
11776 return make_unbound_class_template (ctx
, name
, parm_list
, complain
);
11783 ++cp_unevaluated_operand
;
11784 ++c_inhibit_evaluation_warnings
;
11786 type
= tsubst_expr (TYPEOF_TYPE_EXPR (t
), args
,
11788 /*integral_constant_expression_p=*/false);
11790 --cp_unevaluated_operand
;
11791 --c_inhibit_evaluation_warnings
;
11793 type
= finish_typeof (type
);
11794 return cp_build_qualified_type_real (type
,
11796 | cp_type_quals (type
),
11800 case DECLTYPE_TYPE
:
11804 ++cp_unevaluated_operand
;
11805 ++c_inhibit_evaluation_warnings
;
11807 type
= tsubst_expr (DECLTYPE_TYPE_EXPR (t
), args
,
11808 complain
|tf_decltype
, in_decl
,
11809 /*integral_constant_expression_p=*/false);
11811 --cp_unevaluated_operand
;
11812 --c_inhibit_evaluation_warnings
;
11814 if (DECLTYPE_FOR_LAMBDA_CAPTURE (t
))
11815 type
= lambda_capture_field_type (type
);
11816 else if (DECLTYPE_FOR_LAMBDA_PROXY (t
))
11817 type
= lambda_proxy_type (type
);
11820 bool id
= DECLTYPE_TYPE_ID_EXPR_OR_MEMBER_ACCESS_P (t
);
11821 if (id
&& TREE_CODE (DECLTYPE_TYPE_EXPR (t
)) == BIT_NOT_EXPR
11823 /* In a template ~id could be either a complement expression
11824 or an unqualified-id naming a destructor; if instantiating
11825 it produces an expression, it's not an id-expression or
11828 type
= finish_decltype_type (type
, id
, complain
);
11830 return cp_build_qualified_type_real (type
,
11832 | cp_type_quals (type
),
11836 case UNDERLYING_TYPE
:
11838 tree type
= tsubst (UNDERLYING_TYPE_TYPE (t
), args
,
11839 complain
, in_decl
);
11840 return finish_underlying_type (type
);
11843 case TYPE_ARGUMENT_PACK
:
11844 case NONTYPE_ARGUMENT_PACK
:
11846 tree r
= TYPE_P (t
) ? cxx_make_type (code
) : make_node (code
);
11848 tsubst_template_args (ARGUMENT_PACK_ARGS (t
),
11852 SET_ARGUMENT_PACK_ARGS (r
, packed_out
);
11854 /* For template nontype argument packs, also substitute into
11856 if (code
== NONTYPE_ARGUMENT_PACK
)
11857 TREE_TYPE (r
) = tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
11875 /* We should use one of the expression tsubsts for these codes. */
11876 gcc_unreachable ();
11879 sorry ("use of %qs in template", tree_code_name
[(int) code
]);
11880 return error_mark_node
;
11884 /* Like tsubst_expr for a BASELINK. OBJECT_TYPE, if non-NULL, is the
11885 type of the expression on the left-hand side of the "." or "->"
11889 tsubst_baselink (tree baselink
, tree object_type
,
11890 tree args
, tsubst_flags_t complain
, tree in_decl
)
11893 tree qualifying_scope
;
11896 tree template_args
= 0;
11897 bool template_id_p
= false;
11898 bool qualified
= BASELINK_QUALIFIED_P (baselink
);
11900 /* A baselink indicates a function from a base class. Both the
11901 BASELINK_ACCESS_BINFO and the base class referenced may
11902 indicate bases of the template class, rather than the
11903 instantiated class. In addition, lookups that were not
11904 ambiguous before may be ambiguous now. Therefore, we perform
11905 the lookup again. */
11906 qualifying_scope
= BINFO_TYPE (BASELINK_ACCESS_BINFO (baselink
));
11907 qualifying_scope
= tsubst (qualifying_scope
, args
,
11908 complain
, in_decl
);
11909 fns
= BASELINK_FUNCTIONS (baselink
);
11910 optype
= tsubst (BASELINK_OPTYPE (baselink
), args
, complain
, in_decl
);
11911 if (TREE_CODE (fns
) == TEMPLATE_ID_EXPR
)
11913 template_id_p
= true;
11914 template_args
= TREE_OPERAND (fns
, 1);
11915 fns
= TREE_OPERAND (fns
, 0);
11917 template_args
= tsubst_template_args (template_args
, args
,
11918 complain
, in_decl
);
11920 name
= DECL_NAME (get_first_fn (fns
));
11921 if (IDENTIFIER_TYPENAME_P (name
))
11922 name
= mangle_conv_op_name_for_type (optype
);
11923 baselink
= lookup_fnfields (qualifying_scope
, name
, /*protect=*/1);
11925 return error_mark_node
;
11927 /* If lookup found a single function, mark it as used at this
11928 point. (If it lookup found multiple functions the one selected
11929 later by overload resolution will be marked as used at that
11931 if (BASELINK_P (baselink
))
11932 fns
= BASELINK_FUNCTIONS (baselink
);
11933 if (!template_id_p
&& !really_overloaded_fn (fns
))
11934 mark_used (OVL_CURRENT (fns
));
11936 /* Add back the template arguments, if present. */
11937 if (BASELINK_P (baselink
) && template_id_p
)
11938 BASELINK_FUNCTIONS (baselink
)
11939 = build_nt (TEMPLATE_ID_EXPR
,
11940 BASELINK_FUNCTIONS (baselink
),
11942 /* Update the conversion operator type. */
11943 BASELINK_OPTYPE (baselink
) = optype
;
11946 object_type
= current_class_type
;
11949 baselink
= adjust_result_of_qualified_name_lookup (baselink
,
11955 /* Like tsubst_expr for a SCOPE_REF, given by QUALIFIED_ID. DONE is
11956 true if the qualified-id will be a postfix-expression in-and-of
11957 itself; false if more of the postfix-expression follows the
11958 QUALIFIED_ID. ADDRESS_P is true if the qualified-id is the operand
11962 tsubst_qualified_id (tree qualified_id
, tree args
,
11963 tsubst_flags_t complain
, tree in_decl
,
11964 bool done
, bool address_p
)
11970 tree template_args
;
11971 location_t loc
= UNKNOWN_LOCATION
;
11973 gcc_assert (TREE_CODE (qualified_id
) == SCOPE_REF
);
11975 /* Figure out what name to look up. */
11976 name
= TREE_OPERAND (qualified_id
, 1);
11977 if (TREE_CODE (name
) == TEMPLATE_ID_EXPR
)
11979 is_template
= true;
11980 loc
= EXPR_LOCATION (name
);
11981 template_args
= TREE_OPERAND (name
, 1);
11983 template_args
= tsubst_template_args (template_args
, args
,
11984 complain
, in_decl
);
11985 name
= TREE_OPERAND (name
, 0);
11989 is_template
= false;
11990 template_args
= NULL_TREE
;
11993 /* Substitute into the qualifying scope. When there are no ARGS, we
11994 are just trying to simplify a non-dependent expression. In that
11995 case the qualifying scope may be dependent, and, in any case,
11996 substituting will not help. */
11997 scope
= TREE_OPERAND (qualified_id
, 0);
12000 scope
= tsubst (scope
, args
, complain
, in_decl
);
12001 expr
= tsubst_copy (name
, args
, complain
, in_decl
);
12006 if (dependent_scope_p (scope
))
12009 expr
= build_min_nt_loc (loc
, TEMPLATE_ID_EXPR
, expr
, template_args
);
12010 return build_qualified_name (NULL_TREE
, scope
, expr
,
12011 QUALIFIED_NAME_IS_TEMPLATE (qualified_id
));
12014 if (!BASELINK_P (name
) && !DECL_P (expr
))
12016 if (TREE_CODE (expr
) == BIT_NOT_EXPR
)
12018 /* A BIT_NOT_EXPR is used to represent a destructor. */
12019 if (!check_dtor_name (scope
, TREE_OPERAND (expr
, 0)))
12021 error ("qualifying type %qT does not match destructor name ~%qT",
12022 scope
, TREE_OPERAND (expr
, 0));
12023 expr
= error_mark_node
;
12026 expr
= lookup_qualified_name (scope
, complete_dtor_identifier
,
12027 /*is_type_p=*/0, false);
12030 expr
= lookup_qualified_name (scope
, expr
, /*is_type_p=*/0, false);
12031 if (TREE_CODE (TREE_CODE (expr
) == TEMPLATE_DECL
12032 ? DECL_TEMPLATE_RESULT (expr
) : expr
) == TYPE_DECL
)
12034 if (complain
& tf_error
)
12036 error ("dependent-name %qE is parsed as a non-type, but "
12037 "instantiation yields a type", qualified_id
);
12038 inform (input_location
, "say %<typename %E%> if a type is meant", qualified_id
);
12040 return error_mark_node
;
12046 check_accessibility_of_qualified_id (expr
, /*object_type=*/NULL_TREE
,
12048 /* Remember that there was a reference to this entity. */
12052 if (expr
== error_mark_node
|| TREE_CODE (expr
) == TREE_LIST
)
12054 if (complain
& tf_error
)
12055 qualified_name_lookup_error (scope
,
12056 TREE_OPERAND (qualified_id
, 1),
12057 expr
, input_location
);
12058 return error_mark_node
;
12062 expr
= lookup_template_function (expr
, template_args
);
12064 if (expr
== error_mark_node
&& complain
& tf_error
)
12065 qualified_name_lookup_error (scope
, TREE_OPERAND (qualified_id
, 1),
12066 expr
, input_location
);
12067 else if (TYPE_P (scope
))
12069 expr
= (adjust_result_of_qualified_name_lookup
12070 (expr
, scope
, current_nonlambda_class_type ()));
12071 expr
= (finish_qualified_id_expr
12072 (scope
, expr
, done
, address_p
&& PTRMEM_OK_P (qualified_id
),
12073 QUALIFIED_NAME_IS_TEMPLATE (qualified_id
),
12074 /*template_arg_p=*/false, complain
));
12077 /* Expressions do not generally have reference type. */
12078 if (TREE_CODE (expr
) != SCOPE_REF
12079 /* However, if we're about to form a pointer-to-member, we just
12080 want the referenced member referenced. */
12081 && TREE_CODE (expr
) != OFFSET_REF
)
12082 expr
= convert_from_reference (expr
);
12087 /* Like tsubst, but deals with expressions. This function just replaces
12088 template parms; to finish processing the resultant expression, use
12089 tsubst_copy_and_build or tsubst_expr. */
12092 tsubst_copy (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
12094 enum tree_code code
;
12097 if (t
== NULL_TREE
|| t
== error_mark_node
|| args
== NULL_TREE
)
12100 code
= TREE_CODE (t
);
12105 r
= retrieve_local_specialization (t
);
12107 if (r
== NULL_TREE
)
12109 /* We get here for a use of 'this' in an NSDMI. */
12110 if (DECL_NAME (t
) == this_identifier
12111 && at_function_scope_p ()
12112 && DECL_CONSTRUCTOR_P (current_function_decl
))
12113 return current_class_ptr
;
12115 /* This can happen for a parameter name used later in a function
12116 declaration (such as in a late-specified return type). Just
12117 make a dummy decl, since it's only used for its type. */
12118 gcc_assert (cp_unevaluated_operand
!= 0);
12119 r
= tsubst_decl (t
, args
, complain
);
12120 /* Give it the template pattern as its context; its true context
12121 hasn't been instantiated yet and this is good enough for
12123 DECL_CONTEXT (r
) = DECL_CONTEXT (t
);
12126 if (TREE_CODE (r
) == ARGUMENT_PACK_SELECT
)
12127 r
= ARGUMENT_PACK_SELECT_ARG (r
);
12136 if (DECL_TEMPLATE_PARM_P (t
))
12137 return tsubst_copy (DECL_INITIAL (t
), args
, complain
, in_decl
);
12138 /* There is no need to substitute into namespace-scope
12140 if (DECL_NAMESPACE_SCOPE_P (t
))
12142 /* If ARGS is NULL, then T is known to be non-dependent. */
12143 if (args
== NULL_TREE
)
12144 return integral_constant_value (t
);
12146 /* Unfortunately, we cannot just call lookup_name here.
12149 template <int I> int f() {
12151 struct S { void g() { E e = a; } };
12154 When we instantiate f<7>::S::g(), say, lookup_name is not
12155 clever enough to find f<7>::a. */
12157 = tsubst_aggr_type (DECL_CONTEXT (t
), args
, complain
, in_decl
,
12158 /*entering_scope=*/0);
12160 for (v
= TYPE_VALUES (enum_type
);
12162 v
= TREE_CHAIN (v
))
12163 if (TREE_PURPOSE (v
) == DECL_NAME (t
))
12164 return TREE_VALUE (v
);
12166 /* We didn't find the name. That should never happen; if
12167 name-lookup found it during preliminary parsing, we
12168 should find it again here during instantiation. */
12169 gcc_unreachable ();
12174 if (DECL_CONTEXT (t
))
12178 ctx
= tsubst_aggr_type (DECL_CONTEXT (t
), args
, complain
, in_decl
,
12179 /*entering_scope=*/1);
12180 if (ctx
!= DECL_CONTEXT (t
))
12182 tree r
= lookup_field (ctx
, DECL_NAME (t
), 0, false);
12185 if (complain
& tf_error
)
12186 error ("using invalid field %qD", t
);
12187 return error_mark_node
;
12196 case FUNCTION_DECL
:
12197 if ((DECL_LANG_SPECIFIC (t
) && DECL_TEMPLATE_INFO (t
))
12198 || local_variable_p (t
))
12199 t
= tsubst (t
, args
, complain
, in_decl
);
12203 case NAMESPACE_DECL
:
12207 /* An OVERLOAD will always be a non-dependent overload set; an
12208 overload set from function scope will just be represented with an
12209 IDENTIFIER_NODE, and from class scope with a BASELINK. */
12210 gcc_assert (!uses_template_parms (t
));
12214 return tsubst_baselink (t
, current_class_type
, args
, complain
, in_decl
);
12216 case TEMPLATE_DECL
:
12217 if (DECL_TEMPLATE_TEMPLATE_PARM_P (t
))
12218 return tsubst (TREE_TYPE (DECL_TEMPLATE_RESULT (t
)),
12219 args
, complain
, in_decl
);
12220 else if (DECL_FUNCTION_TEMPLATE_P (t
) && DECL_MEMBER_TEMPLATE_P (t
))
12221 return tsubst (t
, args
, complain
, in_decl
);
12222 else if (DECL_CLASS_SCOPE_P (t
)
12223 && uses_template_parms (DECL_CONTEXT (t
)))
12225 /* Template template argument like the following example need
12228 template <template <class> class TT> struct C {};
12229 template <class T> struct D {
12230 template <class U> struct E {};
12235 We are processing the template argument `E' in #1 for
12236 the template instantiation #2. Originally, `E' is a
12237 TEMPLATE_DECL with `D<T>' as its DECL_CONTEXT. Now we
12238 have to substitute this with one having context `D<int>'. */
12240 tree context
= tsubst (DECL_CONTEXT (t
), args
, complain
, in_decl
);
12241 return lookup_field (context
, DECL_NAME(t
), 0, false);
12244 /* Ordinary template template argument. */
12248 case REINTERPRET_CAST_EXPR
:
12249 case CONST_CAST_EXPR
:
12250 case STATIC_CAST_EXPR
:
12251 case DYNAMIC_CAST_EXPR
:
12252 case IMPLICIT_CONV_EXPR
:
12256 (code
, tsubst (TREE_TYPE (t
), args
, complain
, in_decl
),
12257 tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
));
12260 if (PACK_EXPANSION_P (TREE_OPERAND (t
, 0)))
12263 tree expanded
, op
= TREE_OPERAND (t
, 0);
12266 if (SIZEOF_EXPR_TYPE_P (t
))
12267 op
= TREE_TYPE (op
);
12269 ++cp_unevaluated_operand
;
12270 ++c_inhibit_evaluation_warnings
;
12271 /* We only want to compute the number of arguments. */
12272 expanded
= tsubst_pack_expansion (op
, args
, complain
, in_decl
);
12273 --cp_unevaluated_operand
;
12274 --c_inhibit_evaluation_warnings
;
12276 if (TREE_CODE (expanded
) == TREE_VEC
)
12277 len
= TREE_VEC_LENGTH (expanded
);
12279 if (expanded
== error_mark_node
)
12280 return error_mark_node
;
12281 else if (PACK_EXPANSION_P (expanded
)
12282 || (TREE_CODE (expanded
) == TREE_VEC
12284 && PACK_EXPANSION_P (TREE_VEC_ELT (expanded
, len
-1))))
12286 if (TREE_CODE (expanded
) == TREE_VEC
)
12287 expanded
= TREE_VEC_ELT (expanded
, len
- 1);
12289 if (TYPE_P (expanded
))
12290 return cxx_sizeof_or_alignof_type (expanded
, SIZEOF_EXPR
,
12291 complain
& tf_error
);
12293 return cxx_sizeof_or_alignof_expr (expanded
, SIZEOF_EXPR
,
12294 complain
& tf_error
);
12297 return build_int_cst (size_type_node
, len
);
12299 if (SIZEOF_EXPR_TYPE_P (t
))
12301 r
= tsubst (TREE_TYPE (TREE_OPERAND (t
, 0)),
12302 args
, complain
, in_decl
);
12303 r
= build1 (NOP_EXPR
, r
, error_mark_node
);
12304 r
= build1 (SIZEOF_EXPR
,
12305 tsubst (TREE_TYPE (t
), args
, complain
, in_decl
), r
);
12306 SIZEOF_EXPR_TYPE_P (r
) = 1;
12313 case TRUTH_NOT_EXPR
:
12316 case UNARY_PLUS_EXPR
: /* Unary + */
12318 case AT_ENCODE_EXPR
:
12322 case REALPART_EXPR
:
12323 case IMAGPART_EXPR
:
12325 (code
, tsubst (TREE_TYPE (t
), args
, complain
, in_decl
),
12326 tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
));
12328 case COMPONENT_REF
:
12333 object
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
12334 name
= TREE_OPERAND (t
, 1);
12335 if (TREE_CODE (name
) == BIT_NOT_EXPR
)
12337 name
= tsubst_copy (TREE_OPERAND (name
, 0), args
,
12338 complain
, in_decl
);
12339 name
= build1 (BIT_NOT_EXPR
, NULL_TREE
, name
);
12341 else if (TREE_CODE (name
) == SCOPE_REF
12342 && TREE_CODE (TREE_OPERAND (name
, 1)) == BIT_NOT_EXPR
)
12344 tree base
= tsubst_copy (TREE_OPERAND (name
, 0), args
,
12345 complain
, in_decl
);
12346 name
= TREE_OPERAND (name
, 1);
12347 name
= tsubst_copy (TREE_OPERAND (name
, 0), args
,
12348 complain
, in_decl
);
12349 name
= build1 (BIT_NOT_EXPR
, NULL_TREE
, name
);
12350 name
= build_qualified_name (/*type=*/NULL_TREE
,
12352 /*template_p=*/false);
12354 else if (BASELINK_P (name
))
12355 name
= tsubst_baselink (name
,
12356 non_reference (TREE_TYPE (object
)),
12360 name
= tsubst_copy (name
, args
, complain
, in_decl
);
12361 return build_nt (COMPONENT_REF
, object
, name
, NULL_TREE
);
12367 case TRUNC_DIV_EXPR
:
12368 case CEIL_DIV_EXPR
:
12369 case FLOOR_DIV_EXPR
:
12370 case ROUND_DIV_EXPR
:
12371 case EXACT_DIV_EXPR
:
12375 case TRUNC_MOD_EXPR
:
12376 case FLOOR_MOD_EXPR
:
12377 case TRUTH_ANDIF_EXPR
:
12378 case TRUTH_ORIF_EXPR
:
12379 case TRUTH_AND_EXPR
:
12380 case TRUTH_OR_EXPR
:
12393 case COMPOUND_EXPR
:
12396 case PREDECREMENT_EXPR
:
12397 case PREINCREMENT_EXPR
:
12398 case POSTDECREMENT_EXPR
:
12399 case POSTINCREMENT_EXPR
:
12401 (code
, tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
),
12402 tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
));
12405 return build_qualified_name (/*type=*/NULL_TREE
,
12406 tsubst_copy (TREE_OPERAND (t
, 0),
12407 args
, complain
, in_decl
),
12408 tsubst_copy (TREE_OPERAND (t
, 1),
12409 args
, complain
, in_decl
),
12410 QUALIFIED_NAME_IS_TEMPLATE (t
));
12415 tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
),
12416 tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
),
12417 NULL_TREE
, NULL_TREE
);
12421 int n
= VL_EXP_OPERAND_LENGTH (t
);
12422 tree result
= build_vl_exp (CALL_EXPR
, n
);
12424 for (i
= 0; i
< n
; i
++)
12425 TREE_OPERAND (t
, i
) = tsubst_copy (TREE_OPERAND (t
, i
), args
,
12426 complain
, in_decl
);
12432 case PSEUDO_DTOR_EXPR
:
12435 (code
, tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
),
12436 tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
),
12437 tsubst_copy (TREE_OPERAND (t
, 2), args
, complain
, in_decl
));
12438 TREE_NO_WARNING (r
) = TREE_NO_WARNING (t
);
12445 (code
, tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
),
12446 tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
),
12447 tsubst_copy (TREE_OPERAND (t
, 2), args
, complain
, in_decl
));
12448 NEW_EXPR_USE_GLOBAL (r
) = NEW_EXPR_USE_GLOBAL (t
);
12455 (code
, tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
),
12456 tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
));
12457 DELETE_EXPR_USE_GLOBAL (r
) = DELETE_EXPR_USE_GLOBAL (t
);
12458 DELETE_EXPR_USE_VEC (r
) = DELETE_EXPR_USE_VEC (t
);
12462 case TEMPLATE_ID_EXPR
:
12464 /* Substituted template arguments */
12465 tree fn
= TREE_OPERAND (t
, 0);
12466 tree targs
= TREE_OPERAND (t
, 1);
12468 fn
= tsubst_copy (fn
, args
, complain
, in_decl
);
12470 targs
= tsubst_template_args (targs
, args
, complain
, in_decl
);
12472 return lookup_template_function (fn
, targs
);
12477 tree purpose
, value
, chain
;
12479 if (t
== void_list_node
)
12482 purpose
= TREE_PURPOSE (t
);
12484 purpose
= tsubst_copy (purpose
, args
, complain
, in_decl
);
12485 value
= TREE_VALUE (t
);
12487 value
= tsubst_copy (value
, args
, complain
, in_decl
);
12488 chain
= TREE_CHAIN (t
);
12489 if (chain
&& chain
!= void_type_node
)
12490 chain
= tsubst_copy (chain
, args
, complain
, in_decl
);
12491 if (purpose
== TREE_PURPOSE (t
)
12492 && value
== TREE_VALUE (t
)
12493 && chain
== TREE_CHAIN (t
))
12495 return tree_cons (purpose
, value
, chain
);
12500 case ENUMERAL_TYPE
:
12502 case TEMPLATE_TYPE_PARM
:
12503 case TEMPLATE_TEMPLATE_PARM
:
12504 case BOUND_TEMPLATE_TEMPLATE_PARM
:
12505 case TEMPLATE_PARM_INDEX
:
12507 case REFERENCE_TYPE
:
12509 case FUNCTION_TYPE
:
12512 case TYPENAME_TYPE
:
12513 case UNBOUND_CLASS_TEMPLATE
:
12515 case DECLTYPE_TYPE
:
12517 return tsubst (t
, args
, complain
, in_decl
);
12521 /* Fall through. */
12522 case IDENTIFIER_NODE
:
12523 if (IDENTIFIER_TYPENAME_P (t
))
12525 tree new_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
12526 return mangle_conv_op_name_for_type (new_type
);
12532 /* This is handled by tsubst_copy_and_build. */
12533 gcc_unreachable ();
12536 return build_x_va_arg (EXPR_LOCATION (t
),
12537 tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
,
12539 tsubst (TREE_TYPE (t
), args
, complain
, in_decl
));
12541 case CLEANUP_POINT_EXPR
:
12542 /* We shouldn't have built any of these during initial template
12543 generation. Instead, they should be built during instantiation
12544 in response to the saved STMT_IS_FULL_EXPR_P setting. */
12545 gcc_unreachable ();
12549 (code
, tsubst (TREE_TYPE (t
), args
, complain
, in_decl
),
12550 tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
),
12551 tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
));
12552 PTRMEM_OK_P (r
) = PTRMEM_OK_P (t
);
12553 mark_used (TREE_OPERAND (r
, 1));
12556 case EXPR_PACK_EXPANSION
:
12557 error ("invalid use of pack expansion expression");
12558 return error_mark_node
;
12560 case NONTYPE_ARGUMENT_PACK
:
12561 error ("use %<...%> to expand argument pack");
12562 return error_mark_node
;
12569 /* Instantiate any typedefs in the type. */
12570 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
12571 r
= fold_convert (type
, t
);
12572 gcc_assert (TREE_CODE (r
) == code
);
12577 /* These can sometimes show up in a partial instantiation, but never
12578 involve template parms. */
12579 gcc_assert (!uses_template_parms (t
));
12583 /* We shouldn't get here, but keep going if !ENABLE_CHECKING. */
12584 gcc_checking_assert (false);
12589 /* Like tsubst_copy, but specifically for OpenMP clauses. */
12592 tsubst_omp_clauses (tree clauses
, tree args
, tsubst_flags_t complain
,
12595 tree new_clauses
= NULL
, nc
, oc
;
12597 for (oc
= clauses
; oc
; oc
= OMP_CLAUSE_CHAIN (oc
))
12599 nc
= copy_node (oc
);
12600 OMP_CLAUSE_CHAIN (nc
) = new_clauses
;
12603 switch (OMP_CLAUSE_CODE (nc
))
12605 case OMP_CLAUSE_LASTPRIVATE
:
12606 if (OMP_CLAUSE_LASTPRIVATE_STMT (oc
))
12608 OMP_CLAUSE_LASTPRIVATE_STMT (nc
) = push_stmt_list ();
12609 tsubst_expr (OMP_CLAUSE_LASTPRIVATE_STMT (oc
), args
, complain
,
12610 in_decl
, /*integral_constant_expression_p=*/false);
12611 OMP_CLAUSE_LASTPRIVATE_STMT (nc
)
12612 = pop_stmt_list (OMP_CLAUSE_LASTPRIVATE_STMT (nc
));
12615 case OMP_CLAUSE_PRIVATE
:
12616 case OMP_CLAUSE_SHARED
:
12617 case OMP_CLAUSE_FIRSTPRIVATE
:
12618 case OMP_CLAUSE_REDUCTION
:
12619 case OMP_CLAUSE_COPYIN
:
12620 case OMP_CLAUSE_COPYPRIVATE
:
12621 case OMP_CLAUSE_IF
:
12622 case OMP_CLAUSE_NUM_THREADS
:
12623 case OMP_CLAUSE_SCHEDULE
:
12624 case OMP_CLAUSE_COLLAPSE
:
12625 case OMP_CLAUSE_FINAL
:
12626 OMP_CLAUSE_OPERAND (nc
, 0)
12627 = tsubst_expr (OMP_CLAUSE_OPERAND (oc
, 0), args
, complain
,
12628 in_decl
, /*integral_constant_expression_p=*/false);
12630 case OMP_CLAUSE_NOWAIT
:
12631 case OMP_CLAUSE_ORDERED
:
12632 case OMP_CLAUSE_DEFAULT
:
12633 case OMP_CLAUSE_UNTIED
:
12634 case OMP_CLAUSE_MERGEABLE
:
12637 gcc_unreachable ();
12641 return finish_omp_clauses (nreverse (new_clauses
));
12644 /* Like tsubst_copy_and_build, but unshare TREE_LIST nodes. */
12647 tsubst_copy_asm_operands (tree t
, tree args
, tsubst_flags_t complain
,
12650 #define RECUR(t) tsubst_copy_asm_operands (t, args, complain, in_decl)
12652 tree purpose
, value
, chain
;
12657 if (TREE_CODE (t
) != TREE_LIST
)
12658 return tsubst_copy_and_build (t
, args
, complain
, in_decl
,
12659 /*function_p=*/false,
12660 /*integral_constant_expression_p=*/false);
12662 if (t
== void_list_node
)
12665 purpose
= TREE_PURPOSE (t
);
12667 purpose
= RECUR (purpose
);
12668 value
= TREE_VALUE (t
);
12671 if (TREE_CODE (value
) != LABEL_DECL
)
12672 value
= RECUR (value
);
12675 value
= lookup_label (DECL_NAME (value
));
12676 gcc_assert (TREE_CODE (value
) == LABEL_DECL
);
12677 TREE_USED (value
) = 1;
12680 chain
= TREE_CHAIN (t
);
12681 if (chain
&& chain
!= void_type_node
)
12682 chain
= RECUR (chain
);
12683 return tree_cons (purpose
, value
, chain
);
12687 /* Substitute one OMP_FOR iterator. */
12690 tsubst_omp_for_iterator (tree t
, int i
, tree declv
, tree initv
,
12691 tree condv
, tree incrv
, tree
*clauses
,
12692 tree args
, tsubst_flags_t complain
, tree in_decl
,
12693 bool integral_constant_expression_p
)
12695 #define RECUR(NODE) \
12696 tsubst_expr ((NODE), args, complain, in_decl, \
12697 integral_constant_expression_p)
12698 tree decl
, init
, cond
, incr
;
12701 init
= TREE_VEC_ELT (OMP_FOR_INIT (t
), i
);
12702 gcc_assert (TREE_CODE (init
) == MODIFY_EXPR
);
12703 decl
= TREE_OPERAND (init
, 0);
12704 init
= TREE_OPERAND (init
, 1);
12705 /* Do this before substituting into decl to handle 'auto'. */
12706 init_decl
= (init
&& TREE_CODE (init
) == DECL_EXPR
);
12707 init
= RECUR (init
);
12708 decl
= RECUR (decl
);
12711 gcc_assert (!processing_template_decl
);
12712 init
= DECL_INITIAL (decl
);
12713 DECL_INITIAL (decl
) = NULL_TREE
;
12716 gcc_assert (!type_dependent_expression_p (decl
));
12718 if (!CLASS_TYPE_P (TREE_TYPE (decl
)))
12720 cond
= RECUR (TREE_VEC_ELT (OMP_FOR_COND (t
), i
));
12721 incr
= TREE_VEC_ELT (OMP_FOR_INCR (t
), i
);
12722 if (TREE_CODE (incr
) == MODIFY_EXPR
)
12723 incr
= build_x_modify_expr (EXPR_LOCATION (incr
),
12724 RECUR (TREE_OPERAND (incr
, 0)), NOP_EXPR
,
12725 RECUR (TREE_OPERAND (incr
, 1)),
12728 incr
= RECUR (incr
);
12729 TREE_VEC_ELT (declv
, i
) = decl
;
12730 TREE_VEC_ELT (initv
, i
) = init
;
12731 TREE_VEC_ELT (condv
, i
) = cond
;
12732 TREE_VEC_ELT (incrv
, i
) = incr
;
12736 if (init
&& !init_decl
)
12739 for (c
= *clauses
; c
; c
= OMP_CLAUSE_CHAIN (c
))
12741 if ((OMP_CLAUSE_CODE (c
) == OMP_CLAUSE_PRIVATE
12742 || OMP_CLAUSE_CODE (c
) == OMP_CLAUSE_LASTPRIVATE
)
12743 && OMP_CLAUSE_DECL (c
) == decl
)
12745 else if (OMP_CLAUSE_CODE (c
) == OMP_CLAUSE_FIRSTPRIVATE
12746 && OMP_CLAUSE_DECL (c
) == decl
)
12747 error ("iteration variable %qD should not be firstprivate", decl
);
12748 else if (OMP_CLAUSE_CODE (c
) == OMP_CLAUSE_REDUCTION
12749 && OMP_CLAUSE_DECL (c
) == decl
)
12750 error ("iteration variable %qD should not be reduction", decl
);
12754 c
= build_omp_clause (input_location
, OMP_CLAUSE_PRIVATE
);
12755 OMP_CLAUSE_DECL (c
) = decl
;
12756 c
= finish_omp_clauses (c
);
12759 OMP_CLAUSE_CHAIN (c
) = *clauses
;
12764 cond
= TREE_VEC_ELT (OMP_FOR_COND (t
), i
);
12765 if (COMPARISON_CLASS_P (cond
))
12766 cond
= build2 (TREE_CODE (cond
), boolean_type_node
,
12767 RECUR (TREE_OPERAND (cond
, 0)),
12768 RECUR (TREE_OPERAND (cond
, 1)));
12770 cond
= RECUR (cond
);
12771 incr
= TREE_VEC_ELT (OMP_FOR_INCR (t
), i
);
12772 switch (TREE_CODE (incr
))
12774 case PREINCREMENT_EXPR
:
12775 case PREDECREMENT_EXPR
:
12776 case POSTINCREMENT_EXPR
:
12777 case POSTDECREMENT_EXPR
:
12778 incr
= build2 (TREE_CODE (incr
), TREE_TYPE (decl
),
12779 RECUR (TREE_OPERAND (incr
, 0)), NULL_TREE
);
12782 if (TREE_CODE (TREE_OPERAND (incr
, 1)) == PLUS_EXPR
12783 || TREE_CODE (TREE_OPERAND (incr
, 1)) == MINUS_EXPR
)
12785 tree rhs
= TREE_OPERAND (incr
, 1);
12786 incr
= build2 (MODIFY_EXPR
, TREE_TYPE (decl
),
12787 RECUR (TREE_OPERAND (incr
, 0)),
12788 build2 (TREE_CODE (rhs
), TREE_TYPE (decl
),
12789 RECUR (TREE_OPERAND (rhs
, 0)),
12790 RECUR (TREE_OPERAND (rhs
, 1))));
12793 incr
= RECUR (incr
);
12796 if (TREE_CODE (TREE_OPERAND (incr
, 1)) == PLUS_EXPR
12797 || TREE_CODE (TREE_OPERAND (incr
, 1)) == MINUS_EXPR
)
12799 tree lhs
= RECUR (TREE_OPERAND (incr
, 0));
12800 incr
= build2 (MODIFY_EXPR
, TREE_TYPE (decl
), lhs
,
12801 build2 (TREE_CODE (TREE_OPERAND (incr
, 1)),
12802 TREE_TYPE (decl
), lhs
,
12803 RECUR (TREE_OPERAND (incr
, 2))));
12805 else if (TREE_CODE (TREE_OPERAND (incr
, 1)) == NOP_EXPR
12806 && (TREE_CODE (TREE_OPERAND (incr
, 2)) == PLUS_EXPR
12807 || (TREE_CODE (TREE_OPERAND (incr
, 2)) == MINUS_EXPR
)))
12809 tree rhs
= TREE_OPERAND (incr
, 2);
12810 incr
= build2 (MODIFY_EXPR
, TREE_TYPE (decl
),
12811 RECUR (TREE_OPERAND (incr
, 0)),
12812 build2 (TREE_CODE (rhs
), TREE_TYPE (decl
),
12813 RECUR (TREE_OPERAND (rhs
, 0)),
12814 RECUR (TREE_OPERAND (rhs
, 1))));
12817 incr
= RECUR (incr
);
12820 incr
= RECUR (incr
);
12824 TREE_VEC_ELT (declv
, i
) = decl
;
12825 TREE_VEC_ELT (initv
, i
) = init
;
12826 TREE_VEC_ELT (condv
, i
) = cond
;
12827 TREE_VEC_ELT (incrv
, i
) = incr
;
12831 /* Like tsubst_copy for expressions, etc. but also does semantic
12835 tsubst_expr (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
,
12836 bool integral_constant_expression_p
)
12838 #define RETURN(EXP) do { r = (EXP); goto out; } while(0)
12839 #define RECUR(NODE) \
12840 tsubst_expr ((NODE), args, complain, in_decl, \
12841 integral_constant_expression_p)
12847 if (t
== NULL_TREE
|| t
== error_mark_node
)
12850 loc
= input_location
;
12851 if (EXPR_HAS_LOCATION (t
))
12852 input_location
= EXPR_LOCATION (t
);
12853 if (STATEMENT_CODE_P (TREE_CODE (t
)))
12854 current_stmt_tree ()->stmts_are_full_exprs_p
= STMT_IS_FULL_EXPR_P (t
);
12856 switch (TREE_CODE (t
))
12858 case STATEMENT_LIST
:
12860 tree_stmt_iterator i
;
12861 for (i
= tsi_start (t
); !tsi_end_p (i
); tsi_next (&i
))
12862 RECUR (tsi_stmt (i
));
12866 case CTOR_INITIALIZER
:
12867 finish_mem_initializers (tsubst_initializer_list
12868 (TREE_OPERAND (t
, 0), args
));
12872 finish_return_stmt (RECUR (TREE_OPERAND (t
, 0)));
12876 tmp
= RECUR (EXPR_STMT_EXPR (t
));
12877 if (EXPR_STMT_STMT_EXPR_RESULT (t
))
12878 finish_stmt_expr_expr (tmp
, cur_stmt_expr
);
12880 finish_expr_stmt (tmp
);
12884 do_using_directive (USING_STMT_NAMESPACE (t
));
12889 tree decl
, pattern_decl
;
12892 pattern_decl
= decl
= DECL_EXPR_DECL (t
);
12893 if (TREE_CODE (decl
) == LABEL_DECL
)
12894 finish_label_decl (DECL_NAME (decl
));
12895 else if (TREE_CODE (decl
) == USING_DECL
)
12897 tree scope
= USING_DECL_SCOPE (decl
);
12898 tree name
= DECL_NAME (decl
);
12901 scope
= tsubst (scope
, args
, complain
, in_decl
);
12902 decl
= lookup_qualified_name (scope
, name
,
12903 /*is_type_p=*/false,
12904 /*complain=*/false);
12905 if (decl
== error_mark_node
|| TREE_CODE (decl
) == TREE_LIST
)
12906 qualified_name_lookup_error (scope
, name
, decl
, input_location
);
12908 do_local_using_decl (decl
, scope
, name
);
12912 init
= DECL_INITIAL (decl
);
12913 decl
= tsubst (decl
, args
, complain
, in_decl
);
12914 if (decl
!= error_mark_node
)
12916 /* By marking the declaration as instantiated, we avoid
12917 trying to instantiate it. Since instantiate_decl can't
12918 handle local variables, and since we've already done
12919 all that needs to be done, that's the right thing to
12921 if (TREE_CODE (decl
) == VAR_DECL
)
12922 DECL_TEMPLATE_INSTANTIATED (decl
) = 1;
12923 if (TREE_CODE (decl
) == VAR_DECL
12924 && ANON_AGGR_TYPE_P (TREE_TYPE (decl
)))
12925 /* Anonymous aggregates are a special case. */
12926 finish_anon_union (decl
);
12927 else if (is_capture_proxy (DECL_EXPR_DECL (t
)))
12929 DECL_CONTEXT (decl
) = current_function_decl
;
12930 if (DECL_NAME (decl
) == this_identifier
)
12932 tree lam
= DECL_CONTEXT (current_function_decl
);
12933 lam
= CLASSTYPE_LAMBDA_EXPR (lam
);
12934 LAMBDA_EXPR_THIS_CAPTURE (lam
) = decl
;
12936 insert_capture_proxy (decl
);
12938 else if (DECL_IMPLICIT_TYPEDEF_P (t
))
12939 /* We already did a pushtag. */;
12942 int const_init
= false;
12943 maybe_push_decl (decl
);
12944 if (TREE_CODE (decl
) == VAR_DECL
12945 && DECL_PRETTY_FUNCTION_P (decl
))
12947 /* For __PRETTY_FUNCTION__ we have to adjust the
12949 const char *const name
12950 = cxx_printable_name (current_function_decl
, 2);
12951 init
= cp_fname_init (name
, &TREE_TYPE (decl
));
12955 tree t
= RECUR (init
);
12959 /* If we had an initializer but it
12960 instantiated to nothing,
12961 value-initialize the object. This will
12962 only occur when the initializer was a
12963 pack expansion where the parameter packs
12964 used in that expansion were of length
12966 init
= build_value_init (TREE_TYPE (decl
),
12968 if (TREE_CODE (init
) == AGGR_INIT_EXPR
)
12969 init
= get_target_expr_sfinae (init
, complain
);
12975 if (TREE_CODE (decl
) == VAR_DECL
)
12976 const_init
= (DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P
12978 cp_finish_decl (decl
, init
, const_init
, NULL_TREE
, 0);
12987 stmt
= begin_for_stmt (NULL_TREE
, NULL_TREE
);
12988 RECUR (FOR_INIT_STMT (t
));
12989 finish_for_init_stmt (stmt
);
12990 tmp
= RECUR (FOR_COND (t
));
12991 finish_for_cond (tmp
, stmt
);
12992 tmp
= RECUR (FOR_EXPR (t
));
12993 finish_for_expr (tmp
, stmt
);
12994 RECUR (FOR_BODY (t
));
12995 finish_for_stmt (stmt
);
12998 case RANGE_FOR_STMT
:
13001 stmt
= begin_for_stmt (NULL_TREE
, NULL_TREE
);
13002 decl
= RANGE_FOR_DECL (t
);
13003 decl
= tsubst (decl
, args
, complain
, in_decl
);
13004 maybe_push_decl (decl
);
13005 expr
= RECUR (RANGE_FOR_EXPR (t
));
13006 stmt
= cp_convert_range_for (stmt
, decl
, expr
);
13007 RECUR (RANGE_FOR_BODY (t
));
13008 finish_for_stmt (stmt
);
13013 stmt
= begin_while_stmt ();
13014 tmp
= RECUR (WHILE_COND (t
));
13015 finish_while_stmt_cond (tmp
, stmt
);
13016 RECUR (WHILE_BODY (t
));
13017 finish_while_stmt (stmt
);
13021 stmt
= begin_do_stmt ();
13022 RECUR (DO_BODY (t
));
13023 finish_do_body (stmt
);
13024 tmp
= RECUR (DO_COND (t
));
13025 finish_do_stmt (tmp
, stmt
);
13029 stmt
= begin_if_stmt ();
13030 tmp
= RECUR (IF_COND (t
));
13031 finish_if_stmt_cond (tmp
, stmt
);
13032 RECUR (THEN_CLAUSE (t
));
13033 finish_then_clause (stmt
);
13035 if (ELSE_CLAUSE (t
))
13037 begin_else_clause (stmt
);
13038 RECUR (ELSE_CLAUSE (t
));
13039 finish_else_clause (stmt
);
13042 finish_if_stmt (stmt
);
13046 if (BIND_EXPR_BODY_BLOCK (t
))
13047 stmt
= begin_function_body ();
13049 stmt
= begin_compound_stmt (BIND_EXPR_TRY_BLOCK (t
)
13050 ? BCS_TRY_BLOCK
: 0);
13052 RECUR (BIND_EXPR_BODY (t
));
13054 if (BIND_EXPR_BODY_BLOCK (t
))
13055 finish_function_body (stmt
);
13057 finish_compound_stmt (stmt
);
13061 finish_break_stmt ();
13064 case CONTINUE_STMT
:
13065 finish_continue_stmt ();
13069 stmt
= begin_switch_stmt ();
13070 tmp
= RECUR (SWITCH_STMT_COND (t
));
13071 finish_switch_cond (tmp
, stmt
);
13072 RECUR (SWITCH_STMT_BODY (t
));
13073 finish_switch_stmt (stmt
);
13076 case CASE_LABEL_EXPR
:
13077 finish_case_label (EXPR_LOCATION (t
),
13078 RECUR (CASE_LOW (t
)),
13079 RECUR (CASE_HIGH (t
)));
13084 tree decl
= LABEL_EXPR_LABEL (t
);
13087 label
= finish_label_stmt (DECL_NAME (decl
));
13088 if (DECL_ATTRIBUTES (decl
) != NULL_TREE
)
13089 cplus_decl_attributes (&label
, DECL_ATTRIBUTES (decl
), 0);
13094 tmp
= GOTO_DESTINATION (t
);
13095 if (TREE_CODE (tmp
) != LABEL_DECL
)
13096 /* Computed goto's must be tsubst'd into. On the other hand,
13097 non-computed gotos must not be; the identifier in question
13098 will have no binding. */
13101 tmp
= DECL_NAME (tmp
);
13102 finish_goto_stmt (tmp
);
13106 tmp
= finish_asm_stmt
13107 (ASM_VOLATILE_P (t
),
13108 RECUR (ASM_STRING (t
)),
13109 tsubst_copy_asm_operands (ASM_OUTPUTS (t
), args
, complain
, in_decl
),
13110 tsubst_copy_asm_operands (ASM_INPUTS (t
), args
, complain
, in_decl
),
13111 tsubst_copy_asm_operands (ASM_CLOBBERS (t
), args
, complain
, in_decl
),
13112 tsubst_copy_asm_operands (ASM_LABELS (t
), args
, complain
, in_decl
));
13114 tree asm_expr
= tmp
;
13115 if (TREE_CODE (asm_expr
) == CLEANUP_POINT_EXPR
)
13116 asm_expr
= TREE_OPERAND (asm_expr
, 0);
13117 ASM_INPUT_P (asm_expr
) = ASM_INPUT_P (t
);
13124 stmt
= begin_try_block ();
13125 RECUR (TRY_STMTS (t
));
13126 finish_cleanup_try_block (stmt
);
13127 finish_cleanup (RECUR (TRY_HANDLERS (t
)), stmt
);
13131 tree compound_stmt
= NULL_TREE
;
13133 if (FN_TRY_BLOCK_P (t
))
13134 stmt
= begin_function_try_block (&compound_stmt
);
13136 stmt
= begin_try_block ();
13138 RECUR (TRY_STMTS (t
));
13140 if (FN_TRY_BLOCK_P (t
))
13141 finish_function_try_block (stmt
);
13143 finish_try_block (stmt
);
13145 RECUR (TRY_HANDLERS (t
));
13146 if (FN_TRY_BLOCK_P (t
))
13147 finish_function_handler_sequence (stmt
, compound_stmt
);
13149 finish_handler_sequence (stmt
);
13155 tree decl
= HANDLER_PARMS (t
);
13159 decl
= tsubst (decl
, args
, complain
, in_decl
);
13160 /* Prevent instantiate_decl from trying to instantiate
13161 this variable. We've already done all that needs to be
13163 if (decl
!= error_mark_node
)
13164 DECL_TEMPLATE_INSTANTIATED (decl
) = 1;
13166 stmt
= begin_handler ();
13167 finish_handler_parms (decl
, stmt
);
13168 RECUR (HANDLER_BODY (t
));
13169 finish_handler (stmt
);
13174 tmp
= tsubst (TREE_TYPE (t
), args
, complain
, NULL_TREE
);
13175 if (CLASS_TYPE_P (tmp
))
13177 /* Local classes are not independent templates; they are
13178 instantiated along with their containing function. And this
13179 way we don't have to deal with pushing out of one local class
13180 to instantiate a member of another local class. */
13182 /* Closures are handled by the LAMBDA_EXPR. */
13183 gcc_assert (!LAMBDA_TYPE_P (TREE_TYPE (t
)));
13184 complete_type (tmp
);
13185 for (fn
= TYPE_METHODS (tmp
); fn
; fn
= DECL_CHAIN (fn
))
13186 if (!DECL_ARTIFICIAL (fn
))
13187 instantiate_decl (fn
, /*defer_ok*/0, /*expl_inst_class*/false);
13191 case STATIC_ASSERT
:
13195 ++c_inhibit_evaluation_warnings
;
13197 tsubst_expr (STATIC_ASSERT_CONDITION (t
),
13200 /*integral_constant_expression_p=*/true);
13201 --c_inhibit_evaluation_warnings
;
13203 finish_static_assert (condition
,
13204 STATIC_ASSERT_MESSAGE (t
),
13205 STATIC_ASSERT_SOURCE_LOCATION (t
),
13206 /*member_p=*/false);
13211 tmp
= tsubst_omp_clauses (OMP_PARALLEL_CLAUSES (t
),
13212 args
, complain
, in_decl
);
13213 stmt
= begin_omp_parallel ();
13214 RECUR (OMP_PARALLEL_BODY (t
));
13215 OMP_PARALLEL_COMBINED (finish_omp_parallel (tmp
, stmt
))
13216 = OMP_PARALLEL_COMBINED (t
);
13220 tmp
= tsubst_omp_clauses (OMP_TASK_CLAUSES (t
),
13221 args
, complain
, in_decl
);
13222 stmt
= begin_omp_task ();
13223 RECUR (OMP_TASK_BODY (t
));
13224 finish_omp_task (tmp
, stmt
);
13229 tree clauses
, body
, pre_body
;
13230 tree declv
, initv
, condv
, incrv
;
13233 clauses
= tsubst_omp_clauses (OMP_FOR_CLAUSES (t
),
13234 args
, complain
, in_decl
);
13235 declv
= make_tree_vec (TREE_VEC_LENGTH (OMP_FOR_INIT (t
)));
13236 initv
= make_tree_vec (TREE_VEC_LENGTH (OMP_FOR_INIT (t
)));
13237 condv
= make_tree_vec (TREE_VEC_LENGTH (OMP_FOR_INIT (t
)));
13238 incrv
= make_tree_vec (TREE_VEC_LENGTH (OMP_FOR_INIT (t
)));
13240 stmt
= begin_omp_structured_block ();
13242 for (i
= 0; i
< TREE_VEC_LENGTH (OMP_FOR_INIT (t
)); i
++)
13243 tsubst_omp_for_iterator (t
, i
, declv
, initv
, condv
, incrv
,
13244 &clauses
, args
, complain
, in_decl
,
13245 integral_constant_expression_p
);
13247 pre_body
= push_stmt_list ();
13248 RECUR (OMP_FOR_PRE_BODY (t
));
13249 pre_body
= pop_stmt_list (pre_body
);
13251 body
= push_stmt_list ();
13252 RECUR (OMP_FOR_BODY (t
));
13253 body
= pop_stmt_list (body
);
13255 t
= finish_omp_for (EXPR_LOCATION (t
), declv
, initv
, condv
, incrv
,
13256 body
, pre_body
, clauses
);
13258 add_stmt (finish_omp_structured_block (stmt
));
13264 tmp
= tsubst_omp_clauses (OMP_CLAUSES (t
), args
, complain
, in_decl
);
13265 stmt
= push_stmt_list ();
13266 RECUR (OMP_BODY (t
));
13267 stmt
= pop_stmt_list (stmt
);
13270 OMP_BODY (t
) = stmt
;
13271 OMP_CLAUSES (t
) = tmp
;
13279 stmt
= push_stmt_list ();
13280 RECUR (OMP_BODY (t
));
13281 stmt
= pop_stmt_list (stmt
);
13284 OMP_BODY (t
) = stmt
;
13289 gcc_assert (OMP_ATOMIC_DEPENDENT_P (t
));
13290 if (TREE_CODE (TREE_OPERAND (t
, 1)) != MODIFY_EXPR
)
13292 tree op1
= TREE_OPERAND (t
, 1);
13293 tree rhs1
= NULL_TREE
;
13295 if (TREE_CODE (op1
) == COMPOUND_EXPR
)
13297 rhs1
= RECUR (TREE_OPERAND (op1
, 0));
13298 op1
= TREE_OPERAND (op1
, 1);
13300 lhs
= RECUR (TREE_OPERAND (op1
, 0));
13301 rhs
= RECUR (TREE_OPERAND (op1
, 1));
13302 finish_omp_atomic (OMP_ATOMIC
, TREE_CODE (op1
), lhs
, rhs
,
13303 NULL_TREE
, NULL_TREE
, rhs1
);
13307 tree op1
= TREE_OPERAND (t
, 1);
13308 tree v
= NULL_TREE
, lhs
, rhs
= NULL_TREE
, lhs1
= NULL_TREE
;
13309 tree rhs1
= NULL_TREE
;
13310 enum tree_code code
= TREE_CODE (TREE_OPERAND (op1
, 1));
13311 enum tree_code opcode
= NOP_EXPR
;
13312 if (code
== OMP_ATOMIC_READ
)
13314 v
= RECUR (TREE_OPERAND (op1
, 0));
13315 lhs
= RECUR (TREE_OPERAND (TREE_OPERAND (op1
, 1), 0));
13317 else if (code
== OMP_ATOMIC_CAPTURE_OLD
13318 || code
== OMP_ATOMIC_CAPTURE_NEW
)
13320 tree op11
= TREE_OPERAND (TREE_OPERAND (op1
, 1), 1);
13321 v
= RECUR (TREE_OPERAND (op1
, 0));
13322 lhs1
= RECUR (TREE_OPERAND (TREE_OPERAND (op1
, 1), 0));
13323 if (TREE_CODE (op11
) == COMPOUND_EXPR
)
13325 rhs1
= RECUR (TREE_OPERAND (op11
, 0));
13326 op11
= TREE_OPERAND (op11
, 1);
13328 lhs
= RECUR (TREE_OPERAND (op11
, 0));
13329 rhs
= RECUR (TREE_OPERAND (op11
, 1));
13330 opcode
= TREE_CODE (op11
);
13335 lhs
= RECUR (TREE_OPERAND (op1
, 0));
13336 rhs
= RECUR (TREE_OPERAND (op1
, 1));
13338 finish_omp_atomic (code
, opcode
, lhs
, rhs
, v
, lhs1
, rhs1
);
13342 case TRANSACTION_EXPR
:
13345 flags
|= (TRANSACTION_EXPR_OUTER (t
) ? TM_STMT_ATTR_OUTER
: 0);
13346 flags
|= (TRANSACTION_EXPR_RELAXED (t
) ? TM_STMT_ATTR_RELAXED
: 0);
13348 if (TRANSACTION_EXPR_IS_STMT (t
))
13350 tree body
= TRANSACTION_EXPR_BODY (t
);
13351 tree noex
= NULL_TREE
;
13352 if (TREE_CODE (body
) == MUST_NOT_THROW_EXPR
)
13354 noex
= MUST_NOT_THROW_COND (body
);
13355 if (noex
== NULL_TREE
)
13356 noex
= boolean_true_node
;
13357 body
= TREE_OPERAND (body
, 0);
13359 stmt
= begin_transaction_stmt (input_location
, NULL
, flags
);
13361 finish_transaction_stmt (stmt
, NULL
, flags
, RECUR (noex
));
13365 stmt
= build_transaction_expr (EXPR_LOCATION (t
),
13366 RECUR (TRANSACTION_EXPR_BODY (t
)),
13373 case MUST_NOT_THROW_EXPR
:
13374 RETURN (build_must_not_throw_expr (RECUR (TREE_OPERAND (t
, 0)),
13375 RECUR (MUST_NOT_THROW_COND (t
))));
13377 case EXPR_PACK_EXPANSION
:
13378 error ("invalid use of pack expansion expression");
13379 RETURN (error_mark_node
);
13381 case NONTYPE_ARGUMENT_PACK
:
13382 error ("use %<...%> to expand argument pack");
13383 RETURN (error_mark_node
);
13385 case COMPOUND_EXPR
:
13386 tmp
= RECUR (TREE_OPERAND (t
, 0));
13387 if (tmp
== NULL_TREE
)
13388 /* If the first operand was a statement, we're done with it. */
13389 RETURN (RECUR (TREE_OPERAND (t
, 1)));
13390 RETURN (build_x_compound_expr (EXPR_LOCATION (t
), tmp
,
13391 RECUR (TREE_OPERAND (t
, 1)),
13395 gcc_assert (!STATEMENT_CODE_P (TREE_CODE (t
)));
13397 RETURN (tsubst_copy_and_build (t
, args
, complain
, in_decl
,
13398 /*function_p=*/false,
13399 integral_constant_expression_p
));
13402 RETURN (NULL_TREE
);
13404 input_location
= loc
;
13410 /* T is a postfix-expression that is not being used in a function
13411 call. Return the substituted version of T. */
13414 tsubst_non_call_postfix_expression (tree t
, tree args
,
13415 tsubst_flags_t complain
,
13418 if (TREE_CODE (t
) == SCOPE_REF
)
13419 t
= tsubst_qualified_id (t
, args
, complain
, in_decl
,
13420 /*done=*/false, /*address_p=*/false);
13422 t
= tsubst_copy_and_build (t
, args
, complain
, in_decl
,
13423 /*function_p=*/false,
13424 /*integral_constant_expression_p=*/false);
13429 /* Like tsubst but deals with expressions and performs semantic
13430 analysis. FUNCTION_P is true if T is the "F" in "F (ARGS)". */
13433 tsubst_copy_and_build (tree t
,
13435 tsubst_flags_t complain
,
13438 bool integral_constant_expression_p
)
13440 #define RETURN(EXP) do { retval = (EXP); goto out; } while(0)
13441 #define RECUR(NODE) \
13442 tsubst_copy_and_build (NODE, args, complain, in_decl, \
13443 /*function_p=*/false, \
13444 integral_constant_expression_p)
13449 if (t
== NULL_TREE
|| t
== error_mark_node
)
13452 loc
= input_location
;
13453 if (EXPR_HAS_LOCATION (t
))
13454 input_location
= EXPR_LOCATION (t
);
13456 /* N3276 decltype magic only applies to calls at the top level or on the
13457 right side of a comma. */
13458 tsubst_flags_t decltype_flag
= (complain
& tf_decltype
);
13459 complain
&= ~tf_decltype
;
13461 switch (TREE_CODE (t
))
13465 /* Fall through. */
13466 case IDENTIFIER_NODE
:
13470 bool non_integral_constant_expression_p
;
13471 const char *error_msg
;
13473 if (IDENTIFIER_TYPENAME_P (t
))
13475 tree new_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13476 t
= mangle_conv_op_name_for_type (new_type
);
13479 /* Look up the name. */
13480 decl
= lookup_name (t
);
13482 /* By convention, expressions use ERROR_MARK_NODE to indicate
13483 failure, not NULL_TREE. */
13484 if (decl
== NULL_TREE
)
13485 decl
= error_mark_node
;
13487 decl
= finish_id_expression (t
, decl
, NULL_TREE
,
13489 integral_constant_expression_p
,
13490 /*allow_non_integral_constant_expression_p=*/(cxx_dialect
>= cxx0x
),
13491 &non_integral_constant_expression_p
,
13492 /*template_p=*/false,
13494 /*address_p=*/false,
13495 /*template_arg_p=*/false,
13500 if (!function_p
&& TREE_CODE (decl
) == IDENTIFIER_NODE
)
13502 if (complain
& tf_error
)
13503 unqualified_name_lookup_error (decl
);
13504 decl
= error_mark_node
;
13509 case TEMPLATE_ID_EXPR
:
13512 tree templ
= RECUR (TREE_OPERAND (t
, 0));
13513 tree targs
= TREE_OPERAND (t
, 1);
13516 targs
= tsubst_template_args (targs
, args
, complain
, in_decl
);
13518 if (TREE_CODE (templ
) == COMPONENT_REF
)
13520 object
= TREE_OPERAND (templ
, 0);
13521 templ
= TREE_OPERAND (templ
, 1);
13524 object
= NULL_TREE
;
13525 templ
= lookup_template_function (templ
, targs
);
13528 RETURN (build3 (COMPONENT_REF
, TREE_TYPE (templ
),
13529 object
, templ
, NULL_TREE
));
13531 RETURN (baselink_for_fns (templ
));
13536 tree r
= RECUR (TREE_OPERAND (t
, 0));
13538 if (REFERENCE_REF_P (t
))
13540 /* A type conversion to reference type will be enclosed in
13541 such an indirect ref, but the substitution of the cast
13542 will have also added such an indirect ref. */
13543 if (TREE_CODE (TREE_TYPE (r
)) == REFERENCE_TYPE
)
13544 r
= convert_from_reference (r
);
13547 r
= build_x_indirect_ref (input_location
, r
, RO_UNARY_STAR
,
13548 complain
|decltype_flag
);
13554 (tsubst (TREE_TYPE (t
), args
, complain
, in_decl
),
13555 RECUR (TREE_OPERAND (t
, 0))));
13557 case IMPLICIT_CONV_EXPR
:
13559 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13560 tree expr
= RECUR (TREE_OPERAND (t
, 0));
13561 int flags
= LOOKUP_IMPLICIT
;
13562 if (IMPLICIT_CONV_EXPR_DIRECT_INIT (t
))
13563 flags
= LOOKUP_NORMAL
;
13564 RETURN (perform_implicit_conversion_flags (type
, expr
, complain
,
13571 tsubst (TREE_TYPE (t
), args
, complain
, in_decl
),
13572 RECUR (TREE_OPERAND (t
, 0))));
13575 case REINTERPRET_CAST_EXPR
:
13576 case CONST_CAST_EXPR
:
13577 case DYNAMIC_CAST_EXPR
:
13578 case STATIC_CAST_EXPR
:
13581 tree op
, r
= NULL_TREE
;
13583 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13584 if (integral_constant_expression_p
13585 && !cast_valid_in_integral_constant_expression_p (type
))
13587 if (complain
& tf_error
)
13588 error ("a cast to a type other than an integral or "
13589 "enumeration type cannot appear in a constant-expression");
13590 RETURN (error_mark_node
);
13593 op
= RECUR (TREE_OPERAND (t
, 0));
13595 ++c_inhibit_evaluation_warnings
;
13596 switch (TREE_CODE (t
))
13599 r
= build_functional_cast (type
, op
, complain
);
13601 case REINTERPRET_CAST_EXPR
:
13602 r
= build_reinterpret_cast (type
, op
, complain
);
13604 case CONST_CAST_EXPR
:
13605 r
= build_const_cast (type
, op
, complain
);
13607 case DYNAMIC_CAST_EXPR
:
13608 r
= build_dynamic_cast (type
, op
, complain
);
13610 case STATIC_CAST_EXPR
:
13611 r
= build_static_cast (type
, op
, complain
);
13614 gcc_unreachable ();
13616 --c_inhibit_evaluation_warnings
;
13621 case POSTDECREMENT_EXPR
:
13622 case POSTINCREMENT_EXPR
:
13623 op1
= tsubst_non_call_postfix_expression (TREE_OPERAND (t
, 0),
13624 args
, complain
, in_decl
);
13625 RETURN (build_x_unary_op (input_location
, TREE_CODE (t
), op1
,
13626 complain
|decltype_flag
));
13628 case PREDECREMENT_EXPR
:
13629 case PREINCREMENT_EXPR
:
13633 case TRUTH_NOT_EXPR
:
13634 case UNARY_PLUS_EXPR
: /* Unary + */
13635 case REALPART_EXPR
:
13636 case IMAGPART_EXPR
:
13637 RETURN (build_x_unary_op (input_location
, TREE_CODE (t
),
13638 RECUR (TREE_OPERAND (t
, 0)),
13639 complain
|decltype_flag
));
13641 case FIX_TRUNC_EXPR
:
13642 RETURN (cp_build_unary_op (FIX_TRUNC_EXPR
, RECUR (TREE_OPERAND (t
, 0)),
13646 op1
= TREE_OPERAND (t
, 0);
13647 if (TREE_CODE (op1
) == LABEL_DECL
)
13648 RETURN (finish_label_address_expr (DECL_NAME (op1
),
13649 EXPR_LOCATION (op1
)));
13650 if (TREE_CODE (op1
) == SCOPE_REF
)
13651 op1
= tsubst_qualified_id (op1
, args
, complain
, in_decl
,
13652 /*done=*/true, /*address_p=*/true);
13654 op1
= tsubst_non_call_postfix_expression (op1
, args
, complain
,
13656 RETURN (build_x_unary_op (input_location
, ADDR_EXPR
, op1
,
13657 complain
|decltype_flag
));
13662 case TRUNC_DIV_EXPR
:
13663 case CEIL_DIV_EXPR
:
13664 case FLOOR_DIV_EXPR
:
13665 case ROUND_DIV_EXPR
:
13666 case EXACT_DIV_EXPR
:
13670 case TRUNC_MOD_EXPR
:
13671 case FLOOR_MOD_EXPR
:
13672 case TRUTH_ANDIF_EXPR
:
13673 case TRUTH_ORIF_EXPR
:
13674 case TRUTH_AND_EXPR
:
13675 case TRUTH_OR_EXPR
:
13693 ++c_inhibit_evaluation_warnings
;
13695 r
= build_x_binary_op
13696 (input_location
, TREE_CODE (t
),
13697 RECUR (TREE_OPERAND (t
, 0)),
13698 (TREE_NO_WARNING (TREE_OPERAND (t
, 0))
13700 : TREE_CODE (TREE_OPERAND (t
, 0))),
13701 RECUR (TREE_OPERAND (t
, 1)),
13702 (TREE_NO_WARNING (TREE_OPERAND (t
, 1))
13704 : TREE_CODE (TREE_OPERAND (t
, 1))),
13706 complain
|decltype_flag
);
13707 if (EXPR_P (r
) && TREE_NO_WARNING (t
))
13708 TREE_NO_WARNING (r
) = TREE_NO_WARNING (t
);
13710 --c_inhibit_evaluation_warnings
;
13715 case POINTER_PLUS_EXPR
:
13716 return fold_build_pointer_plus (RECUR (TREE_OPERAND (t
, 0)),
13717 RECUR (TREE_OPERAND (t
, 1)));
13720 RETURN (tsubst_qualified_id (t
, args
, complain
, in_decl
, /*done=*/true,
13721 /*address_p=*/false));
13723 op1
= tsubst_non_call_postfix_expression (TREE_OPERAND (t
, 0),
13724 args
, complain
, in_decl
);
13725 RETURN (build_x_array_ref (EXPR_LOCATION (t
), op1
,
13726 RECUR (TREE_OPERAND (t
, 1)),
13727 complain
|decltype_flag
));
13730 if (PACK_EXPANSION_P (TREE_OPERAND (t
, 0)))
13731 RETURN (tsubst_copy (t
, args
, complain
, in_decl
));
13738 op1
= TREE_OPERAND (t
, 0);
13739 if (TREE_CODE (t
) == SIZEOF_EXPR
&& SIZEOF_EXPR_TYPE_P (t
))
13740 op1
= TREE_TYPE (op1
);
13743 /* When there are no ARGS, we are trying to evaluate a
13744 non-dependent expression from the parser. Trying to do
13745 the substitutions may not work. */
13747 op1
= TREE_TYPE (op1
);
13751 ++cp_unevaluated_operand
;
13752 ++c_inhibit_evaluation_warnings
;
13754 op1
= tsubst (op1
, args
, complain
, in_decl
);
13756 op1
= tsubst_copy_and_build (op1
, args
, complain
, in_decl
,
13757 /*function_p=*/false,
13758 /*integral_constant_expression_p=*/
13760 --cp_unevaluated_operand
;
13761 --c_inhibit_evaluation_warnings
;
13764 r
= cxx_sizeof_or_alignof_type (op1
, TREE_CODE (t
),
13765 complain
& tf_error
);
13767 r
= cxx_sizeof_or_alignof_expr (op1
, TREE_CODE (t
),
13768 complain
& tf_error
);
13769 if (TREE_CODE (t
) == SIZEOF_EXPR
&& r
!= error_mark_node
)
13771 if (TREE_CODE (r
) != SIZEOF_EXPR
|| TYPE_P (op1
))
13773 if (!processing_template_decl
&& TYPE_P (op1
))
13775 r
= build_min (SIZEOF_EXPR
, size_type_node
,
13776 build1 (NOP_EXPR
, op1
, error_mark_node
));
13777 SIZEOF_EXPR_TYPE_P (r
) = 1;
13780 r
= build_min (SIZEOF_EXPR
, size_type_node
, op1
);
13781 TREE_SIDE_EFFECTS (r
) = 0;
13782 TREE_READONLY (r
) = 1;
13784 SET_EXPR_LOCATION (r
, EXPR_LOCATION (t
));
13789 case AT_ENCODE_EXPR
:
13791 op1
= TREE_OPERAND (t
, 0);
13792 ++cp_unevaluated_operand
;
13793 ++c_inhibit_evaluation_warnings
;
13794 op1
= tsubst_copy_and_build (op1
, args
, complain
, in_decl
,
13795 /*function_p=*/false,
13796 /*integral_constant_expression_p=*/false);
13797 --cp_unevaluated_operand
;
13798 --c_inhibit_evaluation_warnings
;
13799 RETURN (objc_build_encode_expr (op1
));
13802 case NOEXCEPT_EXPR
:
13803 op1
= TREE_OPERAND (t
, 0);
13804 ++cp_unevaluated_operand
;
13805 ++c_inhibit_evaluation_warnings
;
13806 op1
= tsubst_copy_and_build (op1
, args
, complain
, in_decl
,
13807 /*function_p=*/false,
13808 /*integral_constant_expression_p=*/false);
13809 --cp_unevaluated_operand
;
13810 --c_inhibit_evaluation_warnings
;
13811 RETURN (finish_noexcept_expr (op1
, complain
));
13815 tree r
= build_x_modify_expr
13816 (EXPR_LOCATION (t
),
13817 RECUR (TREE_OPERAND (t
, 0)),
13818 TREE_CODE (TREE_OPERAND (t
, 1)),
13819 RECUR (TREE_OPERAND (t
, 2)),
13820 complain
|decltype_flag
);
13821 /* TREE_NO_WARNING must be set if either the expression was
13822 parenthesized or it uses an operator such as >>= rather
13823 than plain assignment. In the former case, it was already
13824 set and must be copied. In the latter case,
13825 build_x_modify_expr sets it and it must not be reset
13827 if (TREE_NO_WARNING (t
))
13828 TREE_NO_WARNING (r
) = TREE_NO_WARNING (t
);
13833 op1
= tsubst_non_call_postfix_expression (TREE_OPERAND (t
, 0),
13834 args
, complain
, in_decl
);
13835 /* Remember that there was a reference to this entity. */
13838 RETURN (build_x_arrow (input_location
, op1
, complain
));
13842 tree placement
= RECUR (TREE_OPERAND (t
, 0));
13843 tree init
= RECUR (TREE_OPERAND (t
, 3));
13844 vec
<tree
, va_gc
> *placement_vec
;
13845 vec
<tree
, va_gc
> *init_vec
;
13848 if (placement
== NULL_TREE
)
13849 placement_vec
= NULL
;
13852 placement_vec
= make_tree_vector ();
13853 for (; placement
!= NULL_TREE
; placement
= TREE_CHAIN (placement
))
13854 vec_safe_push (placement_vec
, TREE_VALUE (placement
));
13857 /* If there was an initializer in the original tree, but it
13858 instantiated to an empty list, then we should pass a
13859 non-NULL empty vector to tell build_new that it was an
13860 empty initializer() rather than no initializer. This can
13861 only happen when the initializer is a pack expansion whose
13862 parameter packs are of length zero. */
13863 if (init
== NULL_TREE
&& TREE_OPERAND (t
, 3) == NULL_TREE
)
13867 init_vec
= make_tree_vector ();
13868 if (init
== void_zero_node
)
13869 gcc_assert (init_vec
!= NULL
);
13872 for (; init
!= NULL_TREE
; init
= TREE_CHAIN (init
))
13873 vec_safe_push (init_vec
, TREE_VALUE (init
));
13877 ret
= build_new (&placement_vec
,
13878 tsubst (TREE_OPERAND (t
, 1), args
, complain
, in_decl
),
13879 RECUR (TREE_OPERAND (t
, 2)),
13881 NEW_EXPR_USE_GLOBAL (t
),
13884 if (placement_vec
!= NULL
)
13885 release_tree_vector (placement_vec
);
13886 if (init_vec
!= NULL
)
13887 release_tree_vector (init_vec
);
13893 RETURN (delete_sanity
13894 (RECUR (TREE_OPERAND (t
, 0)),
13895 RECUR (TREE_OPERAND (t
, 1)),
13896 DELETE_EXPR_USE_VEC (t
),
13897 DELETE_EXPR_USE_GLOBAL (t
),
13900 case COMPOUND_EXPR
:
13902 tree op0
= tsubst_copy_and_build (TREE_OPERAND (t
, 0), args
,
13903 complain
& ~tf_decltype
, in_decl
,
13904 /*function_p=*/false,
13905 integral_constant_expression_p
);
13906 RETURN (build_x_compound_expr (EXPR_LOCATION (t
),
13908 RECUR (TREE_OPERAND (t
, 1)),
13909 complain
|decltype_flag
));
13915 vec
<tree
, va_gc
> *call_args
;
13916 unsigned int nargs
, i
;
13921 function
= CALL_EXPR_FN (t
);
13922 /* When we parsed the expression, we determined whether or
13923 not Koenig lookup should be performed. */
13924 koenig_p
= KOENIG_LOOKUP_P (t
);
13925 if (TREE_CODE (function
) == SCOPE_REF
)
13927 qualified_p
= true;
13928 function
= tsubst_qualified_id (function
, args
, complain
, in_decl
,
13930 /*address_p=*/false);
13932 else if (koenig_p
&& TREE_CODE (function
) == IDENTIFIER_NODE
)
13934 /* Do nothing; calling tsubst_copy_and_build on an identifier
13935 would incorrectly perform unqualified lookup again.
13937 Note that we can also have an IDENTIFIER_NODE if the earlier
13938 unqualified lookup found a member function; in that case
13939 koenig_p will be false and we do want to do the lookup
13940 again to find the instantiated member function.
13942 FIXME but doing that causes c++/15272, so we need to stop
13943 using IDENTIFIER_NODE in that situation. */
13944 qualified_p
= false;
13948 if (TREE_CODE (function
) == COMPONENT_REF
)
13950 tree op
= TREE_OPERAND (function
, 1);
13952 qualified_p
= (TREE_CODE (op
) == SCOPE_REF
13953 || (BASELINK_P (op
)
13954 && BASELINK_QUALIFIED_P (op
)));
13957 qualified_p
= false;
13959 if (TREE_CODE (function
) == ADDR_EXPR
13960 && TREE_CODE (TREE_OPERAND (function
, 0)) == FUNCTION_DECL
)
13961 /* Avoid error about taking the address of a constructor. */
13962 function
= TREE_OPERAND (function
, 0);
13964 function
= tsubst_copy_and_build (function
, args
, complain
,
13967 integral_constant_expression_p
);
13969 if (BASELINK_P (function
))
13970 qualified_p
= true;
13973 nargs
= call_expr_nargs (t
);
13974 call_args
= make_tree_vector ();
13975 for (i
= 0; i
< nargs
; ++i
)
13977 tree arg
= CALL_EXPR_ARG (t
, i
);
13979 if (!PACK_EXPANSION_P (arg
))
13980 vec_safe_push (call_args
, RECUR (CALL_EXPR_ARG (t
, i
)));
13983 /* Expand the pack expansion and push each entry onto
13985 arg
= tsubst_pack_expansion (arg
, args
, complain
, in_decl
);
13986 if (TREE_CODE (arg
) == TREE_VEC
)
13988 unsigned int len
, j
;
13990 len
= TREE_VEC_LENGTH (arg
);
13991 for (j
= 0; j
< len
; ++j
)
13993 tree value
= TREE_VEC_ELT (arg
, j
);
13994 if (value
!= NULL_TREE
)
13995 value
= convert_from_reference (value
);
13996 vec_safe_push (call_args
, value
);
14001 /* A partial substitution. Add one entry. */
14002 vec_safe_push (call_args
, arg
);
14007 /* We do not perform argument-dependent lookup if normal
14008 lookup finds a non-function, in accordance with the
14009 expected resolution of DR 218. */
14011 && ((is_overloaded_fn (function
)
14012 /* If lookup found a member function, the Koenig lookup is
14013 not appropriate, even if an unqualified-name was used
14014 to denote the function. */
14015 && !DECL_FUNCTION_MEMBER_P (get_first_fn (function
)))
14016 || TREE_CODE (function
) == IDENTIFIER_NODE
)
14017 /* Only do this when substitution turns a dependent call
14018 into a non-dependent call. */
14019 && type_dependent_expression_p_push (t
)
14020 && !any_type_dependent_arguments_p (call_args
))
14021 function
= perform_koenig_lookup (function
, call_args
, false,
14024 if (TREE_CODE (function
) == IDENTIFIER_NODE
14025 && !any_type_dependent_arguments_p (call_args
))
14027 if (koenig_p
&& (complain
& tf_warning_or_error
))
14029 /* For backwards compatibility and good diagnostics, try
14030 the unqualified lookup again if we aren't in SFINAE
14032 tree unq
= (tsubst_copy_and_build
14033 (function
, args
, complain
, in_decl
, true,
14034 integral_constant_expression_p
));
14035 if (unq
== error_mark_node
)
14036 RETURN (error_mark_node
);
14038 if (unq
!= function
)
14041 if (TREE_CODE (fn
) == INDIRECT_REF
)
14042 fn
= TREE_OPERAND (fn
, 0);
14043 if (TREE_CODE (fn
) == COMPONENT_REF
)
14044 fn
= TREE_OPERAND (fn
, 1);
14045 if (is_overloaded_fn (fn
))
14046 fn
= get_first_fn (fn
);
14047 permerror (EXPR_LOC_OR_HERE (t
),
14048 "%qD was not declared in this scope, "
14049 "and no declarations were found by "
14050 "argument-dependent lookup at the point "
14051 "of instantiation", function
);
14053 /* Can't say anything more. */;
14054 else if (DECL_CLASS_SCOPE_P (fn
))
14056 inform (EXPR_LOC_OR_HERE (t
),
14057 "declarations in dependent base %qT are "
14058 "not found by unqualified lookup",
14059 DECL_CLASS_CONTEXT (fn
));
14060 if (current_class_ptr
)
14061 inform (EXPR_LOC_OR_HERE (t
),
14062 "use %<this->%D%> instead", function
);
14064 inform (EXPR_LOC_OR_HERE (t
),
14065 "use %<%T::%D%> instead",
14066 current_class_name
, function
);
14069 inform (0, "%q+D declared here, later in the "
14070 "translation unit", fn
);
14074 if (TREE_CODE (function
) == IDENTIFIER_NODE
)
14076 if (complain
& tf_error
)
14077 unqualified_name_lookup_error (function
);
14078 release_tree_vector (call_args
);
14079 RETURN (error_mark_node
);
14083 /* Remember that there was a reference to this entity. */
14084 if (DECL_P (function
))
14085 mark_used (function
);
14087 /* Put back tf_decltype for the actual call. */
14088 complain
|= decltype_flag
;
14090 if (TREE_CODE (function
) == OFFSET_REF
)
14091 ret
= build_offset_ref_call_from_tree (function
, &call_args
,
14093 else if (TREE_CODE (function
) == COMPONENT_REF
)
14095 tree instance
= TREE_OPERAND (function
, 0);
14096 tree fn
= TREE_OPERAND (function
, 1);
14098 if (processing_template_decl
14099 && (type_dependent_expression_p (instance
)
14100 || (!BASELINK_P (fn
)
14101 && TREE_CODE (fn
) != FIELD_DECL
)
14102 || type_dependent_expression_p (fn
)
14103 || any_type_dependent_arguments_p (call_args
)))
14104 ret
= build_nt_call_vec (function
, call_args
);
14105 else if (!BASELINK_P (fn
))
14106 ret
= finish_call_expr (function
, &call_args
,
14107 /*disallow_virtual=*/false,
14108 /*koenig_p=*/false,
14111 ret
= (build_new_method_call
14113 &call_args
, NULL_TREE
,
14114 qualified_p
? LOOKUP_NONVIRTUAL
: LOOKUP_NORMAL
,
14119 ret
= finish_call_expr (function
, &call_args
,
14120 /*disallow_virtual=*/qualified_p
,
14124 release_tree_vector (call_args
);
14131 tree cond
= RECUR (TREE_OPERAND (t
, 0));
14134 if (TREE_CODE (cond
) == INTEGER_CST
)
14136 if (integer_zerop (cond
))
14138 ++c_inhibit_evaluation_warnings
;
14139 exp1
= RECUR (TREE_OPERAND (t
, 1));
14140 --c_inhibit_evaluation_warnings
;
14141 exp2
= RECUR (TREE_OPERAND (t
, 2));
14145 exp1
= RECUR (TREE_OPERAND (t
, 1));
14146 ++c_inhibit_evaluation_warnings
;
14147 exp2
= RECUR (TREE_OPERAND (t
, 2));
14148 --c_inhibit_evaluation_warnings
;
14153 exp1
= RECUR (TREE_OPERAND (t
, 1));
14154 exp2
= RECUR (TREE_OPERAND (t
, 2));
14157 RETURN (build_x_conditional_expr (EXPR_LOCATION (t
),
14158 cond
, exp1
, exp2
, complain
));
14161 case PSEUDO_DTOR_EXPR
:
14162 RETURN (finish_pseudo_destructor_expr
14163 (RECUR (TREE_OPERAND (t
, 0)),
14164 RECUR (TREE_OPERAND (t
, 1)),
14165 tsubst (TREE_OPERAND (t
, 2), args
, complain
, in_decl
)));
14169 tree purpose
, value
, chain
;
14171 if (t
== void_list_node
)
14174 if ((TREE_PURPOSE (t
) && PACK_EXPANSION_P (TREE_PURPOSE (t
)))
14175 || (TREE_VALUE (t
) && PACK_EXPANSION_P (TREE_VALUE (t
))))
14177 /* We have pack expansions, so expand those and
14178 create a new list out of it. */
14179 tree purposevec
= NULL_TREE
;
14180 tree valuevec
= NULL_TREE
;
14184 /* Expand the argument expressions. */
14185 if (TREE_PURPOSE (t
))
14186 purposevec
= tsubst_pack_expansion (TREE_PURPOSE (t
), args
,
14187 complain
, in_decl
);
14188 if (TREE_VALUE (t
))
14189 valuevec
= tsubst_pack_expansion (TREE_VALUE (t
), args
,
14190 complain
, in_decl
);
14192 /* Build the rest of the list. */
14193 chain
= TREE_CHAIN (t
);
14194 if (chain
&& chain
!= void_type_node
)
14195 chain
= RECUR (chain
);
14197 /* Determine the number of arguments. */
14198 if (purposevec
&& TREE_CODE (purposevec
) == TREE_VEC
)
14200 len
= TREE_VEC_LENGTH (purposevec
);
14201 gcc_assert (!valuevec
|| len
== TREE_VEC_LENGTH (valuevec
));
14203 else if (TREE_CODE (valuevec
) == TREE_VEC
)
14204 len
= TREE_VEC_LENGTH (valuevec
);
14207 /* Since we only performed a partial substitution into
14208 the argument pack, we only RETURN (a single list
14210 if (purposevec
== TREE_PURPOSE (t
)
14211 && valuevec
== TREE_VALUE (t
)
14212 && chain
== TREE_CHAIN (t
))
14215 RETURN (tree_cons (purposevec
, valuevec
, chain
));
14218 /* Convert the argument vectors into a TREE_LIST */
14222 /* Grab the Ith values. */
14224 purpose
= purposevec
? TREE_VEC_ELT (purposevec
, i
)
14227 = valuevec
? convert_from_reference (TREE_VEC_ELT (valuevec
, i
))
14230 /* Build the list (backwards). */
14231 chain
= tree_cons (purpose
, value
, chain
);
14237 purpose
= TREE_PURPOSE (t
);
14239 purpose
= RECUR (purpose
);
14240 value
= TREE_VALUE (t
);
14242 value
= RECUR (value
);
14243 chain
= TREE_CHAIN (t
);
14244 if (chain
&& chain
!= void_type_node
)
14245 chain
= RECUR (chain
);
14246 if (purpose
== TREE_PURPOSE (t
)
14247 && value
== TREE_VALUE (t
)
14248 && chain
== TREE_CHAIN (t
))
14250 RETURN (tree_cons (purpose
, value
, chain
));
14253 case COMPONENT_REF
:
14259 object
= tsubst_non_call_postfix_expression (TREE_OPERAND (t
, 0),
14260 args
, complain
, in_decl
);
14261 /* Remember that there was a reference to this entity. */
14262 if (DECL_P (object
))
14263 mark_used (object
);
14264 object_type
= TREE_TYPE (object
);
14266 member
= TREE_OPERAND (t
, 1);
14267 if (BASELINK_P (member
))
14268 member
= tsubst_baselink (member
,
14269 non_reference (TREE_TYPE (object
)),
14270 args
, complain
, in_decl
);
14272 member
= tsubst_copy (member
, args
, complain
, in_decl
);
14273 if (member
== error_mark_node
)
14274 RETURN (error_mark_node
);
14276 if (type_dependent_expression_p (object
))
14277 /* We can't do much here. */;
14278 else if (!CLASS_TYPE_P (object_type
))
14280 if (scalarish_type_p (object_type
))
14282 tree s
= NULL_TREE
;
14283 tree dtor
= member
;
14285 if (TREE_CODE (dtor
) == SCOPE_REF
)
14287 s
= TREE_OPERAND (dtor
, 0);
14288 dtor
= TREE_OPERAND (dtor
, 1);
14290 if (TREE_CODE (dtor
) == BIT_NOT_EXPR
)
14292 dtor
= TREE_OPERAND (dtor
, 0);
14294 RETURN (finish_pseudo_destructor_expr (object
, s
, dtor
));
14298 else if (TREE_CODE (member
) == SCOPE_REF
14299 && TREE_CODE (TREE_OPERAND (member
, 1)) == TEMPLATE_ID_EXPR
)
14301 /* Lookup the template functions now that we know what the
14303 tree scope
= TREE_OPERAND (member
, 0);
14304 tree tmpl
= TREE_OPERAND (TREE_OPERAND (member
, 1), 0);
14305 tree args
= TREE_OPERAND (TREE_OPERAND (member
, 1), 1);
14306 member
= lookup_qualified_name (scope
, tmpl
,
14307 /*is_type_p=*/false,
14308 /*complain=*/false);
14309 if (BASELINK_P (member
))
14311 BASELINK_FUNCTIONS (member
)
14312 = build_nt (TEMPLATE_ID_EXPR
, BASELINK_FUNCTIONS (member
),
14314 member
= (adjust_result_of_qualified_name_lookup
14315 (member
, BINFO_TYPE (BASELINK_BINFO (member
)),
14320 qualified_name_lookup_error (scope
, tmpl
, member
,
14322 RETURN (error_mark_node
);
14325 else if (TREE_CODE (member
) == SCOPE_REF
14326 && !CLASS_TYPE_P (TREE_OPERAND (member
, 0))
14327 && TREE_CODE (TREE_OPERAND (member
, 0)) != NAMESPACE_DECL
)
14329 if (complain
& tf_error
)
14331 if (TYPE_P (TREE_OPERAND (member
, 0)))
14332 error ("%qT is not a class or namespace",
14333 TREE_OPERAND (member
, 0));
14335 error ("%qD is not a class or namespace",
14336 TREE_OPERAND (member
, 0));
14338 RETURN (error_mark_node
);
14340 else if (TREE_CODE (member
) == FIELD_DECL
)
14341 RETURN (finish_non_static_data_member (member
, object
, NULL_TREE
));
14343 RETURN (finish_class_member_access_expr (object
, member
,
14344 /*template_p=*/false,
14349 RETURN (build_throw
14350 (RECUR (TREE_OPERAND (t
, 0))));
14354 vec
<constructor_elt
, va_gc
> *n
;
14355 constructor_elt
*ce
;
14356 unsigned HOST_WIDE_INT idx
;
14357 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
14358 bool process_index_p
;
14360 bool need_copy_p
= false;
14363 if (type
== error_mark_node
)
14364 RETURN (error_mark_node
);
14366 /* digest_init will do the wrong thing if we let it. */
14367 if (type
&& TYPE_PTRMEMFUNC_P (type
))
14370 /* We do not want to process the index of aggregate
14371 initializers as they are identifier nodes which will be
14372 looked up by digest_init. */
14373 process_index_p
= !(type
&& MAYBE_CLASS_TYPE_P (type
));
14375 n
= vec_safe_copy (CONSTRUCTOR_ELTS (t
));
14376 newlen
= vec_safe_length (n
);
14377 FOR_EACH_VEC_SAFE_ELT (n
, idx
, ce
)
14379 if (ce
->index
&& process_index_p
14380 /* An identifier index is looked up in the type
14381 being initialized, not the current scope. */
14382 && TREE_CODE (ce
->index
) != IDENTIFIER_NODE
)
14383 ce
->index
= RECUR (ce
->index
);
14385 if (PACK_EXPANSION_P (ce
->value
))
14387 /* Substitute into the pack expansion. */
14388 ce
->value
= tsubst_pack_expansion (ce
->value
, args
, complain
,
14391 if (ce
->value
== error_mark_node
14392 || PACK_EXPANSION_P (ce
->value
))
14394 else if (TREE_VEC_LENGTH (ce
->value
) == 1)
14395 /* Just move the argument into place. */
14396 ce
->value
= TREE_VEC_ELT (ce
->value
, 0);
14399 /* Update the length of the final CONSTRUCTOR
14400 arguments vector, and note that we will need to
14402 newlen
= newlen
+ TREE_VEC_LENGTH (ce
->value
) - 1;
14403 need_copy_p
= true;
14407 ce
->value
= RECUR (ce
->value
);
14412 vec
<constructor_elt
, va_gc
> *old_n
= n
;
14414 vec_alloc (n
, newlen
);
14415 FOR_EACH_VEC_ELT (*old_n
, idx
, ce
)
14417 if (TREE_CODE (ce
->value
) == TREE_VEC
)
14419 int i
, len
= TREE_VEC_LENGTH (ce
->value
);
14420 for (i
= 0; i
< len
; ++i
)
14421 CONSTRUCTOR_APPEND_ELT (n
, 0,
14422 TREE_VEC_ELT (ce
->value
, i
));
14425 CONSTRUCTOR_APPEND_ELT (n
, 0, ce
->value
);
14429 r
= build_constructor (init_list_type_node
, n
);
14430 CONSTRUCTOR_IS_DIRECT_INIT (r
) = CONSTRUCTOR_IS_DIRECT_INIT (t
);
14432 if (TREE_HAS_CONSTRUCTOR (t
))
14433 RETURN (finish_compound_literal (type
, r
, complain
));
14435 TREE_TYPE (r
) = type
;
14441 tree operand_0
= TREE_OPERAND (t
, 0);
14442 if (TYPE_P (operand_0
))
14444 operand_0
= tsubst (operand_0
, args
, complain
, in_decl
);
14445 RETURN (get_typeid (operand_0
, complain
));
14449 operand_0
= RECUR (operand_0
);
14450 RETURN (build_typeid (operand_0
, complain
));
14461 tree r
= tsubst_copy (t
, args
, complain
, in_decl
);
14463 if (TREE_CODE (TREE_TYPE (t
)) != REFERENCE_TYPE
)
14464 /* If the original type was a reference, we'll be wrapped in
14465 the appropriate INDIRECT_REF. */
14466 r
= convert_from_reference (r
);
14471 RETURN (build_x_va_arg (EXPR_LOCATION (t
),
14472 RECUR (TREE_OPERAND (t
, 0)),
14473 tsubst (TREE_TYPE (t
), args
, complain
, in_decl
)));
14475 case OFFSETOF_EXPR
:
14476 RETURN (finish_offsetof (RECUR (TREE_OPERAND (t
, 0))));
14480 tree type1
= tsubst (TRAIT_EXPR_TYPE1 (t
), args
,
14481 complain
, in_decl
);
14483 tree type2
= TRAIT_EXPR_TYPE2 (t
);
14485 type2
= tsubst (type2
, args
, complain
, in_decl
);
14487 RETURN (finish_trait_expr (TRAIT_EXPR_KIND (t
), type1
, type2
));
14492 tree old_stmt_expr
= cur_stmt_expr
;
14493 tree stmt_expr
= begin_stmt_expr ();
14495 cur_stmt_expr
= stmt_expr
;
14496 tsubst_expr (STMT_EXPR_STMT (t
), args
, complain
, in_decl
,
14497 integral_constant_expression_p
);
14498 stmt_expr
= finish_stmt_expr (stmt_expr
, false);
14499 cur_stmt_expr
= old_stmt_expr
;
14501 /* If the resulting list of expression statement is empty,
14502 fold it further into void_zero_node. */
14503 if (empty_expr_stmt_p (stmt_expr
))
14504 stmt_expr
= void_zero_node
;
14506 RETURN (stmt_expr
);
14511 tree r
= build_lambda_expr ();
14513 tree type
= tsubst (LAMBDA_EXPR_CLOSURE (t
), args
, complain
, NULL_TREE
);
14514 LAMBDA_EXPR_CLOSURE (r
) = type
;
14515 CLASSTYPE_LAMBDA_EXPR (type
) = r
;
14517 LAMBDA_EXPR_LOCATION (r
)
14518 = LAMBDA_EXPR_LOCATION (t
);
14519 LAMBDA_EXPR_DEFAULT_CAPTURE_MODE (r
)
14520 = LAMBDA_EXPR_DEFAULT_CAPTURE_MODE (t
);
14521 LAMBDA_EXPR_MUTABLE_P (r
) = LAMBDA_EXPR_MUTABLE_P (t
);
14522 LAMBDA_EXPR_DISCRIMINATOR (r
)
14523 = (LAMBDA_EXPR_DISCRIMINATOR (t
));
14524 /* For a function scope, we want to use tsubst so that we don't
14525 complain about referring to an auto function before its return
14526 type has been deduced. Otherwise, we want to use tsubst_copy so
14527 that we look up the existing field/parameter/variable rather
14528 than build a new one. */
14529 tree scope
= LAMBDA_EXPR_EXTRA_SCOPE (t
);
14530 if (scope
&& TREE_CODE (scope
) == FUNCTION_DECL
)
14531 scope
= tsubst (scope
, args
, complain
, in_decl
);
14532 else if (scope
&& TREE_CODE (scope
) == PARM_DECL
)
14534 /* Look up the parameter we want directly, as tsubst_copy
14535 doesn't do what we need. */
14536 tree fn
= tsubst (DECL_CONTEXT (scope
), args
, complain
, in_decl
);
14537 tree parm
= FUNCTION_FIRST_USER_PARM (fn
);
14538 while (DECL_PARM_INDEX (parm
) != DECL_PARM_INDEX (scope
))
14539 parm
= DECL_CHAIN (parm
);
14541 /* FIXME Work around the parm not having DECL_CONTEXT set. */
14542 if (DECL_CONTEXT (scope
) == NULL_TREE
)
14543 DECL_CONTEXT (scope
) = fn
;
14546 scope
= RECUR (scope
);
14547 LAMBDA_EXPR_EXTRA_SCOPE (r
) = scope
;
14548 LAMBDA_EXPR_RETURN_TYPE (r
)
14549 = tsubst (LAMBDA_EXPR_RETURN_TYPE (t
), args
, complain
, in_decl
);
14551 gcc_assert (LAMBDA_EXPR_THIS_CAPTURE (t
) == NULL_TREE
14552 && LAMBDA_EXPR_PENDING_PROXIES (t
) == NULL
);
14554 /* Do this again now that LAMBDA_EXPR_EXTRA_SCOPE is set. */
14555 determine_visibility (TYPE_NAME (type
));
14556 /* Now that we know visibility, instantiate the type so we have a
14557 declaration of the op() for later calls to lambda_function. */
14558 complete_type (type
);
14560 LAMBDA_EXPR_THIS_CAPTURE (r
) = NULL_TREE
;
14562 RETURN (build_lambda_object (r
));
14566 /* We can get here for a constant initializer of non-dependent type.
14567 FIXME stop folding in cp_parser_initializer_clause. */
14569 tree r
= get_target_expr_sfinae (RECUR (TARGET_EXPR_INITIAL (t
)),
14574 case TRANSACTION_EXPR
:
14575 RETURN (tsubst_expr(t
, args
, complain
, in_decl
,
14576 integral_constant_expression_p
));
14579 /* Handle Objective-C++ constructs, if appropriate. */
14582 = objcp_tsubst_copy_and_build (t
, args
, complain
,
14583 in_decl
, /*function_p=*/false);
14587 RETURN (tsubst_copy (t
, args
, complain
, in_decl
));
14593 input_location
= loc
;
14597 /* Verify that the instantiated ARGS are valid. For type arguments,
14598 make sure that the type's linkage is ok. For non-type arguments,
14599 make sure they are constants if they are integral or enumerations.
14600 Emit an error under control of COMPLAIN, and return TRUE on error. */
14603 check_instantiated_arg (tree tmpl
, tree t
, tsubst_flags_t complain
)
14605 if (dependent_template_arg_p (t
))
14607 if (ARGUMENT_PACK_P (t
))
14609 tree vec
= ARGUMENT_PACK_ARGS (t
);
14610 int len
= TREE_VEC_LENGTH (vec
);
14611 bool result
= false;
14614 for (i
= 0; i
< len
; ++i
)
14615 if (check_instantiated_arg (tmpl
, TREE_VEC_ELT (vec
, i
), complain
))
14619 else if (TYPE_P (t
))
14621 /* [basic.link]: A name with no linkage (notably, the name
14622 of a class or enumeration declared in a local scope)
14623 shall not be used to declare an entity with linkage.
14624 This implies that names with no linkage cannot be used as
14627 DR 757 relaxes this restriction for C++0x. */
14628 tree nt
= (cxx_dialect
> cxx98
? NULL_TREE
14629 : no_linkage_check (t
, /*relaxed_p=*/false));
14633 /* DR 488 makes use of a type with no linkage cause
14634 type deduction to fail. */
14635 if (complain
& tf_error
)
14637 if (TYPE_ANONYMOUS_P (nt
))
14638 error ("%qT is/uses anonymous type", t
);
14640 error ("template argument for %qD uses local type %qT",
14645 /* In order to avoid all sorts of complications, we do not
14646 allow variably-modified types as template arguments. */
14647 else if (variably_modified_type_p (t
, NULL_TREE
))
14649 if (complain
& tf_error
)
14650 error ("%qT is a variably modified type", t
);
14654 /* Class template and alias template arguments should be OK. */
14655 else if (DECL_TYPE_TEMPLATE_P (t
))
14657 /* A non-type argument of integral or enumerated type must be a
14659 else if (TREE_TYPE (t
)
14660 && INTEGRAL_OR_ENUMERATION_TYPE_P (TREE_TYPE (t
))
14661 && !TREE_CONSTANT (t
))
14663 if (complain
& tf_error
)
14664 error ("integral expression %qE is not constant", t
);
14671 check_instantiated_args (tree tmpl
, tree args
, tsubst_flags_t complain
)
14673 int ix
, len
= DECL_NTPARMS (tmpl
);
14674 bool result
= false;
14676 for (ix
= 0; ix
!= len
; ix
++)
14678 if (check_instantiated_arg (tmpl
, TREE_VEC_ELT (args
, ix
), complain
))
14681 if (result
&& (complain
& tf_error
))
14682 error (" trying to instantiate %qD", tmpl
);
14686 /* We're out of SFINAE context now, so generate diagnostics for the access
14687 errors we saw earlier when instantiating D from TMPL and ARGS. */
14690 recheck_decl_substitution (tree d
, tree tmpl
, tree args
)
14692 tree pattern
= DECL_TEMPLATE_RESULT (tmpl
);
14693 tree type
= TREE_TYPE (pattern
);
14694 location_t loc
= input_location
;
14696 push_access_scope (d
);
14697 push_deferring_access_checks (dk_no_deferred
);
14698 input_location
= DECL_SOURCE_LOCATION (pattern
);
14699 tsubst (type
, args
, tf_warning_or_error
, d
);
14700 input_location
= loc
;
14701 pop_deferring_access_checks ();
14702 pop_access_scope (d
);
14705 /* Instantiate the indicated variable, function, or alias template TMPL with
14706 the template arguments in TARG_PTR. */
14709 instantiate_template_1 (tree tmpl
, tree orig_args
, tsubst_flags_t complain
)
14711 tree targ_ptr
= orig_args
;
14715 bool access_ok
= true;
14717 if (tmpl
== error_mark_node
)
14718 return error_mark_node
;
14720 gcc_assert (TREE_CODE (tmpl
) == TEMPLATE_DECL
);
14722 /* If this function is a clone, handle it specially. */
14723 if (DECL_CLONED_FUNCTION_P (tmpl
))
14728 /* Use DECL_ABSTRACT_ORIGIN because only FUNCTION_DECLs have
14729 DECL_CLONED_FUNCTION. */
14730 spec
= instantiate_template (DECL_ABSTRACT_ORIGIN (tmpl
),
14731 targ_ptr
, complain
);
14732 if (spec
== error_mark_node
)
14733 return error_mark_node
;
14735 /* Look for the clone. */
14736 FOR_EACH_CLONE (clone
, spec
)
14737 if (DECL_NAME (clone
) == DECL_NAME (tmpl
))
14739 /* We should always have found the clone by now. */
14740 gcc_unreachable ();
14744 /* Check to see if we already have this specialization. */
14745 gen_tmpl
= most_general_template (tmpl
);
14746 if (tmpl
!= gen_tmpl
)
14747 /* The TMPL is a partial instantiation. To get a full set of
14748 arguments we must add the arguments used to perform the
14749 partial instantiation. */
14750 targ_ptr
= add_outermost_template_args (DECL_TI_ARGS (tmpl
),
14753 /* It would be nice to avoid hashing here and then again in tsubst_decl,
14754 but it doesn't seem to be on the hot path. */
14755 spec
= retrieve_specialization (gen_tmpl
, targ_ptr
, 0);
14757 gcc_assert (tmpl
== gen_tmpl
14758 || ((fndecl
= retrieve_specialization (tmpl
, orig_args
, 0))
14760 || fndecl
== NULL_TREE
);
14762 if (spec
!= NULL_TREE
)
14764 if (FNDECL_HAS_ACCESS_ERRORS (spec
))
14766 if (complain
& tf_error
)
14767 recheck_decl_substitution (spec
, gen_tmpl
, targ_ptr
);
14768 return error_mark_node
;
14773 if (check_instantiated_args (gen_tmpl
, INNERMOST_TEMPLATE_ARGS (targ_ptr
),
14775 return error_mark_node
;
14777 /* We are building a FUNCTION_DECL, during which the access of its
14778 parameters and return types have to be checked. However this
14779 FUNCTION_DECL which is the desired context for access checking
14780 is not built yet. We solve this chicken-and-egg problem by
14781 deferring all checks until we have the FUNCTION_DECL. */
14782 push_deferring_access_checks (dk_deferred
);
14784 /* Instantiation of the function happens in the context of the function
14785 template, not the context of the overload resolution we're doing. */
14786 push_to_top_level ();
14787 struct pointer_map_t
*saved_local_specializations
= local_specializations
;
14788 local_specializations
= NULL
;
14789 /* If there are dependent arguments, e.g. because we're doing partial
14790 ordering, make sure processing_template_decl stays set. */
14791 if (uses_template_parms (targ_ptr
))
14792 ++processing_template_decl
;
14793 if (DECL_CLASS_SCOPE_P (gen_tmpl
))
14795 tree ctx
= tsubst (DECL_CONTEXT (gen_tmpl
), targ_ptr
,
14796 complain
, gen_tmpl
);
14797 push_nested_class (ctx
);
14799 /* Substitute template parameters to obtain the specialization. */
14800 fndecl
= tsubst (DECL_TEMPLATE_RESULT (gen_tmpl
),
14801 targ_ptr
, complain
, gen_tmpl
);
14802 if (DECL_CLASS_SCOPE_P (gen_tmpl
))
14803 pop_nested_class ();
14804 local_specializations
= saved_local_specializations
;
14805 pop_from_top_level ();
14807 if (fndecl
== error_mark_node
)
14809 pop_deferring_access_checks ();
14810 return error_mark_node
;
14813 /* The DECL_TI_TEMPLATE should always be the immediate parent
14814 template, not the most general template. */
14815 DECL_TI_TEMPLATE (fndecl
) = tmpl
;
14817 /* Now we know the specialization, compute access previously
14819 push_access_scope (fndecl
);
14820 if (!perform_deferred_access_checks (complain
))
14822 pop_access_scope (fndecl
);
14823 pop_deferring_access_checks ();
14825 /* If we've just instantiated the main entry point for a function,
14826 instantiate all the alternate entry points as well. We do this
14827 by cloning the instantiation of the main entry point, not by
14828 instantiating the template clones. */
14829 if (DECL_CHAIN (gen_tmpl
) && DECL_CLONED_FUNCTION_P (DECL_CHAIN (gen_tmpl
)))
14830 clone_function_decl (fndecl
, /*update_method_vec_p=*/0);
14834 if (!(complain
& tf_error
))
14836 /* Remember to reinstantiate when we're out of SFINAE so the user
14837 can see the errors. */
14838 FNDECL_HAS_ACCESS_ERRORS (fndecl
) = true;
14840 return error_mark_node
;
14845 /* Wrapper for instantiate_template_1. */
14848 instantiate_template (tree tmpl
, tree orig_args
, tsubst_flags_t complain
)
14851 timevar_push (TV_TEMPLATE_INST
);
14852 ret
= instantiate_template_1 (tmpl
, orig_args
, complain
);
14853 timevar_pop (TV_TEMPLATE_INST
);
14857 /* Instantiate the alias template TMPL with ARGS. Also push a template
14858 instantiation level, which instantiate_template doesn't do because
14859 functions and variables have sufficient context established by the
14863 instantiate_alias_template (tree tmpl
, tree args
, tsubst_flags_t complain
)
14865 struct pending_template
*old_last_pend
= last_pending_template
;
14866 struct tinst_level
*old_error_tinst
= last_error_tinst_level
;
14867 if (tmpl
== error_mark_node
|| args
== error_mark_node
)
14868 return error_mark_node
;
14869 tree tinst
= build_tree_list (tmpl
, args
);
14870 if (!push_tinst_level (tinst
))
14873 return error_mark_node
;
14877 coerce_innermost_template_parms (DECL_TEMPLATE_PARMS (tmpl
),
14878 args
, tmpl
, complain
,
14879 /*require_all_args=*/true,
14880 /*use_default_args=*/true);
14882 tree r
= instantiate_template (tmpl
, args
, complain
);
14883 pop_tinst_level ();
14884 /* We can't free this if a pending_template entry or last_error_tinst_level
14885 is pointing at it. */
14886 if (last_pending_template
== old_last_pend
14887 && last_error_tinst_level
== old_error_tinst
)
14893 /* PARM is a template parameter pack for FN. Returns true iff
14894 PARM is used in a deducible way in the argument list of FN. */
14897 pack_deducible_p (tree parm
, tree fn
)
14899 tree t
= FUNCTION_FIRST_USER_PARMTYPE (fn
);
14900 for (; t
; t
= TREE_CHAIN (t
))
14902 tree type
= TREE_VALUE (t
);
14904 if (!PACK_EXPANSION_P (type
))
14906 for (packs
= PACK_EXPANSION_PARAMETER_PACKS (type
);
14907 packs
; packs
= TREE_CHAIN (packs
))
14908 if (TREE_VALUE (packs
) == parm
)
14910 /* The template parameter pack is used in a function parameter
14911 pack. If this is the end of the parameter list, the
14912 template parameter pack is deducible. */
14913 if (TREE_CHAIN (t
) == void_list_node
)
14916 /* Otherwise, not. Well, it could be deduced from
14917 a non-pack parameter, but doing so would end up with
14918 a deduction mismatch, so don't bother. */
14922 /* The template parameter pack isn't used in any function parameter
14923 packs, but it might be used deeper, e.g. tuple<Args...>. */
14927 /* The FN is a TEMPLATE_DECL for a function. ARGS is an array with
14928 NARGS elements of the arguments that are being used when calling
14929 it. TARGS is a vector into which the deduced template arguments
14932 Return zero for success, 2 for an incomplete match that doesn't resolve
14933 all the types, and 1 for complete failure. An error message will be
14934 printed only for an incomplete match.
14936 If FN is a conversion operator, or we are trying to produce a specific
14937 specialization, RETURN_TYPE is the return type desired.
14939 The EXPLICIT_TARGS are explicit template arguments provided via a
14942 The parameter STRICT is one of:
14945 We are deducing arguments for a function call, as in
14946 [temp.deduct.call].
14949 We are deducing arguments for a conversion function, as in
14950 [temp.deduct.conv].
14953 We are deducing arguments when doing an explicit instantiation
14954 as in [temp.explicit], when determining an explicit specialization
14955 as in [temp.expl.spec], or when taking the address of a function
14956 template, as in [temp.deduct.funcaddr]. */
14959 fn_type_unification (tree fn
,
14960 tree explicit_targs
,
14963 unsigned int nargs
,
14965 unification_kind_t strict
,
14971 tree decl
= NULL_TREE
;
14972 tsubst_flags_t complain
= (explain_p
? tf_warning_or_error
: tf_none
);
14974 static int deduction_depth
;
14975 struct pending_template
*old_last_pend
= last_pending_template
;
14976 struct tinst_level
*old_error_tinst
= last_error_tinst_level
;
14977 tree tparms
= DECL_INNERMOST_TEMPLATE_PARMS (fn
);
14979 tree r
= error_mark_node
;
14981 /* In C++0x, it's possible to have a function template whose type depends
14982 on itself recursively. This is most obvious with decltype, but can also
14983 occur with enumeration scope (c++/48969). So we need to catch infinite
14984 recursion and reject the substitution at deduction time; this function
14985 will return error_mark_node for any repeated substitution.
14987 This also catches excessive recursion such as when f<N> depends on
14988 f<N-1> across all integers, and returns error_mark_node for all the
14989 substitutions back up to the initial one.
14991 This is, of course, not reentrant. */
14992 if (excessive_deduction_depth
)
14993 return error_mark_node
;
14994 tinst
= build_tree_list (fn
, NULL_TREE
);
14997 gcc_assert (TREE_CODE (fn
) == TEMPLATE_DECL
);
14999 fntype
= TREE_TYPE (fn
);
15000 if (explicit_targs
)
15004 The specified template arguments must match the template
15005 parameters in kind (i.e., type, nontype, template), and there
15006 must not be more arguments than there are parameters;
15007 otherwise type deduction fails.
15009 Nontype arguments must match the types of the corresponding
15010 nontype template parameters, or must be convertible to the
15011 types of the corresponding nontype parameters as specified in
15012 _temp.arg.nontype_, otherwise type deduction fails.
15014 All references in the function type of the function template
15015 to the corresponding template parameters are replaced by the
15016 specified template argument values. If a substitution in a
15017 template parameter or in the function type of the function
15018 template results in an invalid type, type deduction fails. */
15019 int i
, len
= TREE_VEC_LENGTH (tparms
);
15020 location_t loc
= input_location
;
15021 bool incomplete
= false;
15023 /* Adjust any explicit template arguments before entering the
15024 substitution context. */
15026 = (coerce_template_parms (tparms
, explicit_targs
, NULL_TREE
,
15028 /*require_all_args=*/false,
15029 /*use_default_args=*/false));
15030 if (explicit_targs
== error_mark_node
)
15033 /* Substitute the explicit args into the function type. This is
15034 necessary so that, for instance, explicitly declared function
15035 arguments can match null pointed constants. If we were given
15036 an incomplete set of explicit args, we must not do semantic
15037 processing during substitution as we could create partial
15039 for (i
= 0; i
< len
; i
++)
15041 tree parm
= TREE_VALUE (TREE_VEC_ELT (tparms
, i
));
15042 bool parameter_pack
= false;
15043 tree targ
= TREE_VEC_ELT (explicit_targs
, i
);
15045 /* Dig out the actual parm. */
15046 if (TREE_CODE (parm
) == TYPE_DECL
15047 || TREE_CODE (parm
) == TEMPLATE_DECL
)
15049 parm
= TREE_TYPE (parm
);
15050 parameter_pack
= TEMPLATE_TYPE_PARAMETER_PACK (parm
);
15052 else if (TREE_CODE (parm
) == PARM_DECL
)
15054 parm
= DECL_INITIAL (parm
);
15055 parameter_pack
= TEMPLATE_PARM_PARAMETER_PACK (parm
);
15058 if (!parameter_pack
&& targ
== NULL_TREE
)
15059 /* No explicit argument for this template parameter. */
15062 if (parameter_pack
&& pack_deducible_p (parm
, fn
))
15064 /* Mark the argument pack as "incomplete". We could
15065 still deduce more arguments during unification.
15066 We remove this mark in type_unification_real. */
15069 ARGUMENT_PACK_INCOMPLETE_P(targ
) = 1;
15070 ARGUMENT_PACK_EXPLICIT_ARGS (targ
)
15071 = ARGUMENT_PACK_ARGS (targ
);
15074 /* We have some incomplete argument packs. */
15079 TREE_VALUE (tinst
) = explicit_targs
;
15080 if (!push_tinst_level (tinst
))
15082 excessive_deduction_depth
= true;
15085 processing_template_decl
+= incomplete
;
15086 input_location
= DECL_SOURCE_LOCATION (fn
);
15087 /* Ignore any access checks; we'll see them again in
15088 instantiate_template and they might have the wrong
15089 access path at this point. */
15090 push_deferring_access_checks (dk_deferred
);
15091 fntype
= tsubst (TREE_TYPE (fn
), explicit_targs
,
15092 complain
| tf_partial
, NULL_TREE
);
15093 pop_deferring_access_checks ();
15094 input_location
= loc
;
15095 processing_template_decl
-= incomplete
;
15096 pop_tinst_level ();
15098 if (fntype
== error_mark_node
)
15101 /* Place the explicitly specified arguments in TARGS. */
15102 for (i
= NUM_TMPL_ARGS (explicit_targs
); i
--;)
15103 TREE_VEC_ELT (targs
, i
) = TREE_VEC_ELT (explicit_targs
, i
);
15106 /* Never do unification on the 'this' parameter. */
15107 parms
= skip_artificial_parms_for (fn
, TYPE_ARG_TYPES (fntype
));
15113 parms
= tree_cons (NULL_TREE
, TREE_TYPE (fntype
), parms
);
15114 new_args
= XALLOCAVEC (tree
, nargs
+ 1);
15115 new_args
[0] = return_type
;
15116 memcpy (new_args
+ 1, args
, nargs
* sizeof (tree
));
15121 /* We allow incomplete unification without an error message here
15122 because the standard doesn't seem to explicitly prohibit it. Our
15123 callers must be ready to deal with unification failures in any
15126 /* type_unification_real will pass back any access checks from default
15127 template argument substitution. */
15128 vec
<deferred_access_check
, va_gc
> *checks
;
15131 ok
= !type_unification_real (DECL_INNERMOST_TEMPLATE_PARMS (fn
),
15132 targs
, parms
, args
, nargs
, /*subr=*/0,
15133 strict
, flags
, &checks
, explain_p
);
15138 /* Now that we have bindings for all of the template arguments,
15139 ensure that the arguments deduced for the template template
15140 parameters have compatible template parameter lists. We cannot
15141 check this property before we have deduced all template
15142 arguments, because the template parameter types of a template
15143 template parameter might depend on prior template parameters
15144 deduced after the template template parameter. The following
15145 ill-formed example illustrates this issue:
15147 template<typename T, template<T> class C> void f(C<5>, T);
15149 template<int N> struct X {};
15152 f(X<5>(), 5l); // error: template argument deduction fails
15155 The template parameter list of 'C' depends on the template type
15156 parameter 'T', but 'C' is deduced to 'X' before 'T' is deduced to
15157 'long'. Thus, we can't check that 'C' cannot bind to 'X' at the
15158 time that we deduce 'C'. */
15159 if (!template_template_parm_bindings_ok_p
15160 (DECL_INNERMOST_TEMPLATE_PARMS (fn
), targs
))
15162 unify_inconsistent_template_template_parameters (explain_p
);
15166 /* All is well so far. Now, check:
15170 When all template arguments have been deduced, all uses of
15171 template parameters in nondeduced contexts are replaced with
15172 the corresponding deduced argument values. If the
15173 substitution results in an invalid type, as described above,
15174 type deduction fails. */
15175 TREE_VALUE (tinst
) = targs
;
15176 if (!push_tinst_level (tinst
))
15178 excessive_deduction_depth
= true;
15182 /* Also collect access checks from the instantiation. */
15183 reopen_deferring_access_checks (checks
);
15185 decl
= instantiate_template (fn
, targs
, complain
);
15187 checks
= get_deferred_access_checks ();
15188 pop_deferring_access_checks ();
15190 pop_tinst_level ();
15192 if (decl
== error_mark_node
)
15195 /* Now perform any access checks encountered during substitution. */
15196 push_access_scope (decl
);
15197 ok
= perform_access_checks (checks
, complain
);
15198 pop_access_scope (decl
);
15202 /* If we're looking for an exact match, check that what we got
15203 is indeed an exact match. It might not be if some template
15204 parameters are used in non-deduced contexts. But don't check
15205 for an exact match if we have dependent template arguments;
15206 in that case we're doing partial ordering, and we already know
15207 that we have two candidates that will provide the actual type. */
15208 if (strict
== DEDUCE_EXACT
&& !any_dependent_template_arguments_p (targs
))
15210 tree substed
= TREE_TYPE (decl
);
15214 = skip_artificial_parms_for (decl
, TYPE_ARG_TYPES (substed
));
15216 sarg
= tree_cons (NULL_TREE
, TREE_TYPE (substed
), sarg
);
15217 for (i
= 0; i
< nargs
&& sarg
; ++i
, sarg
= TREE_CHAIN (sarg
))
15218 if (!same_type_p (args
[i
], TREE_VALUE (sarg
)))
15220 unify_type_mismatch (explain_p
, args
[i
],
15221 TREE_VALUE (sarg
));
15230 if (excessive_deduction_depth
)
15232 if (deduction_depth
== 0)
15233 /* Reset once we're all the way out. */
15234 excessive_deduction_depth
= false;
15237 /* We can't free this if a pending_template entry or last_error_tinst_level
15238 is pointing at it. */
15239 if (last_pending_template
== old_last_pend
15240 && last_error_tinst_level
== old_error_tinst
)
15246 /* Adjust types before performing type deduction, as described in
15247 [temp.deduct.call] and [temp.deduct.conv]. The rules in these two
15248 sections are symmetric. PARM is the type of a function parameter
15249 or the return type of the conversion function. ARG is the type of
15250 the argument passed to the call, or the type of the value
15251 initialized with the result of the conversion function.
15252 ARG_EXPR is the original argument expression, which may be null. */
15255 maybe_adjust_types_for_deduction (unification_kind_t strict
,
15269 /* Swap PARM and ARG throughout the remainder of this
15270 function; the handling is precisely symmetric since PARM
15271 will initialize ARG rather than vice versa. */
15279 /* Core issue #873: Do the DR606 thing (see below) for these cases,
15280 too, but here handle it by stripping the reference from PARM
15281 rather than by adding it to ARG. */
15282 if (TREE_CODE (*parm
) == REFERENCE_TYPE
15283 && TYPE_REF_IS_RVALUE (*parm
)
15284 && TREE_CODE (TREE_TYPE (*parm
)) == TEMPLATE_TYPE_PARM
15285 && cp_type_quals (TREE_TYPE (*parm
)) == TYPE_UNQUALIFIED
15286 && TREE_CODE (*arg
) == REFERENCE_TYPE
15287 && !TYPE_REF_IS_RVALUE (*arg
))
15288 *parm
= TREE_TYPE (*parm
);
15289 /* Nothing else to do in this case. */
15293 gcc_unreachable ();
15296 if (TREE_CODE (*parm
) != REFERENCE_TYPE
)
15298 /* [temp.deduct.call]
15300 If P is not a reference type:
15302 --If A is an array type, the pointer type produced by the
15303 array-to-pointer standard conversion (_conv.array_) is
15304 used in place of A for type deduction; otherwise,
15306 --If A is a function type, the pointer type produced by
15307 the function-to-pointer standard conversion
15308 (_conv.func_) is used in place of A for type deduction;
15311 --If A is a cv-qualified type, the top level
15312 cv-qualifiers of A's type are ignored for type
15314 if (TREE_CODE (*arg
) == ARRAY_TYPE
)
15315 *arg
= build_pointer_type (TREE_TYPE (*arg
));
15316 else if (TREE_CODE (*arg
) == FUNCTION_TYPE
)
15317 *arg
= build_pointer_type (*arg
);
15319 *arg
= TYPE_MAIN_VARIANT (*arg
);
15322 /* From C++0x [14.8.2.1/3 temp.deduct.call] (after DR606), "If P is
15323 of the form T&&, where T is a template parameter, and the argument
15324 is an lvalue, T is deduced as A& */
15325 if (TREE_CODE (*parm
) == REFERENCE_TYPE
15326 && TYPE_REF_IS_RVALUE (*parm
)
15327 && TREE_CODE (TREE_TYPE (*parm
)) == TEMPLATE_TYPE_PARM
15328 && cp_type_quals (TREE_TYPE (*parm
)) == TYPE_UNQUALIFIED
15329 && (arg_expr
? real_lvalue_p (arg_expr
)
15330 /* try_one_overload doesn't provide an arg_expr, but
15331 functions are always lvalues. */
15332 : TREE_CODE (*arg
) == FUNCTION_TYPE
))
15333 *arg
= build_reference_type (*arg
);
15335 /* [temp.deduct.call]
15337 If P is a cv-qualified type, the top level cv-qualifiers
15338 of P's type are ignored for type deduction. If P is a
15339 reference type, the type referred to by P is used for
15341 *parm
= TYPE_MAIN_VARIANT (*parm
);
15342 if (TREE_CODE (*parm
) == REFERENCE_TYPE
)
15344 *parm
= TREE_TYPE (*parm
);
15345 result
|= UNIFY_ALLOW_OUTER_MORE_CV_QUAL
;
15348 /* DR 322. For conversion deduction, remove a reference type on parm
15349 too (which has been swapped into ARG). */
15350 if (strict
== DEDUCE_CONV
&& TREE_CODE (*arg
) == REFERENCE_TYPE
)
15351 *arg
= TREE_TYPE (*arg
);
15356 /* Subroutine of unify_one_argument. PARM is a function parameter of a
15357 template which does contain any deducible template parameters; check if
15358 ARG is a suitable match for it. STRICT, FLAGS and EXPLAIN_P are as in
15359 unify_one_argument. */
15362 check_non_deducible_conversion (tree parm
, tree arg
, int strict
,
15363 int flags
, bool explain_p
)
15368 type
= TREE_TYPE (arg
);
15372 if (same_type_p (parm
, type
))
15373 return unify_success (explain_p
);
15375 if (strict
== DEDUCE_CONV
)
15377 if (can_convert_arg (type
, parm
, NULL_TREE
, flags
,
15378 explain_p
? tf_warning_or_error
: tf_none
))
15379 return unify_success (explain_p
);
15381 else if (strict
!= DEDUCE_EXACT
)
15383 if (can_convert_arg (parm
, type
,
15384 TYPE_P (arg
) ? NULL_TREE
: arg
,
15385 flags
, explain_p
? tf_warning_or_error
: tf_none
))
15386 return unify_success (explain_p
);
15389 if (strict
== DEDUCE_EXACT
)
15390 return unify_type_mismatch (explain_p
, parm
, arg
);
15392 return unify_arg_conversion (explain_p
, parm
, type
, arg
);
15395 /* Subroutine of type_unification_real and unify_pack_expansion to
15396 handle unification of a single P/A pair. Parameters are as
15397 for those functions. */
15400 unify_one_argument (tree tparms
, tree targs
, tree parm
, tree arg
,
15401 int subr
, unification_kind_t strict
, int flags
,
15404 tree arg_expr
= NULL_TREE
;
15407 if (arg
== error_mark_node
|| parm
== error_mark_node
)
15408 return unify_invalid (explain_p
);
15409 if (arg
== unknown_type_node
)
15410 /* We can't deduce anything from this, but we might get all the
15411 template args from other function args. */
15412 return unify_success (explain_p
);
15414 /* FIXME uses_deducible_template_parms */
15415 if (TYPE_P (parm
) && !uses_template_parms (parm
))
15416 return check_non_deducible_conversion (parm
, arg
, strict
, flags
,
15422 arg_strict
= (UNIFY_ALLOW_OUTER_LEVEL
15423 | UNIFY_ALLOW_MORE_CV_QUAL
15424 | UNIFY_ALLOW_DERIVED
);
15428 arg_strict
= UNIFY_ALLOW_LESS_CV_QUAL
;
15432 arg_strict
= UNIFY_ALLOW_NONE
;
15436 gcc_unreachable ();
15439 /* We only do these transformations if this is the top-level
15440 parameter_type_list in a call or declaration matching; in other
15441 situations (nested function declarators, template argument lists) we
15442 won't be comparing a type to an expression, and we don't do any type
15448 gcc_assert (TREE_TYPE (arg
) != NULL_TREE
);
15449 if (type_unknown_p (arg
))
15451 /* [temp.deduct.type] A template-argument can be
15452 deduced from a pointer to function or pointer
15453 to member function argument if the set of
15454 overloaded functions does not contain function
15455 templates and at most one of a set of
15456 overloaded functions provides a unique
15459 if (resolve_overloaded_unification
15460 (tparms
, targs
, parm
, arg
, strict
,
15461 arg_strict
, explain_p
))
15462 return unify_success (explain_p
);
15463 return unify_overload_resolution_failure (explain_p
, arg
);
15467 arg
= unlowered_expr_type (arg
);
15468 if (arg
== error_mark_node
)
15469 return unify_invalid (explain_p
);
15473 maybe_adjust_types_for_deduction (strict
, &parm
, &arg
, arg_expr
);
15476 gcc_assert ((TYPE_P (parm
) || TREE_CODE (parm
) == TEMPLATE_DECL
)
15477 == (TYPE_P (arg
) || TREE_CODE (arg
) == TEMPLATE_DECL
));
15479 /* For deduction from an init-list we need the actual list. */
15480 if (arg_expr
&& BRACE_ENCLOSED_INITIALIZER_P (arg_expr
))
15482 return unify (tparms
, targs
, parm
, arg
, arg_strict
, explain_p
);
15485 /* Most parms like fn_type_unification.
15487 If SUBR is 1, we're being called recursively (to unify the
15488 arguments of a function or method parameter of a function
15491 CHECKS is a pointer to a vector of access checks encountered while
15492 substituting default template arguments. */
15495 type_unification_real (tree tparms
,
15499 unsigned int xnargs
,
15501 unification_kind_t strict
,
15503 vec
<deferred_access_check
, va_gc
> **checks
,
15508 int ntparms
= TREE_VEC_LENGTH (tparms
);
15509 int saw_undeduced
= 0;
15512 unsigned int nargs
;
15515 gcc_assert (TREE_CODE (tparms
) == TREE_VEC
);
15516 gcc_assert (xparms
== NULL_TREE
|| TREE_CODE (xparms
) == TREE_LIST
);
15517 gcc_assert (ntparms
> 0);
15519 /* Reset the number of non-defaulted template arguments contained
15521 NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
) = NULL_TREE
;
15529 while (parms
&& parms
!= void_list_node
15532 parm
= TREE_VALUE (parms
);
15534 if (TREE_CODE (parm
) == TYPE_PACK_EXPANSION
15535 && (!TREE_CHAIN (parms
) || TREE_CHAIN (parms
) == void_list_node
))
15536 /* For a function parameter pack that occurs at the end of the
15537 parameter-declaration-list, the type A of each remaining
15538 argument of the call is compared with the type P of the
15539 declarator-id of the function parameter pack. */
15542 parms
= TREE_CHAIN (parms
);
15544 if (TREE_CODE (parm
) == TYPE_PACK_EXPANSION
)
15545 /* For a function parameter pack that does not occur at the
15546 end of the parameter-declaration-list, the type of the
15547 parameter pack is a non-deduced context. */
15553 if (unify_one_argument (tparms
, targs
, parm
, arg
, subr
, strict
,
15559 && parms
!= void_list_node
15560 && TREE_CODE (TREE_VALUE (parms
)) == TYPE_PACK_EXPANSION
)
15562 /* Unify the remaining arguments with the pack expansion type. */
15564 tree parmvec
= make_tree_vec (1);
15566 /* Allocate a TREE_VEC and copy in all of the arguments */
15567 argvec
= make_tree_vec (nargs
- ia
);
15568 for (i
= 0; ia
< nargs
; ++ia
, ++i
)
15569 TREE_VEC_ELT (argvec
, i
) = args
[ia
];
15571 /* Copy the parameter into parmvec. */
15572 TREE_VEC_ELT (parmvec
, 0) = TREE_VALUE (parms
);
15573 if (unify_pack_expansion (tparms
, targs
, parmvec
, argvec
, strict
,
15574 /*subr=*/subr
, explain_p
))
15577 /* Advance to the end of the list of parameters. */
15578 parms
= TREE_CHAIN (parms
);
15581 /* Fail if we've reached the end of the parm list, and more args
15582 are present, and the parm list isn't variadic. */
15583 if (ia
< nargs
&& parms
== void_list_node
)
15584 return unify_too_many_arguments (explain_p
, nargs
, ia
);
15585 /* Fail if parms are left and they don't have default values. */
15586 if (parms
&& parms
!= void_list_node
15587 && TREE_PURPOSE (parms
) == NULL_TREE
)
15589 unsigned int count
= nargs
;
15591 while (p
&& p
!= void_list_node
)
15594 p
= TREE_CHAIN (p
);
15596 return unify_too_few_arguments (explain_p
, ia
, count
);
15601 tsubst_flags_t complain
= (explain_p
15602 ? tf_warning_or_error
15605 for (i
= 0; i
< ntparms
; i
++)
15607 tree targ
= TREE_VEC_ELT (targs
, i
);
15608 tree tparm
= TREE_VEC_ELT (tparms
, i
);
15610 /* Clear the "incomplete" flags on all argument packs now so that
15611 substituting them into later default arguments works. */
15612 if (targ
&& ARGUMENT_PACK_P (targ
))
15614 ARGUMENT_PACK_INCOMPLETE_P (targ
) = 0;
15615 ARGUMENT_PACK_EXPLICIT_ARGS (targ
) = NULL_TREE
;
15618 if (targ
|| tparm
== error_mark_node
)
15620 tparm
= TREE_VALUE (tparm
);
15622 /* If this is an undeduced nontype parameter that depends on
15623 a type parameter, try another pass; its type may have been
15624 deduced from a later argument than the one from which
15625 this parameter can be deduced. */
15626 if (TREE_CODE (tparm
) == PARM_DECL
15627 && uses_template_parms (TREE_TYPE (tparm
))
15628 && !saw_undeduced
++)
15631 /* Core issue #226 (C++0x) [temp.deduct]:
15633 If a template argument has not been deduced, its
15634 default template argument, if any, is used.
15636 When we are in C++98 mode, TREE_PURPOSE will either
15637 be NULL_TREE or ERROR_MARK_NODE, so we do not need
15638 to explicitly check cxx_dialect here. */
15639 if (TREE_PURPOSE (TREE_VEC_ELT (tparms
, i
)))
15641 tree parm
= TREE_VALUE (TREE_VEC_ELT (tparms
, i
));
15642 tree arg
= TREE_PURPOSE (TREE_VEC_ELT (tparms
, i
));
15643 reopen_deferring_access_checks (*checks
);
15644 location_t save_loc
= input_location
;
15646 input_location
= DECL_SOURCE_LOCATION (parm
);
15647 arg
= tsubst_template_arg (arg
, targs
, complain
, NULL_TREE
);
15648 arg
= convert_template_argument (parm
, arg
, targs
, complain
,
15650 input_location
= save_loc
;
15651 *checks
= get_deferred_access_checks ();
15652 pop_deferring_access_checks ();
15653 if (arg
== error_mark_node
)
15657 TREE_VEC_ELT (targs
, i
) = arg
;
15658 /* The position of the first default template argument,
15659 is also the number of non-defaulted arguments in TARGS.
15661 if (!NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
))
15662 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
, i
);
15667 /* If the type parameter is a parameter pack, then it will
15668 be deduced to an empty parameter pack. */
15669 if (template_parameter_pack_p (tparm
))
15673 if (TREE_CODE (tparm
) == TEMPLATE_PARM_INDEX
)
15675 arg
= make_node (NONTYPE_ARGUMENT_PACK
);
15676 TREE_TYPE (arg
) = TREE_TYPE (TEMPLATE_PARM_DECL (tparm
));
15677 TREE_CONSTANT (arg
) = 1;
15680 arg
= cxx_make_type (TYPE_ARGUMENT_PACK
);
15682 SET_ARGUMENT_PACK_ARGS (arg
, make_tree_vec (0));
15684 TREE_VEC_ELT (targs
, i
) = arg
;
15688 return unify_parameter_deduction_failure (explain_p
, tparm
);
15691 #ifdef ENABLE_CHECKING
15692 if (!NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
))
15693 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
, TREE_VEC_LENGTH (targs
));
15696 return unify_success (explain_p
);
15699 /* Subroutine of type_unification_real. Args are like the variables
15700 at the call site. ARG is an overloaded function (or template-id);
15701 we try deducing template args from each of the overloads, and if
15702 only one succeeds, we go with that. Modifies TARGS and returns
15703 true on success. */
15706 resolve_overloaded_unification (tree tparms
,
15710 unification_kind_t strict
,
15714 tree tempargs
= copy_node (targs
);
15716 tree goodfn
= NULL_TREE
;
15719 if (TREE_CODE (arg
) == ADDR_EXPR
)
15721 arg
= TREE_OPERAND (arg
, 0);
15727 if (TREE_CODE (arg
) == COMPONENT_REF
)
15728 /* Handle `&x' where `x' is some static or non-static member
15730 arg
= TREE_OPERAND (arg
, 1);
15732 if (TREE_CODE (arg
) == OFFSET_REF
)
15733 arg
= TREE_OPERAND (arg
, 1);
15735 /* Strip baselink information. */
15736 if (BASELINK_P (arg
))
15737 arg
= BASELINK_FUNCTIONS (arg
);
15739 if (TREE_CODE (arg
) == TEMPLATE_ID_EXPR
)
15741 /* If we got some explicit template args, we need to plug them into
15742 the affected templates before we try to unify, in case the
15743 explicit args will completely resolve the templates in question. */
15746 tree expl_subargs
= TREE_OPERAND (arg
, 1);
15747 arg
= TREE_OPERAND (arg
, 0);
15749 for (; arg
; arg
= OVL_NEXT (arg
))
15751 tree fn
= OVL_CURRENT (arg
);
15752 tree subargs
, elem
;
15754 if (TREE_CODE (fn
) != TEMPLATE_DECL
)
15757 subargs
= coerce_template_parms (DECL_INNERMOST_TEMPLATE_PARMS (fn
),
15758 expl_subargs
, NULL_TREE
, tf_none
,
15759 /*require_all_args=*/true,
15760 /*use_default_args=*/true);
15761 if (subargs
!= error_mark_node
15762 && !any_dependent_template_arguments_p (subargs
))
15764 elem
= TREE_TYPE (instantiate_template (fn
, subargs
, tf_none
));
15765 if (try_one_overload (tparms
, targs
, tempargs
, parm
,
15766 elem
, strict
, sub_strict
, addr_p
, explain_p
)
15767 && (!goodfn
|| !same_type_p (goodfn
, elem
)))
15776 /* If no templates (or more than one) are fully resolved by the
15777 explicit arguments, this template-id is a non-deduced context; it
15778 could still be OK if we deduce all template arguments for the
15779 enclosing call through other arguments. */
15783 else if (TREE_CODE (arg
) != OVERLOAD
15784 && TREE_CODE (arg
) != FUNCTION_DECL
)
15785 /* If ARG is, for example, "(0, &f)" then its type will be unknown
15786 -- but the deduction does not succeed because the expression is
15787 not just the function on its own. */
15790 for (; arg
; arg
= OVL_NEXT (arg
))
15791 if (try_one_overload (tparms
, targs
, tempargs
, parm
,
15792 TREE_TYPE (OVL_CURRENT (arg
)),
15793 strict
, sub_strict
, addr_p
, explain_p
)
15794 && (!goodfn
|| !decls_match (goodfn
, OVL_CURRENT (arg
))))
15796 goodfn
= OVL_CURRENT (arg
);
15800 /* [temp.deduct.type] A template-argument can be deduced from a pointer
15801 to function or pointer to member function argument if the set of
15802 overloaded functions does not contain function templates and at most
15803 one of a set of overloaded functions provides a unique match.
15805 So if we found multiple possibilities, we return success but don't
15806 deduce anything. */
15810 int i
= TREE_VEC_LENGTH (targs
);
15812 if (TREE_VEC_ELT (tempargs
, i
))
15813 TREE_VEC_ELT (targs
, i
) = TREE_VEC_ELT (tempargs
, i
);
15821 /* Core DR 115: In contexts where deduction is done and fails, or in
15822 contexts where deduction is not done, if a template argument list is
15823 specified and it, along with any default template arguments, identifies
15824 a single function template specialization, then the template-id is an
15825 lvalue for the function template specialization. */
15828 resolve_nondeduced_context (tree orig_expr
)
15830 tree expr
, offset
, baselink
;
15833 if (!type_unknown_p (orig_expr
))
15838 offset
= NULL_TREE
;
15839 baselink
= NULL_TREE
;
15841 if (TREE_CODE (expr
) == ADDR_EXPR
)
15843 expr
= TREE_OPERAND (expr
, 0);
15846 if (TREE_CODE (expr
) == OFFSET_REF
)
15849 expr
= TREE_OPERAND (expr
, 1);
15851 if (BASELINK_P (expr
))
15854 expr
= BASELINK_FUNCTIONS (expr
);
15857 if (TREE_CODE (expr
) == TEMPLATE_ID_EXPR
)
15860 tree goodfn
= NULL_TREE
;
15862 /* If we got some explicit template args, we need to plug them into
15863 the affected templates before we try to unify, in case the
15864 explicit args will completely resolve the templates in question. */
15866 tree expl_subargs
= TREE_OPERAND (expr
, 1);
15867 tree arg
= TREE_OPERAND (expr
, 0);
15868 tree badfn
= NULL_TREE
;
15869 tree badargs
= NULL_TREE
;
15871 for (; arg
; arg
= OVL_NEXT (arg
))
15873 tree fn
= OVL_CURRENT (arg
);
15874 tree subargs
, elem
;
15876 if (TREE_CODE (fn
) != TEMPLATE_DECL
)
15879 subargs
= coerce_template_parms (DECL_INNERMOST_TEMPLATE_PARMS (fn
),
15880 expl_subargs
, NULL_TREE
, tf_none
,
15881 /*require_all_args=*/true,
15882 /*use_default_args=*/true);
15883 if (subargs
!= error_mark_node
15884 && !any_dependent_template_arguments_p (subargs
))
15886 elem
= instantiate_template (fn
, subargs
, tf_none
);
15887 if (elem
== error_mark_node
)
15892 else if (elem
&& (!goodfn
|| !decls_match (goodfn
, elem
)))
15901 mark_used (goodfn
);
15904 expr
= build_baselink (BASELINK_BINFO (baselink
),
15905 BASELINK_ACCESS_BINFO (baselink
),
15906 expr
, BASELINK_OPTYPE (baselink
));
15910 = TYPE_MAIN_VARIANT (TREE_TYPE (TREE_OPERAND (offset
, 0)));
15911 expr
= build_offset_ref (base
, expr
, addr
, tf_warning_or_error
);
15914 expr
= cp_build_addr_expr (expr
, tf_warning_or_error
);
15917 else if (good
== 0 && badargs
)
15918 /* There were no good options and at least one bad one, so let the
15919 user know what the problem is. */
15920 instantiate_template (badfn
, badargs
, tf_warning_or_error
);
15925 /* Subroutine of resolve_overloaded_unification; does deduction for a single
15926 overload. Fills TARGS with any deduced arguments, or error_mark_node if
15927 different overloads deduce different arguments for a given parm.
15928 ADDR_P is true if the expression for which deduction is being
15929 performed was of the form "& fn" rather than simply "fn".
15931 Returns 1 on success. */
15934 try_one_overload (tree tparms
,
15939 unification_kind_t strict
,
15948 if (arg
== error_mark_node
)
15951 /* [temp.deduct.type] A template-argument can be deduced from a pointer
15952 to function or pointer to member function argument if the set of
15953 overloaded functions does not contain function templates and at most
15954 one of a set of overloaded functions provides a unique match.
15956 So if this is a template, just return success. */
15958 if (uses_template_parms (arg
))
15961 if (TREE_CODE (arg
) == METHOD_TYPE
)
15962 arg
= build_ptrmemfunc_type (build_pointer_type (arg
));
15964 arg
= build_pointer_type (arg
);
15966 sub_strict
|= maybe_adjust_types_for_deduction (strict
, &parm
, &arg
, NULL
);
15968 /* We don't copy orig_targs for this because if we have already deduced
15969 some template args from previous args, unify would complain when we
15970 try to deduce a template parameter for the same argument, even though
15971 there isn't really a conflict. */
15972 nargs
= TREE_VEC_LENGTH (targs
);
15973 tempargs
= make_tree_vec (nargs
);
15975 if (unify (tparms
, tempargs
, parm
, arg
, sub_strict
, explain_p
))
15978 /* First make sure we didn't deduce anything that conflicts with
15979 explicitly specified args. */
15980 for (i
= nargs
; i
--; )
15982 tree elt
= TREE_VEC_ELT (tempargs
, i
);
15983 tree oldelt
= TREE_VEC_ELT (orig_targs
, i
);
15987 else if (uses_template_parms (elt
))
15988 /* Since we're unifying against ourselves, we will fill in
15989 template args used in the function parm list with our own
15990 template parms. Discard them. */
15991 TREE_VEC_ELT (tempargs
, i
) = NULL_TREE
;
15992 else if (oldelt
&& !template_args_equal (oldelt
, elt
))
15996 for (i
= nargs
; i
--; )
15998 tree elt
= TREE_VEC_ELT (tempargs
, i
);
16001 TREE_VEC_ELT (targs
, i
) = elt
;
16007 /* PARM is a template class (perhaps with unbound template
16008 parameters). ARG is a fully instantiated type. If ARG can be
16009 bound to PARM, return ARG, otherwise return NULL_TREE. TPARMS and
16010 TARGS are as for unify. */
16013 try_class_unification (tree tparms
, tree targs
, tree parm
, tree arg
,
16016 tree copy_of_targs
;
16018 if (!CLASSTYPE_TEMPLATE_INFO (arg
)
16019 || (most_general_template (CLASSTYPE_TI_TEMPLATE (arg
))
16020 != most_general_template (CLASSTYPE_TI_TEMPLATE (parm
))))
16023 /* We need to make a new template argument vector for the call to
16024 unify. If we used TARGS, we'd clutter it up with the result of
16025 the attempted unification, even if this class didn't work out.
16026 We also don't want to commit ourselves to all the unifications
16027 we've already done, since unification is supposed to be done on
16028 an argument-by-argument basis. In other words, consider the
16029 following pathological case:
16031 template <int I, int J, int K>
16034 template <int I, int J>
16035 struct S<I, J, 2> : public S<I, I, I>, S<J, J, J> {};
16037 template <int I, int J, int K>
16038 void f(S<I, J, K>, S<I, I, I>);
16047 Now, by the time we consider the unification involving `s2', we
16048 already know that we must have `f<0, 0, 0>'. But, even though
16049 `S<0, 1, 2>' is derived from `S<0, 0, 0>', the code is invalid
16050 because there are two ways to unify base classes of S<0, 1, 2>
16051 with S<I, I, I>. If we kept the already deduced knowledge, we
16052 would reject the possibility I=1. */
16053 copy_of_targs
= make_tree_vec (TREE_VEC_LENGTH (targs
));
16055 /* If unification failed, we're done. */
16056 if (unify (tparms
, copy_of_targs
, CLASSTYPE_TI_ARGS (parm
),
16057 CLASSTYPE_TI_ARGS (arg
), UNIFY_ALLOW_NONE
, explain_p
))
16063 /* Given a template type PARM and a class type ARG, find the unique
16064 base type in ARG that is an instance of PARM. We do not examine
16065 ARG itself; only its base-classes. If there is not exactly one
16066 appropriate base class, return NULL_TREE. PARM may be the type of
16067 a partial specialization, as well as a plain template type. Used
16070 static enum template_base_result
16071 get_template_base (tree tparms
, tree targs
, tree parm
, tree arg
,
16072 bool explain_p
, tree
*result
)
16074 tree rval
= NULL_TREE
;
16077 gcc_assert (RECORD_OR_UNION_CODE_P (TREE_CODE (arg
)));
16079 binfo
= TYPE_BINFO (complete_type (arg
));
16082 /* The type could not be completed. */
16083 *result
= NULL_TREE
;
16084 return tbr_incomplete_type
;
16087 /* Walk in inheritance graph order. The search order is not
16088 important, and this avoids multiple walks of virtual bases. */
16089 for (binfo
= TREE_CHAIN (binfo
); binfo
; binfo
= TREE_CHAIN (binfo
))
16091 tree r
= try_class_unification (tparms
, targs
, parm
,
16092 BINFO_TYPE (binfo
), explain_p
);
16096 /* If there is more than one satisfactory baseclass, then:
16100 If they yield more than one possible deduced A, the type
16104 if (rval
&& !same_type_p (r
, rval
))
16106 *result
= NULL_TREE
;
16107 return tbr_ambiguous_baseclass
;
16115 return tbr_success
;
16118 /* Returns the level of DECL, which declares a template parameter. */
16121 template_decl_level (tree decl
)
16123 switch (TREE_CODE (decl
))
16126 case TEMPLATE_DECL
:
16127 return TEMPLATE_TYPE_LEVEL (TREE_TYPE (decl
));
16130 return TEMPLATE_PARM_LEVEL (DECL_INITIAL (decl
));
16133 gcc_unreachable ();
16138 /* Decide whether ARG can be unified with PARM, considering only the
16139 cv-qualifiers of each type, given STRICT as documented for unify.
16140 Returns nonzero iff the unification is OK on that basis. */
16143 check_cv_quals_for_unify (int strict
, tree arg
, tree parm
)
16145 int arg_quals
= cp_type_quals (arg
);
16146 int parm_quals
= cp_type_quals (parm
);
16148 if (TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
16149 && !(strict
& UNIFY_ALLOW_OUTER_MORE_CV_QUAL
))
16151 /* Although a CVR qualifier is ignored when being applied to a
16152 substituted template parameter ([8.3.2]/1 for example), that
16153 does not allow us to unify "const T" with "int&" because both
16154 types are not of the form "cv-list T" [14.8.2.5 temp.deduct.type].
16155 It is ok when we're allowing additional CV qualifiers
16156 at the outer level [14.8.2.1]/3,1st bullet. */
16157 if ((TREE_CODE (arg
) == REFERENCE_TYPE
16158 || TREE_CODE (arg
) == FUNCTION_TYPE
16159 || TREE_CODE (arg
) == METHOD_TYPE
)
16160 && (parm_quals
& (TYPE_QUAL_CONST
| TYPE_QUAL_VOLATILE
)))
16163 if ((!POINTER_TYPE_P (arg
) && TREE_CODE (arg
) != TEMPLATE_TYPE_PARM
)
16164 && (parm_quals
& TYPE_QUAL_RESTRICT
))
16168 if (!(strict
& (UNIFY_ALLOW_MORE_CV_QUAL
| UNIFY_ALLOW_OUTER_MORE_CV_QUAL
))
16169 && (arg_quals
& parm_quals
) != parm_quals
)
16172 if (!(strict
& (UNIFY_ALLOW_LESS_CV_QUAL
| UNIFY_ALLOW_OUTER_LESS_CV_QUAL
))
16173 && (parm_quals
& arg_quals
) != arg_quals
)
16179 /* Determines the LEVEL and INDEX for the template parameter PARM. */
16181 template_parm_level_and_index (tree parm
, int* level
, int* index
)
16183 if (TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
16184 || TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
16185 || TREE_CODE (parm
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
16187 *index
= TEMPLATE_TYPE_IDX (parm
);
16188 *level
= TEMPLATE_TYPE_LEVEL (parm
);
16192 *index
= TEMPLATE_PARM_IDX (parm
);
16193 *level
= TEMPLATE_PARM_LEVEL (parm
);
16197 #define RECUR_AND_CHECK_FAILURE(TP, TA, P, A, S, EP) \
16199 if (unify (TP, TA, P, A, S, EP)) \
16203 /* Unifies the remaining arguments in PACKED_ARGS with the pack
16204 expansion at the end of PACKED_PARMS. Returns 0 if the type
16205 deduction succeeds, 1 otherwise. STRICT is the same as in
16206 unify. CALL_ARGS_P is true iff PACKED_ARGS is actually a function
16207 call argument list. We'll need to adjust the arguments to make them
16208 types. SUBR tells us if this is from a recursive call to
16209 type_unification_real, or for comparing two template argument
16213 unify_pack_expansion (tree tparms
, tree targs
, tree packed_parms
,
16214 tree packed_args
, unification_kind_t strict
,
16215 bool subr
, bool explain_p
)
16218 = TREE_VEC_ELT (packed_parms
, TREE_VEC_LENGTH (packed_parms
) - 1);
16219 tree pattern
= PACK_EXPANSION_PATTERN (parm
);
16220 tree pack
, packs
= NULL_TREE
;
16221 int i
, start
= TREE_VEC_LENGTH (packed_parms
) - 1;
16223 packed_args
= expand_template_argument_pack (packed_args
);
16225 int len
= TREE_VEC_LENGTH (packed_args
);
16227 /* Determine the parameter packs we will be deducing from the
16228 pattern, and record their current deductions. */
16229 for (pack
= PACK_EXPANSION_PARAMETER_PACKS (parm
);
16230 pack
; pack
= TREE_CHAIN (pack
))
16232 tree parm_pack
= TREE_VALUE (pack
);
16235 /* Determine the index and level of this parameter pack. */
16236 template_parm_level_and_index (parm_pack
, &level
, &idx
);
16238 /* Keep track of the parameter packs and their corresponding
16240 packs
= tree_cons (parm_pack
, TMPL_ARG (targs
, level
, idx
), packs
);
16241 TREE_TYPE (packs
) = make_tree_vec (len
- start
);
16244 /* Loop through all of the arguments that have not yet been
16245 unified and unify each with the pattern. */
16246 for (i
= start
; i
< len
; i
++)
16249 bool any_explicit
= false;
16250 tree arg
= TREE_VEC_ELT (packed_args
, i
);
16252 /* For each parameter pack, set its TMPL_ARG to either NULL_TREE
16253 or the element of its argument pack at the current index if
16254 this argument was explicitly specified. */
16255 for (pack
= packs
; pack
; pack
= TREE_CHAIN (pack
))
16259 template_parm_level_and_index (TREE_PURPOSE (pack
), &level
, &idx
);
16262 if (TREE_VALUE (pack
)
16263 && (pargs
= ARGUMENT_PACK_EXPLICIT_ARGS (TREE_VALUE (pack
)))
16264 && (i
- start
< TREE_VEC_LENGTH (pargs
)))
16266 any_explicit
= true;
16267 arg
= TREE_VEC_ELT (pargs
, i
- start
);
16269 TMPL_ARG (targs
, level
, idx
) = arg
;
16272 /* If we had explicit template arguments, substitute them into the
16273 pattern before deduction. */
16276 /* Some arguments might still be unspecified or dependent. */
16278 ++processing_template_decl
;
16279 dependent
= any_dependent_template_arguments_p (targs
);
16281 --processing_template_decl
;
16282 parm
= tsubst (pattern
, targs
,
16283 explain_p
? tf_warning_or_error
: tf_none
,
16286 --processing_template_decl
;
16287 if (parm
== error_mark_node
)
16293 /* Unify the pattern with the current argument. */
16294 if (unify_one_argument (tparms
, targs
, parm
, arg
, subr
, strict
,
16295 LOOKUP_IMPLICIT
, explain_p
))
16298 /* For each parameter pack, collect the deduced value. */
16299 for (pack
= packs
; pack
; pack
= TREE_CHAIN (pack
))
16302 template_parm_level_and_index (TREE_PURPOSE (pack
), &level
, &idx
);
16304 TREE_VEC_ELT (TREE_TYPE (pack
), i
- start
) =
16305 TMPL_ARG (targs
, level
, idx
);
16309 /* Verify that the results of unification with the parameter packs
16310 produce results consistent with what we've seen before, and make
16311 the deduced argument packs available. */
16312 for (pack
= packs
; pack
; pack
= TREE_CHAIN (pack
))
16314 tree old_pack
= TREE_VALUE (pack
);
16315 tree new_args
= TREE_TYPE (pack
);
16316 int i
, len
= TREE_VEC_LENGTH (new_args
);
16318 bool nondeduced_p
= false;
16320 /* By default keep the original deduced argument pack.
16321 If necessary, more specific code is going to update the
16322 resulting deduced argument later down in this function. */
16323 template_parm_level_and_index (TREE_PURPOSE (pack
), &level
, &idx
);
16324 TMPL_ARG (targs
, level
, idx
) = old_pack
;
16326 /* If NEW_ARGS contains any NULL_TREE entries, we didn't
16327 actually deduce anything. */
16328 for (i
= 0; i
< len
&& !nondeduced_p
; ++i
)
16329 if (TREE_VEC_ELT (new_args
, i
) == NULL_TREE
)
16330 nondeduced_p
= true;
16334 if (old_pack
&& ARGUMENT_PACK_INCOMPLETE_P (old_pack
))
16336 /* If we had fewer function args than explicit template args,
16337 just use the explicits. */
16338 tree explicit_args
= ARGUMENT_PACK_EXPLICIT_ARGS (old_pack
);
16339 int explicit_len
= TREE_VEC_LENGTH (explicit_args
);
16340 if (len
< explicit_len
)
16341 new_args
= explicit_args
;
16347 /* Build the deduced *_ARGUMENT_PACK. */
16348 if (TREE_CODE (TREE_PURPOSE (pack
)) == TEMPLATE_PARM_INDEX
)
16350 result
= make_node (NONTYPE_ARGUMENT_PACK
);
16351 TREE_TYPE (result
) =
16352 TREE_TYPE (TEMPLATE_PARM_DECL (TREE_PURPOSE (pack
)));
16353 TREE_CONSTANT (result
) = 1;
16356 result
= cxx_make_type (TYPE_ARGUMENT_PACK
);
16358 SET_ARGUMENT_PACK_ARGS (result
, new_args
);
16360 /* Note the deduced argument packs for this parameter
16362 TMPL_ARG (targs
, level
, idx
) = result
;
16364 else if (ARGUMENT_PACK_INCOMPLETE_P (old_pack
)
16365 && (ARGUMENT_PACK_ARGS (old_pack
)
16366 == ARGUMENT_PACK_EXPLICIT_ARGS (old_pack
)))
16368 /* We only had the explicitly-provided arguments before, but
16369 now we have a complete set of arguments. */
16370 tree explicit_args
= ARGUMENT_PACK_EXPLICIT_ARGS (old_pack
);
16372 SET_ARGUMENT_PACK_ARGS (old_pack
, new_args
);
16373 ARGUMENT_PACK_INCOMPLETE_P (old_pack
) = 1;
16374 ARGUMENT_PACK_EXPLICIT_ARGS (old_pack
) = explicit_args
;
16378 tree bad_old_arg
= NULL_TREE
, bad_new_arg
= NULL_TREE
;
16379 tree old_args
= ARGUMENT_PACK_ARGS (old_pack
);
16381 if (!comp_template_args_with_info (old_args
, new_args
,
16382 &bad_old_arg
, &bad_new_arg
))
16383 /* Inconsistent unification of this parameter pack. */
16384 return unify_parameter_pack_inconsistent (explain_p
,
16390 return unify_success (explain_p
);
16393 /* Deduce the value of template parameters. TPARMS is the (innermost)
16394 set of template parameters to a template. TARGS is the bindings
16395 for those template parameters, as determined thus far; TARGS may
16396 include template arguments for outer levels of template parameters
16397 as well. PARM is a parameter to a template function, or a
16398 subcomponent of that parameter; ARG is the corresponding argument.
16399 This function attempts to match PARM with ARG in a manner
16400 consistent with the existing assignments in TARGS. If more values
16401 are deduced, then TARGS is updated.
16403 Returns 0 if the type deduction succeeds, 1 otherwise. The
16404 parameter STRICT is a bitwise or of the following flags:
16407 Require an exact match between PARM and ARG.
16408 UNIFY_ALLOW_MORE_CV_QUAL:
16409 Allow the deduced ARG to be more cv-qualified (by qualification
16410 conversion) than ARG.
16411 UNIFY_ALLOW_LESS_CV_QUAL:
16412 Allow the deduced ARG to be less cv-qualified than ARG.
16413 UNIFY_ALLOW_DERIVED:
16414 Allow the deduced ARG to be a template base class of ARG,
16415 or a pointer to a template base class of the type pointed to by
16417 UNIFY_ALLOW_INTEGER:
16418 Allow any integral type to be deduced. See the TEMPLATE_PARM_INDEX
16419 case for more information.
16420 UNIFY_ALLOW_OUTER_LEVEL:
16421 This is the outermost level of a deduction. Used to determine validity
16422 of qualification conversions. A valid qualification conversion must
16423 have const qualified pointers leading up to the inner type which
16424 requires additional CV quals, except at the outer level, where const
16425 is not required [conv.qual]. It would be normal to set this flag in
16426 addition to setting UNIFY_ALLOW_MORE_CV_QUAL.
16427 UNIFY_ALLOW_OUTER_MORE_CV_QUAL:
16428 This is the outermost level of a deduction, and PARM can be more CV
16429 qualified at this point.
16430 UNIFY_ALLOW_OUTER_LESS_CV_QUAL:
16431 This is the outermost level of a deduction, and PARM can be less CV
16432 qualified at this point. */
16435 unify (tree tparms
, tree targs
, tree parm
, tree arg
, int strict
,
16441 int strict_in
= strict
;
16443 /* I don't think this will do the right thing with respect to types.
16444 But the only case I've seen it in so far has been array bounds, where
16445 signedness is the only information lost, and I think that will be
16447 while (TREE_CODE (parm
) == NOP_EXPR
)
16448 parm
= TREE_OPERAND (parm
, 0);
16450 if (arg
== error_mark_node
)
16451 return unify_invalid (explain_p
);
16452 if (arg
== unknown_type_node
16453 || arg
== init_list_type_node
)
16454 /* We can't deduce anything from this, but we might get all the
16455 template args from other function args. */
16456 return unify_success (explain_p
);
16458 /* If PARM uses template parameters, then we can't bail out here,
16459 even if ARG == PARM, since we won't record unifications for the
16460 template parameters. We might need them if we're trying to
16461 figure out which of two things is more specialized. */
16462 if (arg
== parm
&& !uses_template_parms (parm
))
16463 return unify_success (explain_p
);
16465 /* Handle init lists early, so the rest of the function can assume
16466 we're dealing with a type. */
16467 if (BRACE_ENCLOSED_INITIALIZER_P (arg
))
16471 tree orig_parm
= parm
;
16473 /* Replace T with std::initializer_list<T> for deduction. */
16474 if (TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
16475 && flag_deduce_init_list
)
16476 parm
= listify (parm
);
16478 if (!is_std_init_list (parm
))
16479 /* We can only deduce from an initializer list argument if the
16480 parameter is std::initializer_list; otherwise this is a
16481 non-deduced context. */
16482 return unify_success (explain_p
);
16484 elttype
= TREE_VEC_ELT (CLASSTYPE_TI_ARGS (parm
), 0);
16486 FOR_EACH_CONSTRUCTOR_VALUE (CONSTRUCTOR_ELTS (arg
), i
, elt
)
16488 int elt_strict
= strict
;
16490 if (elt
== error_mark_node
)
16491 return unify_invalid (explain_p
);
16493 if (!BRACE_ENCLOSED_INITIALIZER_P (elt
))
16495 tree type
= TREE_TYPE (elt
);
16496 /* It should only be possible to get here for a call. */
16497 gcc_assert (elt_strict
& UNIFY_ALLOW_OUTER_LEVEL
);
16498 elt_strict
|= maybe_adjust_types_for_deduction
16499 (DEDUCE_CALL
, &elttype
, &type
, elt
);
16503 RECUR_AND_CHECK_FAILURE (tparms
, targs
, elttype
, elt
, elt_strict
,
16507 /* If the std::initializer_list<T> deduction worked, replace the
16508 deduced A with std::initializer_list<A>. */
16509 if (orig_parm
!= parm
)
16511 idx
= TEMPLATE_TYPE_IDX (orig_parm
);
16512 targ
= TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
);
16513 targ
= listify (targ
);
16514 TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
) = targ
;
16516 return unify_success (explain_p
);
16519 /* Immediately reject some pairs that won't unify because of
16520 cv-qualification mismatches. */
16521 if (TREE_CODE (arg
) == TREE_CODE (parm
)
16523 /* It is the elements of the array which hold the cv quals of an array
16524 type, and the elements might be template type parms. We'll check
16525 when we recurse. */
16526 && TREE_CODE (arg
) != ARRAY_TYPE
16527 /* We check the cv-qualifiers when unifying with template type
16528 parameters below. We want to allow ARG `const T' to unify with
16529 PARM `T' for example, when computing which of two templates
16530 is more specialized, for example. */
16531 && TREE_CODE (arg
) != TEMPLATE_TYPE_PARM
16532 && !check_cv_quals_for_unify (strict_in
, arg
, parm
))
16533 return unify_cv_qual_mismatch (explain_p
, parm
, arg
);
16535 if (!(strict
& UNIFY_ALLOW_OUTER_LEVEL
)
16536 && TYPE_P (parm
) && !CP_TYPE_CONST_P (parm
))
16537 strict
&= ~UNIFY_ALLOW_MORE_CV_QUAL
;
16538 strict
&= ~UNIFY_ALLOW_OUTER_LEVEL
;
16539 strict
&= ~UNIFY_ALLOW_DERIVED
;
16540 strict
&= ~UNIFY_ALLOW_OUTER_MORE_CV_QUAL
;
16541 strict
&= ~UNIFY_ALLOW_OUTER_LESS_CV_QUAL
;
16543 switch (TREE_CODE (parm
))
16545 case TYPENAME_TYPE
:
16547 case UNBOUND_CLASS_TEMPLATE
:
16548 /* In a type which contains a nested-name-specifier, template
16549 argument values cannot be deduced for template parameters used
16550 within the nested-name-specifier. */
16551 return unify_success (explain_p
);
16553 case TEMPLATE_TYPE_PARM
:
16554 case TEMPLATE_TEMPLATE_PARM
:
16555 case BOUND_TEMPLATE_TEMPLATE_PARM
:
16556 tparm
= TREE_VALUE (TREE_VEC_ELT (tparms
, 0));
16557 if (tparm
== error_mark_node
)
16558 return unify_invalid (explain_p
);
16560 if (TEMPLATE_TYPE_LEVEL (parm
)
16561 != template_decl_level (tparm
))
16562 /* The PARM is not one we're trying to unify. Just check
16563 to see if it matches ARG. */
16565 if (TREE_CODE (arg
) == TREE_CODE (parm
)
16566 && (is_auto (parm
) ? is_auto (arg
)
16567 : same_type_p (parm
, arg
)))
16568 return unify_success (explain_p
);
16570 return unify_type_mismatch (explain_p
, parm
, arg
);
16572 idx
= TEMPLATE_TYPE_IDX (parm
);
16573 targ
= TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
);
16574 tparm
= TREE_VALUE (TREE_VEC_ELT (tparms
, idx
));
16575 if (tparm
== error_mark_node
)
16576 return unify_invalid (explain_p
);
16578 /* Check for mixed types and values. */
16579 if ((TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
16580 && TREE_CODE (tparm
) != TYPE_DECL
)
16581 || (TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
16582 && TREE_CODE (tparm
) != TEMPLATE_DECL
))
16583 gcc_unreachable ();
16585 if (TREE_CODE (parm
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
16587 /* ARG must be constructed from a template class or a template
16588 template parameter. */
16589 if (TREE_CODE (arg
) != BOUND_TEMPLATE_TEMPLATE_PARM
16590 && !CLASSTYPE_SPECIALIZATION_OF_PRIMARY_TEMPLATE_P (arg
))
16591 return unify_template_deduction_failure (explain_p
, parm
, arg
);
16594 tree parmvec
= TYPE_TI_ARGS (parm
);
16595 tree argvec
= INNERMOST_TEMPLATE_ARGS (TYPE_TI_ARGS (arg
));
16596 tree full_argvec
= add_to_template_args (targs
, argvec
);
16598 = DECL_INNERMOST_TEMPLATE_PARMS
16599 (TEMPLATE_TEMPLATE_PARM_TEMPLATE_DECL (parm
));
16601 int parm_variadic_p
= 0;
16603 /* The resolution to DR150 makes clear that default
16604 arguments for an N-argument may not be used to bind T
16605 to a template template parameter with fewer than N
16606 parameters. It is not safe to permit the binding of
16607 default arguments as an extension, as that may change
16608 the meaning of a conforming program. Consider:
16610 struct Dense { static const unsigned int dim = 1; };
16612 template <template <typename> class View,
16614 void operator+(float, View<Block> const&);
16616 template <typename Block,
16617 unsigned int Dim = Block::dim>
16618 struct Lvalue_proxy { operator float() const; };
16622 Lvalue_proxy<Dense> p;
16627 Here, if Lvalue_proxy is permitted to bind to View, then
16628 the global operator+ will be used; if they are not, the
16629 Lvalue_proxy will be converted to float. */
16630 if (coerce_template_parms (parm_parms
,
16632 TYPE_TI_TEMPLATE (parm
),
16634 ? tf_warning_or_error
16636 /*require_all_args=*/true,
16637 /*use_default_args=*/false)
16638 == error_mark_node
)
16641 /* Deduce arguments T, i from TT<T> or TT<i>.
16642 We check each element of PARMVEC and ARGVEC individually
16643 rather than the whole TREE_VEC since they can have
16644 different number of elements. */
16646 parmvec
= expand_template_argument_pack (parmvec
);
16647 argvec
= expand_template_argument_pack (argvec
);
16649 len
= TREE_VEC_LENGTH (parmvec
);
16651 /* Check if the parameters end in a pack, making them
16654 && PACK_EXPANSION_P (TREE_VEC_ELT (parmvec
, len
- 1)))
16655 parm_variadic_p
= 1;
16657 for (i
= 0; i
< len
- parm_variadic_p
; ++i
)
16658 /* If the template argument list of P contains a pack
16659 expansion that is not the last template argument, the
16660 entire template argument list is a non-deduced
16662 if (PACK_EXPANSION_P (TREE_VEC_ELT (parmvec
, i
)))
16663 return unify_success (explain_p
);
16665 if (TREE_VEC_LENGTH (argvec
) < len
- parm_variadic_p
)
16666 return unify_too_few_arguments (explain_p
,
16667 TREE_VEC_LENGTH (argvec
), len
);
16669 for (i
= 0; i
< len
- parm_variadic_p
; ++i
)
16671 RECUR_AND_CHECK_FAILURE (tparms
, targs
,
16672 TREE_VEC_ELT (parmvec
, i
),
16673 TREE_VEC_ELT (argvec
, i
),
16674 UNIFY_ALLOW_NONE
, explain_p
);
16677 if (parm_variadic_p
16678 && unify_pack_expansion (tparms
, targs
,
16681 /*subr=*/true, explain_p
))
16684 arg
= TYPE_TI_TEMPLATE (arg
);
16686 /* Fall through to deduce template name. */
16689 if (TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
16690 || TREE_CODE (parm
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
16692 /* Deduce template name TT from TT, TT<>, TT<T> and TT<i>. */
16694 /* Simple cases: Value already set, does match or doesn't. */
16695 if (targ
!= NULL_TREE
&& template_args_equal (targ
, arg
))
16696 return unify_success (explain_p
);
16698 return unify_inconsistency (explain_p
, parm
, targ
, arg
);
16702 /* If PARM is `const T' and ARG is only `int', we don't have
16703 a match unless we are allowing additional qualification.
16704 If ARG is `const int' and PARM is just `T' that's OK;
16705 that binds `const int' to `T'. */
16706 if (!check_cv_quals_for_unify (strict_in
| UNIFY_ALLOW_LESS_CV_QUAL
,
16708 return unify_cv_qual_mismatch (explain_p
, parm
, arg
);
16710 /* Consider the case where ARG is `const volatile int' and
16711 PARM is `const T'. Then, T should be `volatile int'. */
16712 arg
= cp_build_qualified_type_real
16713 (arg
, cp_type_quals (arg
) & ~cp_type_quals (parm
), tf_none
);
16714 if (arg
== error_mark_node
)
16715 return unify_invalid (explain_p
);
16717 /* Simple cases: Value already set, does match or doesn't. */
16718 if (targ
!= NULL_TREE
&& same_type_p (targ
, arg
))
16719 return unify_success (explain_p
);
16721 return unify_inconsistency (explain_p
, parm
, targ
, arg
);
16723 /* Make sure that ARG is not a variable-sized array. (Note
16724 that were talking about variable-sized arrays (like
16725 `int[n]'), rather than arrays of unknown size (like
16726 `int[]').) We'll get very confused by such a type since
16727 the bound of the array is not constant, and therefore
16728 not mangleable. Besides, such types are not allowed in
16729 ISO C++, so we can do as we please here. We do allow
16730 them for 'auto' deduction, since that isn't ABI-exposed. */
16731 if (!is_auto (parm
) && variably_modified_type_p (arg
, NULL_TREE
))
16732 return unify_vla_arg (explain_p
, arg
);
16734 /* Strip typedefs as in convert_template_argument. */
16735 arg
= canonicalize_type_argument (arg
, tf_none
);
16738 /* If ARG is a parameter pack or an expansion, we cannot unify
16739 against it unless PARM is also a parameter pack. */
16740 if ((template_parameter_pack_p (arg
) || PACK_EXPANSION_P (arg
))
16741 && !template_parameter_pack_p (parm
))
16742 return unify_parameter_pack_mismatch (explain_p
, parm
, arg
);
16744 /* If the argument deduction results is a METHOD_TYPE,
16745 then there is a problem.
16746 METHOD_TYPE doesn't map to any real C++ type the result of
16747 the deduction can not be of that type. */
16748 if (TREE_CODE (arg
) == METHOD_TYPE
)
16749 return unify_method_type_error (explain_p
, arg
);
16751 TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
) = arg
;
16752 return unify_success (explain_p
);
16754 case TEMPLATE_PARM_INDEX
:
16755 tparm
= TREE_VALUE (TREE_VEC_ELT (tparms
, 0));
16756 if (tparm
== error_mark_node
)
16757 return unify_invalid (explain_p
);
16759 if (TEMPLATE_PARM_LEVEL (parm
)
16760 != template_decl_level (tparm
))
16762 /* The PARM is not one we're trying to unify. Just check
16763 to see if it matches ARG. */
16764 int result
= !(TREE_CODE (arg
) == TREE_CODE (parm
)
16765 && cp_tree_equal (parm
, arg
));
16767 unify_expression_unequal (explain_p
, parm
, arg
);
16771 idx
= TEMPLATE_PARM_IDX (parm
);
16772 targ
= TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
);
16776 int x
= !cp_tree_equal (targ
, arg
);
16778 unify_inconsistency (explain_p
, parm
, targ
, arg
);
16782 /* [temp.deduct.type] If, in the declaration of a function template
16783 with a non-type template-parameter, the non-type
16784 template-parameter is used in an expression in the function
16785 parameter-list and, if the corresponding template-argument is
16786 deduced, the template-argument type shall match the type of the
16787 template-parameter exactly, except that a template-argument
16788 deduced from an array bound may be of any integral type.
16789 The non-type parameter might use already deduced type parameters. */
16790 tparm
= tsubst (TREE_TYPE (parm
), targs
, 0, NULL_TREE
);
16791 if (!TREE_TYPE (arg
))
16792 /* Template-parameter dependent expression. Just accept it for now.
16793 It will later be processed in convert_template_argument. */
16795 else if (same_type_p (TREE_TYPE (arg
), tparm
))
16797 else if ((strict
& UNIFY_ALLOW_INTEGER
)
16798 && (TREE_CODE (tparm
) == INTEGER_TYPE
16799 || TREE_CODE (tparm
) == BOOLEAN_TYPE
))
16800 /* Convert the ARG to the type of PARM; the deduced non-type
16801 template argument must exactly match the types of the
16802 corresponding parameter. */
16803 arg
= fold (build_nop (tparm
, arg
));
16804 else if (uses_template_parms (tparm
))
16805 /* We haven't deduced the type of this parameter yet. Try again
16807 return unify_success (explain_p
);
16809 return unify_type_mismatch (explain_p
, tparm
, arg
);
16811 /* If ARG is a parameter pack or an expansion, we cannot unify
16812 against it unless PARM is also a parameter pack. */
16813 if ((template_parameter_pack_p (arg
) || PACK_EXPANSION_P (arg
))
16814 && !TEMPLATE_PARM_PARAMETER_PACK (parm
))
16815 return unify_parameter_pack_mismatch (explain_p
, parm
, arg
);
16817 arg
= strip_typedefs_expr (arg
);
16818 TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
) = arg
;
16819 return unify_success (explain_p
);
16823 /* A pointer-to-member constant can be unified only with
16824 another constant. */
16825 if (TREE_CODE (arg
) != PTRMEM_CST
)
16826 return unify_ptrmem_cst_mismatch (explain_p
, parm
, arg
);
16828 /* Just unify the class member. It would be useless (and possibly
16829 wrong, depending on the strict flags) to unify also
16830 PTRMEM_CST_CLASS, because we want to be sure that both parm and
16831 arg refer to the same variable, even if through different
16832 classes. For instance:
16834 struct A { int x; };
16837 Unification of &A::x and &B::x must succeed. */
16838 return unify (tparms
, targs
, PTRMEM_CST_MEMBER (parm
),
16839 PTRMEM_CST_MEMBER (arg
), strict
, explain_p
);
16844 if (TREE_CODE (arg
) != POINTER_TYPE
)
16845 return unify_type_mismatch (explain_p
, parm
, arg
);
16847 /* [temp.deduct.call]
16849 A can be another pointer or pointer to member type that can
16850 be converted to the deduced A via a qualification
16851 conversion (_conv.qual_).
16853 We pass down STRICT here rather than UNIFY_ALLOW_NONE.
16854 This will allow for additional cv-qualification of the
16855 pointed-to types if appropriate. */
16857 if (TREE_CODE (TREE_TYPE (arg
)) == RECORD_TYPE
)
16858 /* The derived-to-base conversion only persists through one
16859 level of pointers. */
16860 strict
|= (strict_in
& UNIFY_ALLOW_DERIVED
);
16862 return unify (tparms
, targs
, TREE_TYPE (parm
),
16863 TREE_TYPE (arg
), strict
, explain_p
);
16866 case REFERENCE_TYPE
:
16867 if (TREE_CODE (arg
) != REFERENCE_TYPE
)
16868 return unify_type_mismatch (explain_p
, parm
, arg
);
16869 return unify (tparms
, targs
, TREE_TYPE (parm
), TREE_TYPE (arg
),
16870 strict
& UNIFY_ALLOW_MORE_CV_QUAL
, explain_p
);
16873 if (TREE_CODE (arg
) != ARRAY_TYPE
)
16874 return unify_type_mismatch (explain_p
, parm
, arg
);
16875 if ((TYPE_DOMAIN (parm
) == NULL_TREE
)
16876 != (TYPE_DOMAIN (arg
) == NULL_TREE
))
16877 return unify_type_mismatch (explain_p
, parm
, arg
);
16878 RECUR_AND_CHECK_FAILURE (tparms
, targs
, TREE_TYPE (parm
), TREE_TYPE (arg
),
16879 strict
& UNIFY_ALLOW_MORE_CV_QUAL
, explain_p
);
16880 if (TYPE_DOMAIN (parm
) != NULL_TREE
)
16887 /* Our representation of array types uses "N - 1" as the
16888 TYPE_MAX_VALUE for an array with "N" elements, if "N" is
16889 not an integer constant. We cannot unify arbitrarily
16890 complex expressions, so we eliminate the MINUS_EXPRs
16892 parm_max
= TYPE_MAX_VALUE (TYPE_DOMAIN (parm
));
16893 parm_cst
= TREE_CODE (parm_max
) == INTEGER_CST
;
16896 gcc_assert (TREE_CODE (parm_max
) == MINUS_EXPR
);
16897 parm_max
= TREE_OPERAND (parm_max
, 0);
16899 arg_max
= TYPE_MAX_VALUE (TYPE_DOMAIN (arg
));
16900 arg_cst
= TREE_CODE (arg_max
) == INTEGER_CST
;
16903 /* The ARG_MAX may not be a simple MINUS_EXPR, if we are
16904 trying to unify the type of a variable with the type
16905 of a template parameter. For example:
16907 template <unsigned int N>
16908 void f (char (&) [N]);
16915 Here, the type of the ARG will be "int [g(i)]", and
16916 may be a SAVE_EXPR, etc. */
16917 if (TREE_CODE (arg_max
) != MINUS_EXPR
)
16918 return unify_vla_arg (explain_p
, arg
);
16919 arg_max
= TREE_OPERAND (arg_max
, 0);
16922 /* If only one of the bounds used a MINUS_EXPR, compensate
16923 by adding one to the other bound. */
16924 if (parm_cst
&& !arg_cst
)
16925 parm_max
= fold_build2_loc (input_location
, PLUS_EXPR
,
16929 else if (arg_cst
&& !parm_cst
)
16930 arg_max
= fold_build2_loc (input_location
, PLUS_EXPR
,
16935 RECUR_AND_CHECK_FAILURE (tparms
, targs
, parm_max
, arg_max
,
16936 UNIFY_ALLOW_INTEGER
, explain_p
);
16938 return unify_success (explain_p
);
16945 case ENUMERAL_TYPE
:
16948 if (TREE_CODE (arg
) != TREE_CODE (parm
))
16949 return unify_type_mismatch (explain_p
, parm
, arg
);
16951 /* We have already checked cv-qualification at the top of the
16953 if (!same_type_ignoring_top_level_qualifiers_p (arg
, parm
))
16954 return unify_type_mismatch (explain_p
, parm
, arg
);
16956 /* As far as unification is concerned, this wins. Later checks
16957 will invalidate it if necessary. */
16958 return unify_success (explain_p
);
16960 /* Types INTEGER_CST and MINUS_EXPR can come from array bounds. */
16961 /* Type INTEGER_CST can come from ordinary constant template args. */
16963 while (TREE_CODE (arg
) == NOP_EXPR
)
16964 arg
= TREE_OPERAND (arg
, 0);
16966 if (TREE_CODE (arg
) != INTEGER_CST
)
16967 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
16968 return (tree_int_cst_equal (parm
, arg
)
16969 ? unify_success (explain_p
)
16970 : unify_template_argument_mismatch (explain_p
, parm
, arg
));
16974 int i
, len
, argslen
;
16975 int parm_variadic_p
= 0;
16977 if (TREE_CODE (arg
) != TREE_VEC
)
16978 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
16980 len
= TREE_VEC_LENGTH (parm
);
16981 argslen
= TREE_VEC_LENGTH (arg
);
16983 /* Check for pack expansions in the parameters. */
16984 for (i
= 0; i
< len
; ++i
)
16986 if (PACK_EXPANSION_P (TREE_VEC_ELT (parm
, i
)))
16989 /* We can unify against something with a trailing
16991 parm_variadic_p
= 1;
16993 /* [temp.deduct.type]/9: If the template argument list of
16994 P contains a pack expansion that is not the last
16995 template argument, the entire template argument list
16996 is a non-deduced context. */
16997 return unify_success (explain_p
);
17001 /* If we don't have enough arguments to satisfy the parameters
17002 (not counting the pack expression at the end), or we have
17003 too many arguments for a parameter list that doesn't end in
17004 a pack expression, we can't unify. */
17005 if (parm_variadic_p
17006 ? argslen
< len
- parm_variadic_p
17008 return unify_arity (explain_p
, TREE_VEC_LENGTH (arg
), len
);
17010 /* Unify all of the parameters that precede the (optional)
17011 pack expression. */
17012 for (i
= 0; i
< len
- parm_variadic_p
; ++i
)
17014 RECUR_AND_CHECK_FAILURE (tparms
, targs
,
17015 TREE_VEC_ELT (parm
, i
),
17016 TREE_VEC_ELT (arg
, i
),
17017 UNIFY_ALLOW_NONE
, explain_p
);
17019 if (parm_variadic_p
)
17020 return unify_pack_expansion (tparms
, targs
, parm
, arg
,
17022 /*subr=*/true, explain_p
);
17023 return unify_success (explain_p
);
17028 if (TREE_CODE (arg
) != TREE_CODE (parm
))
17029 return unify_type_mismatch (explain_p
, parm
, arg
);
17031 if (TYPE_PTRMEMFUNC_P (parm
))
17033 if (!TYPE_PTRMEMFUNC_P (arg
))
17034 return unify_type_mismatch (explain_p
, parm
, arg
);
17036 return unify (tparms
, targs
,
17037 TYPE_PTRMEMFUNC_FN_TYPE (parm
),
17038 TYPE_PTRMEMFUNC_FN_TYPE (arg
),
17039 strict
, explain_p
);
17042 if (CLASSTYPE_TEMPLATE_INFO (parm
))
17044 tree t
= NULL_TREE
;
17046 if (strict_in
& UNIFY_ALLOW_DERIVED
)
17048 /* First, we try to unify the PARM and ARG directly. */
17049 t
= try_class_unification (tparms
, targs
,
17050 parm
, arg
, explain_p
);
17054 /* Fallback to the special case allowed in
17055 [temp.deduct.call]:
17057 If P is a class, and P has the form
17058 template-id, then A can be a derived class of
17059 the deduced A. Likewise, if P is a pointer to
17060 a class of the form template-id, A can be a
17061 pointer to a derived class pointed to by the
17063 enum template_base_result r
;
17064 r
= get_template_base (tparms
, targs
, parm
, arg
,
17068 return unify_no_common_base (explain_p
, r
, parm
, arg
);
17071 else if (CLASSTYPE_TEMPLATE_INFO (arg
)
17072 && (CLASSTYPE_TI_TEMPLATE (parm
)
17073 == CLASSTYPE_TI_TEMPLATE (arg
)))
17074 /* Perhaps PARM is something like S<U> and ARG is S<int>.
17075 Then, we should unify `int' and `U'. */
17078 /* There's no chance of unification succeeding. */
17079 return unify_type_mismatch (explain_p
, parm
, arg
);
17081 return unify (tparms
, targs
, CLASSTYPE_TI_ARGS (parm
),
17082 CLASSTYPE_TI_ARGS (t
), UNIFY_ALLOW_NONE
, explain_p
);
17084 else if (!same_type_ignoring_top_level_qualifiers_p (parm
, arg
))
17085 return unify_type_mismatch (explain_p
, parm
, arg
);
17086 return unify_success (explain_p
);
17089 case FUNCTION_TYPE
:
17091 unsigned int nargs
;
17096 if (TREE_CODE (arg
) != TREE_CODE (parm
))
17097 return unify_type_mismatch (explain_p
, parm
, arg
);
17099 /* CV qualifications for methods can never be deduced, they must
17100 match exactly. We need to check them explicitly here,
17101 because type_unification_real treats them as any other
17102 cv-qualified parameter. */
17103 if (TREE_CODE (parm
) == METHOD_TYPE
17104 && (!check_cv_quals_for_unify
17106 class_of_this_parm (arg
),
17107 class_of_this_parm (parm
))))
17108 return unify_cv_qual_mismatch (explain_p
, parm
, arg
);
17110 RECUR_AND_CHECK_FAILURE (tparms
, targs
, TREE_TYPE (parm
),
17111 TREE_TYPE (arg
), UNIFY_ALLOW_NONE
, explain_p
);
17113 nargs
= list_length (TYPE_ARG_TYPES (arg
));
17114 args
= XALLOCAVEC (tree
, nargs
);
17115 for (a
= TYPE_ARG_TYPES (arg
), i
= 0;
17116 a
!= NULL_TREE
&& a
!= void_list_node
;
17117 a
= TREE_CHAIN (a
), ++i
)
17118 args
[i
] = TREE_VALUE (a
);
17121 return type_unification_real (tparms
, targs
, TYPE_ARG_TYPES (parm
),
17122 args
, nargs
, 1, DEDUCE_EXACT
,
17123 LOOKUP_NORMAL
, NULL
, explain_p
);
17127 /* Unify a pointer to member with a pointer to member function, which
17128 deduces the type of the member as a function type. */
17129 if (TYPE_PTRMEMFUNC_P (arg
))
17134 /* Check top-level cv qualifiers */
17135 if (!check_cv_quals_for_unify (UNIFY_ALLOW_NONE
, arg
, parm
))
17136 return unify_cv_qual_mismatch (explain_p
, parm
, arg
);
17138 RECUR_AND_CHECK_FAILURE (tparms
, targs
, TYPE_OFFSET_BASETYPE (parm
),
17139 TYPE_PTRMEMFUNC_OBJECT_TYPE (arg
),
17140 UNIFY_ALLOW_NONE
, explain_p
);
17142 /* Determine the type of the function we are unifying against. */
17143 method_type
= TREE_TYPE (TYPE_PTRMEMFUNC_FN_TYPE (arg
));
17145 build_function_type (TREE_TYPE (method_type
),
17146 TREE_CHAIN (TYPE_ARG_TYPES (method_type
)));
17148 /* Extract the cv-qualifiers and ref-qualifier of the member
17149 function from the implicit object parameter and place them
17150 on the function type to be restored later. */
17151 fntype
= apply_memfn_quals (fntype
,
17152 type_memfn_quals (method_type
),
17153 type_memfn_rqual (method_type
));
17154 return unify (tparms
, targs
, TREE_TYPE (parm
), fntype
, strict
, explain_p
);
17157 if (TREE_CODE (arg
) != OFFSET_TYPE
)
17158 return unify_type_mismatch (explain_p
, parm
, arg
);
17159 RECUR_AND_CHECK_FAILURE (tparms
, targs
, TYPE_OFFSET_BASETYPE (parm
),
17160 TYPE_OFFSET_BASETYPE (arg
),
17161 UNIFY_ALLOW_NONE
, explain_p
);
17162 return unify (tparms
, targs
, TREE_TYPE (parm
), TREE_TYPE (arg
),
17163 strict
, explain_p
);
17166 if (DECL_TEMPLATE_PARM_P (parm
))
17167 return unify (tparms
, targs
, DECL_INITIAL (parm
), arg
, strict
, explain_p
);
17168 if (arg
!= integral_constant_value (parm
))
17169 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
17170 return unify_success (explain_p
);
17173 case TEMPLATE_DECL
:
17174 /* Matched cases are handled by the ARG == PARM test above. */
17175 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
17178 /* A non-type template parameter that is a variable should be a
17179 an integral constant, in which case, it whould have been
17180 folded into its (constant) value. So we should not be getting
17181 a variable here. */
17182 gcc_unreachable ();
17184 case TYPE_ARGUMENT_PACK
:
17185 case NONTYPE_ARGUMENT_PACK
:
17186 return unify (tparms
, targs
, ARGUMENT_PACK_ARGS (parm
),
17187 ARGUMENT_PACK_ARGS (arg
), strict
, explain_p
);
17190 case DECLTYPE_TYPE
:
17191 case UNDERLYING_TYPE
:
17192 /* Cannot deduce anything from TYPEOF_TYPE, DECLTYPE_TYPE,
17193 or UNDERLYING_TYPE nodes. */
17194 return unify_success (explain_p
);
17197 /* Unification fails if we hit an error node. */
17198 return unify_invalid (explain_p
);
17201 /* An unresolved overload is a nondeduced context. */
17202 if (is_overloaded_fn (parm
) || type_unknown_p (parm
))
17203 return unify_success (explain_p
);
17204 gcc_assert (EXPR_P (parm
));
17206 /* We must be looking at an expression. This can happen with
17210 void foo(S<I>, S<I + 2>);
17212 This is a "nondeduced context":
17216 The nondeduced contexts are:
17218 --A type that is a template-id in which one or more of
17219 the template-arguments is an expression that references
17220 a template-parameter.
17222 In these cases, we assume deduction succeeded, but don't
17223 actually infer any unifications. */
17225 if (!uses_template_parms (parm
)
17226 && !template_args_equal (parm
, arg
))
17227 return unify_expression_unequal (explain_p
, parm
, arg
);
17229 return unify_success (explain_p
);
17232 #undef RECUR_AND_CHECK_FAILURE
17234 /* Note that DECL can be defined in this translation unit, if
17238 mark_definable (tree decl
)
17241 DECL_NOT_REALLY_EXTERN (decl
) = 1;
17242 FOR_EACH_CLONE (clone
, decl
)
17243 DECL_NOT_REALLY_EXTERN (clone
) = 1;
17246 /* Called if RESULT is explicitly instantiated, or is a member of an
17247 explicitly instantiated class. */
17250 mark_decl_instantiated (tree result
, int extern_p
)
17252 SET_DECL_EXPLICIT_INSTANTIATION (result
);
17254 /* If this entity has already been written out, it's too late to
17255 make any modifications. */
17256 if (TREE_ASM_WRITTEN (result
))
17259 if (TREE_CODE (result
) != FUNCTION_DECL
)
17260 /* The TREE_PUBLIC flag for function declarations will have been
17261 set correctly by tsubst. */
17262 TREE_PUBLIC (result
) = 1;
17264 /* This might have been set by an earlier implicit instantiation. */
17265 DECL_COMDAT (result
) = 0;
17268 DECL_NOT_REALLY_EXTERN (result
) = 0;
17271 mark_definable (result
);
17272 /* Always make artificials weak. */
17273 if (DECL_ARTIFICIAL (result
) && flag_weak
)
17274 comdat_linkage (result
);
17275 /* For WIN32 we also want to put explicit instantiations in
17276 linkonce sections. */
17277 else if (TREE_PUBLIC (result
))
17278 maybe_make_one_only (result
);
17281 /* If EXTERN_P, then this function will not be emitted -- unless
17282 followed by an explicit instantiation, at which point its linkage
17283 will be adjusted. If !EXTERN_P, then this function will be
17284 emitted here. In neither circumstance do we want
17285 import_export_decl to adjust the linkage. */
17286 DECL_INTERFACE_KNOWN (result
) = 1;
17289 /* Subroutine of more_specialized_fn: check whether TARGS is missing any
17290 important template arguments. If any are missing, we check whether
17291 they're important by using error_mark_node for substituting into any
17292 args that were used for partial ordering (the ones between ARGS and END)
17293 and seeing if it bubbles up. */
17296 check_undeduced_parms (tree targs
, tree args
, tree end
)
17298 bool found
= false;
17300 for (i
= TREE_VEC_LENGTH (targs
) - 1; i
>= 0; --i
)
17301 if (TREE_VEC_ELT (targs
, i
) == NULL_TREE
)
17304 TREE_VEC_ELT (targs
, i
) = error_mark_node
;
17308 tree substed
= tsubst_arg_types (args
, targs
, end
, tf_none
, NULL_TREE
);
17309 if (substed
== error_mark_node
)
17315 /* Given two function templates PAT1 and PAT2, return:
17317 1 if PAT1 is more specialized than PAT2 as described in [temp.func.order].
17318 -1 if PAT2 is more specialized than PAT1.
17319 0 if neither is more specialized.
17321 LEN indicates the number of parameters we should consider
17322 (defaulted parameters should not be considered).
17324 The 1998 std underspecified function template partial ordering, and
17325 DR214 addresses the issue. We take pairs of arguments, one from
17326 each of the templates, and deduce them against each other. One of
17327 the templates will be more specialized if all the *other*
17328 template's arguments deduce against its arguments and at least one
17329 of its arguments *does* *not* deduce against the other template's
17330 corresponding argument. Deduction is done as for class templates.
17331 The arguments used in deduction have reference and top level cv
17332 qualifiers removed. Iff both arguments were originally reference
17333 types *and* deduction succeeds in both directions, the template
17334 with the more cv-qualified argument wins for that pairing (if
17335 neither is more cv-qualified, they both are equal). Unlike regular
17336 deduction, after all the arguments have been deduced in this way,
17337 we do *not* verify the deduced template argument values can be
17338 substituted into non-deduced contexts.
17340 The logic can be a bit confusing here, because we look at deduce1 and
17341 targs1 to see if pat2 is at least as specialized, and vice versa; if we
17342 can find template arguments for pat1 to make arg1 look like arg2, that
17343 means that arg2 is at least as specialized as arg1. */
17346 more_specialized_fn (tree pat1
, tree pat2
, int len
)
17348 tree decl1
= DECL_TEMPLATE_RESULT (pat1
);
17349 tree decl2
= DECL_TEMPLATE_RESULT (pat2
);
17350 tree targs1
= make_tree_vec (DECL_NTPARMS (pat1
));
17351 tree targs2
= make_tree_vec (DECL_NTPARMS (pat2
));
17352 tree tparms1
= DECL_INNERMOST_TEMPLATE_PARMS (pat1
);
17353 tree tparms2
= DECL_INNERMOST_TEMPLATE_PARMS (pat2
);
17354 tree args1
= TYPE_ARG_TYPES (TREE_TYPE (decl1
));
17355 tree args2
= TYPE_ARG_TYPES (TREE_TYPE (decl2
));
17356 tree origs1
, origs2
;
17357 bool lose1
= false;
17358 bool lose2
= false;
17360 /* Remove the this parameter from non-static member functions. If
17361 one is a non-static member function and the other is not a static
17362 member function, remove the first parameter from that function
17363 also. This situation occurs for operator functions where we
17364 locate both a member function (with this pointer) and non-member
17365 operator (with explicit first operand). */
17366 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (decl1
))
17368 len
--; /* LEN is the number of significant arguments for DECL1 */
17369 args1
= TREE_CHAIN (args1
);
17370 if (!DECL_STATIC_FUNCTION_P (decl2
))
17371 args2
= TREE_CHAIN (args2
);
17373 else if (DECL_NONSTATIC_MEMBER_FUNCTION_P (decl2
))
17375 args2
= TREE_CHAIN (args2
);
17376 if (!DECL_STATIC_FUNCTION_P (decl1
))
17379 args1
= TREE_CHAIN (args1
);
17383 /* If only one is a conversion operator, they are unordered. */
17384 if (DECL_CONV_FN_P (decl1
) != DECL_CONV_FN_P (decl2
))
17387 /* Consider the return type for a conversion function */
17388 if (DECL_CONV_FN_P (decl1
))
17390 args1
= tree_cons (NULL_TREE
, TREE_TYPE (TREE_TYPE (decl1
)), args1
);
17391 args2
= tree_cons (NULL_TREE
, TREE_TYPE (TREE_TYPE (decl2
)), args2
);
17395 processing_template_decl
++;
17401 /* Stop when an ellipsis is seen. */
17402 && args1
!= NULL_TREE
&& args2
!= NULL_TREE
)
17404 tree arg1
= TREE_VALUE (args1
);
17405 tree arg2
= TREE_VALUE (args2
);
17406 int deduce1
, deduce2
;
17410 if (TREE_CODE (arg1
) == TYPE_PACK_EXPANSION
17411 && TREE_CODE (arg2
) == TYPE_PACK_EXPANSION
)
17413 /* When both arguments are pack expansions, we need only
17414 unify the patterns themselves. */
17415 arg1
= PACK_EXPANSION_PATTERN (arg1
);
17416 arg2
= PACK_EXPANSION_PATTERN (arg2
);
17418 /* This is the last comparison we need to do. */
17422 if (TREE_CODE (arg1
) == REFERENCE_TYPE
)
17424 arg1
= TREE_TYPE (arg1
);
17425 quals1
= cp_type_quals (arg1
);
17428 if (TREE_CODE (arg2
) == REFERENCE_TYPE
)
17430 arg2
= TREE_TYPE (arg2
);
17431 quals2
= cp_type_quals (arg2
);
17434 arg1
= TYPE_MAIN_VARIANT (arg1
);
17435 arg2
= TYPE_MAIN_VARIANT (arg2
);
17437 if (TREE_CODE (arg1
) == TYPE_PACK_EXPANSION
)
17439 int i
, len2
= list_length (args2
);
17440 tree parmvec
= make_tree_vec (1);
17441 tree argvec
= make_tree_vec (len2
);
17444 /* Setup the parameter vector, which contains only ARG1. */
17445 TREE_VEC_ELT (parmvec
, 0) = arg1
;
17447 /* Setup the argument vector, which contains the remaining
17449 for (i
= 0; i
< len2
; i
++, ta
= TREE_CHAIN (ta
))
17450 TREE_VEC_ELT (argvec
, i
) = TREE_VALUE (ta
);
17452 deduce1
= (unify_pack_expansion (tparms1
, targs1
, parmvec
,
17453 argvec
, DEDUCE_EXACT
,
17454 /*subr=*/true, /*explain_p=*/false)
17457 /* We cannot deduce in the other direction, because ARG1 is
17458 a pack expansion but ARG2 is not. */
17461 else if (TREE_CODE (arg2
) == TYPE_PACK_EXPANSION
)
17463 int i
, len1
= list_length (args1
);
17464 tree parmvec
= make_tree_vec (1);
17465 tree argvec
= make_tree_vec (len1
);
17468 /* Setup the parameter vector, which contains only ARG1. */
17469 TREE_VEC_ELT (parmvec
, 0) = arg2
;
17471 /* Setup the argument vector, which contains the remaining
17473 for (i
= 0; i
< len1
; i
++, ta
= TREE_CHAIN (ta
))
17474 TREE_VEC_ELT (argvec
, i
) = TREE_VALUE (ta
);
17476 deduce2
= (unify_pack_expansion (tparms2
, targs2
, parmvec
,
17477 argvec
, DEDUCE_EXACT
,
17478 /*subr=*/true, /*explain_p=*/false)
17481 /* We cannot deduce in the other direction, because ARG2 is
17482 a pack expansion but ARG1 is not.*/
17488 /* The normal case, where neither argument is a pack
17490 deduce1
= (unify (tparms1
, targs1
, arg1
, arg2
,
17491 UNIFY_ALLOW_NONE
, /*explain_p=*/false)
17493 deduce2
= (unify (tparms2
, targs2
, arg2
, arg1
,
17494 UNIFY_ALLOW_NONE
, /*explain_p=*/false)
17498 /* If we couldn't deduce arguments for tparms1 to make arg1 match
17499 arg2, then arg2 is not as specialized as arg1. */
17505 /* "If, for a given type, deduction succeeds in both directions
17506 (i.e., the types are identical after the transformations above)
17507 and if the type from the argument template is more cv-qualified
17508 than the type from the parameter template (as described above)
17509 that type is considered to be more specialized than the other. If
17510 neither type is more cv-qualified than the other then neither type
17511 is more specialized than the other." */
17513 if (deduce1
&& deduce2
17514 && quals1
!= quals2
&& quals1
>= 0 && quals2
>= 0)
17516 if ((quals1
& quals2
) == quals2
)
17518 if ((quals1
& quals2
) == quals1
)
17522 if (lose1
&& lose2
)
17523 /* We've failed to deduce something in either direction.
17524 These must be unordered. */
17527 if (TREE_CODE (arg1
) == TYPE_PACK_EXPANSION
17528 || TREE_CODE (arg2
) == TYPE_PACK_EXPANSION
)
17529 /* We have already processed all of the arguments in our
17530 handing of the pack expansion type. */
17533 args1
= TREE_CHAIN (args1
);
17534 args2
= TREE_CHAIN (args2
);
17537 /* "In most cases, all template parameters must have values in order for
17538 deduction to succeed, but for partial ordering purposes a template
17539 parameter may remain without a value provided it is not used in the
17540 types being used for partial ordering."
17542 Thus, if we are missing any of the targs1 we need to substitute into
17543 origs1, then pat2 is not as specialized as pat1. This can happen when
17544 there is a nondeduced context. */
17545 if (!lose2
&& check_undeduced_parms (targs1
, origs1
, args1
))
17547 if (!lose1
&& check_undeduced_parms (targs2
, origs2
, args2
))
17550 processing_template_decl
--;
17552 /* All things being equal, if the next argument is a pack expansion
17553 for one function but not for the other, prefer the
17554 non-variadic function. FIXME this is bogus; see c++/41958. */
17556 && args1
&& TREE_VALUE (args1
)
17557 && args2
&& TREE_VALUE (args2
))
17559 lose1
= TREE_CODE (TREE_VALUE (args1
)) == TYPE_PACK_EXPANSION
;
17560 lose2
= TREE_CODE (TREE_VALUE (args2
)) == TYPE_PACK_EXPANSION
;
17563 if (lose1
== lose2
)
17571 /* Determine which of two partial specializations of TMPL is more
17574 PAT1 is a TREE_LIST whose TREE_TYPE is the _TYPE node corresponding
17575 to the first partial specialization. The TREE_VALUE is the
17576 innermost set of template parameters for the partial
17577 specialization. PAT2 is similar, but for the second template.
17579 Return 1 if the first partial specialization is more specialized;
17580 -1 if the second is more specialized; 0 if neither is more
17583 See [temp.class.order] for information about determining which of
17584 two templates is more specialized. */
17587 more_specialized_class (tree tmpl
, tree pat1
, tree pat2
)
17592 bool any_deductions
= false;
17594 tmpl1
= TREE_TYPE (pat1
);
17595 tmpl2
= TREE_TYPE (pat2
);
17597 /* Just like what happens for functions, if we are ordering between
17598 different class template specializations, we may encounter dependent
17599 types in the arguments, and we need our dependency check functions
17600 to behave correctly. */
17601 ++processing_template_decl
;
17602 targs
= get_class_bindings (tmpl
, TREE_VALUE (pat1
),
17603 CLASSTYPE_TI_ARGS (tmpl1
),
17604 CLASSTYPE_TI_ARGS (tmpl2
));
17608 any_deductions
= true;
17611 targs
= get_class_bindings (tmpl
, TREE_VALUE (pat2
),
17612 CLASSTYPE_TI_ARGS (tmpl2
),
17613 CLASSTYPE_TI_ARGS (tmpl1
));
17617 any_deductions
= true;
17619 --processing_template_decl
;
17621 /* In the case of a tie where at least one of the class templates
17622 has a parameter pack at the end, the template with the most
17623 non-packed parameters wins. */
17626 && (template_args_variadic_p (TREE_PURPOSE (pat1
))
17627 || template_args_variadic_p (TREE_PURPOSE (pat2
))))
17629 tree args1
= INNERMOST_TEMPLATE_ARGS (TREE_PURPOSE (pat1
));
17630 tree args2
= INNERMOST_TEMPLATE_ARGS (TREE_PURPOSE (pat2
));
17631 int len1
= TREE_VEC_LENGTH (args1
);
17632 int len2
= TREE_VEC_LENGTH (args2
);
17634 /* We don't count the pack expansion at the end. */
17635 if (template_args_variadic_p (TREE_PURPOSE (pat1
)))
17637 if (template_args_variadic_p (TREE_PURPOSE (pat2
)))
17642 else if (len1
< len2
)
17649 /* Return the template arguments that will produce the function signature
17650 DECL from the function template FN, with the explicit template
17651 arguments EXPLICIT_ARGS. If CHECK_RETTYPE is true, the return type must
17652 also match. Return NULL_TREE if no satisfactory arguments could be
17656 get_bindings (tree fn
, tree decl
, tree explicit_args
, bool check_rettype
)
17658 int ntparms
= DECL_NTPARMS (fn
);
17659 tree targs
= make_tree_vec (ntparms
);
17660 tree decl_type
= TREE_TYPE (decl
);
17661 tree decl_arg_types
;
17663 unsigned int nargs
, ix
;
17666 gcc_assert (decl
!= DECL_TEMPLATE_RESULT (fn
));
17668 /* Never do unification on the 'this' parameter. */
17669 decl_arg_types
= skip_artificial_parms_for (decl
,
17670 TYPE_ARG_TYPES (decl_type
));
17672 nargs
= list_length (decl_arg_types
);
17673 args
= XALLOCAVEC (tree
, nargs
);
17674 for (arg
= decl_arg_types
, ix
= 0;
17675 arg
!= NULL_TREE
&& arg
!= void_list_node
;
17676 arg
= TREE_CHAIN (arg
), ++ix
)
17677 args
[ix
] = TREE_VALUE (arg
);
17679 if (fn_type_unification (fn
, explicit_args
, targs
,
17681 (check_rettype
|| DECL_CONV_FN_P (fn
)
17682 ? TREE_TYPE (decl_type
) : NULL_TREE
),
17683 DEDUCE_EXACT
, LOOKUP_NORMAL
, /*explain_p=*/false)
17684 == error_mark_node
)
17690 /* Return the innermost template arguments that, when applied to a partial
17691 specialization of TMPL whose innermost template parameters are
17692 TPARMS, and whose specialization arguments are SPEC_ARGS, yield the
17695 For example, suppose we have:
17697 template <class T, class U> struct S {};
17698 template <class T> struct S<T*, int> {};
17700 Then, suppose we want to get `S<double*, int>'. The TPARMS will be
17701 {T}, the SPEC_ARGS will be {T*, int} and the ARGS will be {double*,
17702 int}. The resulting vector will be {double}, indicating that `T'
17703 is bound to `double'. */
17706 get_class_bindings (tree tmpl
, tree tparms
, tree spec_args
, tree args
)
17708 int i
, ntparms
= TREE_VEC_LENGTH (tparms
);
17710 tree innermost_deduced_args
;
17712 innermost_deduced_args
= make_tree_vec (ntparms
);
17713 if (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (args
))
17715 deduced_args
= copy_node (args
);
17716 SET_TMPL_ARGS_LEVEL (deduced_args
,
17717 TMPL_ARGS_DEPTH (deduced_args
),
17718 innermost_deduced_args
);
17721 deduced_args
= innermost_deduced_args
;
17723 if (unify (tparms
, deduced_args
,
17724 INNERMOST_TEMPLATE_ARGS (spec_args
),
17725 INNERMOST_TEMPLATE_ARGS (args
),
17726 UNIFY_ALLOW_NONE
, /*explain_p=*/false))
17729 for (i
= 0; i
< ntparms
; ++i
)
17730 if (! TREE_VEC_ELT (innermost_deduced_args
, i
))
17733 /* Verify that nondeduced template arguments agree with the type
17734 obtained from argument deduction.
17738 struct A { typedef int X; };
17739 template <class T, class U> struct C {};
17740 template <class T> struct C<T, typename T::X> {};
17742 Then with the instantiation `C<A, int>', we can deduce that
17743 `T' is `A' but unify () does not check whether `typename T::X'
17745 spec_args
= tsubst (spec_args
, deduced_args
, tf_none
, NULL_TREE
);
17746 spec_args
= coerce_template_parms (DECL_INNERMOST_TEMPLATE_PARMS (tmpl
),
17748 tf_none
, false, false);
17749 if (spec_args
== error_mark_node
17750 /* We only need to check the innermost arguments; the other
17751 arguments will always agree. */
17752 || !comp_template_args (INNERMOST_TEMPLATE_ARGS (spec_args
),
17753 INNERMOST_TEMPLATE_ARGS (args
)))
17756 /* Now that we have bindings for all of the template arguments,
17757 ensure that the arguments deduced for the template template
17758 parameters have compatible template parameter lists. See the use
17759 of template_template_parm_bindings_ok_p in fn_type_unification
17760 for more information. */
17761 if (!template_template_parm_bindings_ok_p (tparms
, deduced_args
))
17764 return deduced_args
;
17767 /* TEMPLATES is a TREE_LIST. Each TREE_VALUE is a TEMPLATE_DECL.
17768 Return the TREE_LIST node with the most specialized template, if
17769 any. If there is no most specialized template, the error_mark_node
17772 Note that this function does not look at, or modify, the
17773 TREE_PURPOSE or TREE_TYPE of any of the nodes. Since the node
17774 returned is one of the elements of INSTANTIATIONS, callers may
17775 store information in the TREE_PURPOSE or TREE_TYPE of the nodes,
17776 and retrieve it from the value returned. */
17779 most_specialized_instantiation (tree templates
)
17783 ++processing_template_decl
;
17786 for (fn
= TREE_CHAIN (templates
); fn
; fn
= TREE_CHAIN (fn
))
17790 if (get_bindings (TREE_VALUE (champ
),
17791 DECL_TEMPLATE_RESULT (TREE_VALUE (fn
)),
17792 NULL_TREE
, /*check_ret=*/true))
17795 if (get_bindings (TREE_VALUE (fn
),
17796 DECL_TEMPLATE_RESULT (TREE_VALUE (champ
)),
17797 NULL_TREE
, /*check_ret=*/true))
17804 /* Equally specialized, move to next function. If there
17805 is no next function, nothing's most specialized. */
17806 fn
= TREE_CHAIN (fn
);
17814 /* Now verify that champ is better than everything earlier in the
17815 instantiation list. */
17816 for (fn
= templates
; fn
!= champ
; fn
= TREE_CHAIN (fn
))
17817 if (get_bindings (TREE_VALUE (champ
),
17818 DECL_TEMPLATE_RESULT (TREE_VALUE (fn
)),
17819 NULL_TREE
, /*check_ret=*/true)
17820 || !get_bindings (TREE_VALUE (fn
),
17821 DECL_TEMPLATE_RESULT (TREE_VALUE (champ
)),
17822 NULL_TREE
, /*check_ret=*/true))
17828 processing_template_decl
--;
17831 return error_mark_node
;
17836 /* If DECL is a specialization of some template, return the most
17837 general such template. Otherwise, returns NULL_TREE.
17839 For example, given:
17841 template <class T> struct S { template <class U> void f(U); };
17843 if TMPL is `template <class U> void S<int>::f(U)' this will return
17844 the full template. This function will not trace past partial
17845 specializations, however. For example, given in addition:
17847 template <class T> struct S<T*> { template <class U> void f(U); };
17849 if TMPL is `template <class U> void S<int*>::f(U)' this will return
17850 `template <class T> template <class U> S<T*>::f(U)'. */
17853 most_general_template (tree decl
)
17855 /* If DECL is a FUNCTION_DECL, find the TEMPLATE_DECL of which it is
17856 an immediate specialization. */
17857 if (TREE_CODE (decl
) == FUNCTION_DECL
)
17859 if (DECL_TEMPLATE_INFO (decl
)) {
17860 decl
= DECL_TI_TEMPLATE (decl
);
17862 /* The DECL_TI_TEMPLATE can be an IDENTIFIER_NODE for a
17863 template friend. */
17864 if (TREE_CODE (decl
) != TEMPLATE_DECL
)
17870 /* Look for more and more general templates. */
17871 while (DECL_TEMPLATE_INFO (decl
))
17873 /* The DECL_TI_TEMPLATE can be an IDENTIFIER_NODE in some cases.
17874 (See cp-tree.h for details.) */
17875 if (TREE_CODE (DECL_TI_TEMPLATE (decl
)) != TEMPLATE_DECL
)
17878 if (CLASS_TYPE_P (TREE_TYPE (decl
))
17879 && CLASSTYPE_TEMPLATE_SPECIALIZATION (TREE_TYPE (decl
)))
17882 /* Stop if we run into an explicitly specialized class template. */
17883 if (!DECL_NAMESPACE_SCOPE_P (decl
)
17884 && DECL_CONTEXT (decl
)
17885 && CLASSTYPE_TEMPLATE_SPECIALIZATION (DECL_CONTEXT (decl
)))
17888 decl
= DECL_TI_TEMPLATE (decl
);
17894 /* Return the most specialized of the class template partial
17895 specializations which can produce TYPE, a specialization of some class
17896 template. The value returned is actually a TREE_LIST; the TREE_TYPE is
17897 a _TYPE node corresponding to the partial specialization, while the
17898 TREE_PURPOSE is the set of template arguments that must be
17899 substituted into the TREE_TYPE in order to generate TYPE.
17901 If the choice of partial specialization is ambiguous, a diagnostic
17902 is issued, and the error_mark_node is returned. If there are no
17903 partial specializations matching TYPE, then NULL_TREE is
17904 returned, indicating that the primary template should be used. */
17907 most_specialized_class (tree type
, tsubst_flags_t complain
)
17909 tree list
= NULL_TREE
;
17914 tree outer_args
= NULL_TREE
;
17916 tree tmpl
= CLASSTYPE_TI_TEMPLATE (type
);
17917 tree main_tmpl
= most_general_template (tmpl
);
17918 tree args
= CLASSTYPE_TI_ARGS (type
);
17920 /* For determining which partial specialization to use, only the
17921 innermost args are interesting. */
17922 if (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (args
))
17924 outer_args
= strip_innermost_template_args (args
, 1);
17925 args
= INNERMOST_TEMPLATE_ARGS (args
);
17928 for (t
= DECL_TEMPLATE_SPECIALIZATIONS (main_tmpl
); t
; t
= TREE_CHAIN (t
))
17930 tree partial_spec_args
;
17932 tree parms
= TREE_VALUE (t
);
17934 partial_spec_args
= CLASSTYPE_TI_ARGS (TREE_TYPE (t
));
17936 ++processing_template_decl
;
17942 /* Discard the outer levels of args, and then substitute in the
17943 template args from the enclosing class. */
17944 partial_spec_args
= INNERMOST_TEMPLATE_ARGS (partial_spec_args
);
17945 partial_spec_args
= tsubst_template_args
17946 (partial_spec_args
, outer_args
, tf_none
, NULL_TREE
);
17948 /* PARMS already refers to just the innermost parms, but the
17949 template parms in partial_spec_args had their levels lowered
17950 by tsubst, so we need to do the same for the parm list. We
17951 can't just tsubst the TREE_VEC itself, as tsubst wants to
17952 treat a TREE_VEC as an argument vector. */
17953 parms
= copy_node (parms
);
17954 for (i
= TREE_VEC_LENGTH (parms
) - 1; i
>= 0; --i
)
17955 TREE_VEC_ELT (parms
, i
) =
17956 tsubst (TREE_VEC_ELT (parms
, i
), outer_args
, tf_none
, NULL_TREE
);
17960 partial_spec_args
=
17961 coerce_template_parms (DECL_INNERMOST_TEMPLATE_PARMS (tmpl
),
17964 /*require_all_args=*/true,
17965 /*use_default_args=*/true);
17967 --processing_template_decl
;
17969 if (partial_spec_args
== error_mark_node
)
17970 return error_mark_node
;
17972 spec_args
= get_class_bindings (tmpl
, parms
,
17978 spec_args
= add_to_template_args (outer_args
, spec_args
);
17979 list
= tree_cons (spec_args
, TREE_VALUE (t
), list
);
17980 TREE_TYPE (list
) = TREE_TYPE (t
);
17987 ambiguous_p
= false;
17990 t
= TREE_CHAIN (t
);
17991 for (; t
; t
= TREE_CHAIN (t
))
17993 fate
= more_specialized_class (tmpl
, champ
, t
);
18000 t
= TREE_CHAIN (t
);
18003 ambiguous_p
= true;
18012 for (t
= list
; t
&& t
!= champ
; t
= TREE_CHAIN (t
))
18014 fate
= more_specialized_class (tmpl
, champ
, t
);
18017 ambiguous_p
= true;
18025 char *spaces
= NULL
;
18026 if (!(complain
& tf_error
))
18027 return error_mark_node
;
18028 error ("ambiguous class template instantiation for %q#T", type
);
18029 str
= ngettext ("candidate is:", "candidates are:", list_length (list
));
18030 for (t
= list
; t
; t
= TREE_CHAIN (t
))
18032 error ("%s %+#T", spaces
? spaces
: str
, TREE_TYPE (t
));
18033 spaces
= spaces
? spaces
: get_spaces (str
);
18036 return error_mark_node
;
18042 /* Explicitly instantiate DECL. */
18045 do_decl_instantiation (tree decl
, tree storage
)
18047 tree result
= NULL_TREE
;
18050 if (!decl
|| decl
== error_mark_node
)
18051 /* An error occurred, for which grokdeclarator has already issued
18052 an appropriate message. */
18054 else if (! DECL_LANG_SPECIFIC (decl
))
18056 error ("explicit instantiation of non-template %q#D", decl
);
18059 else if (TREE_CODE (decl
) == VAR_DECL
)
18061 /* There is an asymmetry here in the way VAR_DECLs and
18062 FUNCTION_DECLs are handled by grokdeclarator. In the case of
18063 the latter, the DECL we get back will be marked as a
18064 template instantiation, and the appropriate
18065 DECL_TEMPLATE_INFO will be set up. This does not happen for
18066 VAR_DECLs so we do the lookup here. Probably, grokdeclarator
18067 should handle VAR_DECLs as it currently handles
18069 if (!DECL_CLASS_SCOPE_P (decl
))
18071 error ("%qD is not a static data member of a class template", decl
);
18074 result
= lookup_field (DECL_CONTEXT (decl
), DECL_NAME (decl
), 0, false);
18075 if (!result
|| TREE_CODE (result
) != VAR_DECL
)
18077 error ("no matching template for %qD found", decl
);
18080 if (!same_type_p (TREE_TYPE (result
), TREE_TYPE (decl
)))
18082 error ("type %qT for explicit instantiation %qD does not match "
18083 "declared type %qT", TREE_TYPE (result
), decl
,
18088 else if (TREE_CODE (decl
) != FUNCTION_DECL
)
18090 error ("explicit instantiation of %q#D", decl
);
18096 /* Check for various error cases. Note that if the explicit
18097 instantiation is valid the RESULT will currently be marked as an
18098 *implicit* instantiation; DECL_EXPLICIT_INSTANTIATION is not set
18099 until we get here. */
18101 if (DECL_TEMPLATE_SPECIALIZATION (result
))
18103 /* DR 259 [temp.spec].
18105 Both an explicit instantiation and a declaration of an explicit
18106 specialization shall not appear in a program unless the explicit
18107 instantiation follows a declaration of the explicit specialization.
18109 For a given set of template parameters, if an explicit
18110 instantiation of a template appears after a declaration of an
18111 explicit specialization for that template, the explicit
18112 instantiation has no effect. */
18115 else if (DECL_EXPLICIT_INSTANTIATION (result
))
18119 No program shall explicitly instantiate any template more
18122 We check DECL_NOT_REALLY_EXTERN so as not to complain when
18123 the first instantiation was `extern' and the second is not,
18124 and EXTERN_P for the opposite case. */
18125 if (DECL_NOT_REALLY_EXTERN (result
) && !extern_p
)
18126 permerror (input_location
, "duplicate explicit instantiation of %q#D", result
);
18127 /* If an "extern" explicit instantiation follows an ordinary
18128 explicit instantiation, the template is instantiated. */
18132 else if (!DECL_IMPLICIT_INSTANTIATION (result
))
18134 error ("no matching template for %qD found", result
);
18137 else if (!DECL_TEMPLATE_INFO (result
))
18139 permerror (input_location
, "explicit instantiation of non-template %q#D", result
);
18143 if (storage
== NULL_TREE
)
18145 else if (storage
== ridpointers
[(int) RID_EXTERN
])
18147 if (!in_system_header
&& (cxx_dialect
== cxx98
))
18148 pedwarn (input_location
, OPT_Wpedantic
,
18149 "ISO C++ 1998 forbids the use of %<extern%> on explicit "
18154 error ("storage class %qD applied to template instantiation", storage
);
18156 check_explicit_instantiation_namespace (result
);
18157 mark_decl_instantiated (result
, extern_p
);
18159 instantiate_decl (result
, /*defer_ok=*/1,
18160 /*expl_inst_class_mem_p=*/false);
18164 mark_class_instantiated (tree t
, int extern_p
)
18166 SET_CLASSTYPE_EXPLICIT_INSTANTIATION (t
);
18167 SET_CLASSTYPE_INTERFACE_KNOWN (t
);
18168 CLASSTYPE_INTERFACE_ONLY (t
) = extern_p
;
18169 TYPE_DECL_SUPPRESS_DEBUG (TYPE_NAME (t
)) = extern_p
;
18172 CLASSTYPE_DEBUG_REQUESTED (t
) = 1;
18173 rest_of_type_compilation (t
, 1);
18177 /* Called from do_type_instantiation through binding_table_foreach to
18178 do recursive instantiation for the type bound in ENTRY. */
18180 bt_instantiate_type_proc (binding_entry entry
, void *data
)
18182 tree storage
= *(tree
*) data
;
18184 if (MAYBE_CLASS_TYPE_P (entry
->type
)
18185 && !uses_template_parms (CLASSTYPE_TI_ARGS (entry
->type
)))
18186 do_type_instantiation (TYPE_MAIN_DECL (entry
->type
), storage
, 0);
18189 /* Called from do_type_instantiation to instantiate a member
18190 (a member function or a static member variable) of an
18191 explicitly instantiated class template. */
18193 instantiate_class_member (tree decl
, int extern_p
)
18195 mark_decl_instantiated (decl
, extern_p
);
18197 instantiate_decl (decl
, /*defer_ok=*/1,
18198 /*expl_inst_class_mem_p=*/true);
18201 /* Perform an explicit instantiation of template class T. STORAGE, if
18202 non-null, is the RID for extern, inline or static. COMPLAIN is
18203 nonzero if this is called from the parser, zero if called recursively,
18204 since the standard is unclear (as detailed below). */
18207 do_type_instantiation (tree t
, tree storage
, tsubst_flags_t complain
)
18212 int previous_instantiation_extern_p
= 0;
18214 if (TREE_CODE (t
) == TYPE_DECL
)
18217 if (! CLASS_TYPE_P (t
) || ! CLASSTYPE_TEMPLATE_INFO (t
))
18220 (TYPE_TEMPLATE_INFO (t
)) ? TYPE_TI_TEMPLATE (t
) : NULL
;
18222 error ("explicit instantiation of non-class template %qD", tmpl
);
18224 error ("explicit instantiation of non-template type %qT", t
);
18230 if (!COMPLETE_TYPE_P (t
))
18232 if (complain
& tf_error
)
18233 error ("explicit instantiation of %q#T before definition of template",
18238 if (storage
!= NULL_TREE
)
18240 if (!in_system_header
)
18242 if (storage
== ridpointers
[(int) RID_EXTERN
])
18244 if (cxx_dialect
== cxx98
)
18245 pedwarn (input_location
, OPT_Wpedantic
,
18246 "ISO C++ 1998 forbids the use of %<extern%> on "
18247 "explicit instantiations");
18250 pedwarn (input_location
, OPT_Wpedantic
,
18251 "ISO C++ forbids the use of %qE"
18252 " on explicit instantiations", storage
);
18255 if (storage
== ridpointers
[(int) RID_INLINE
])
18257 else if (storage
== ridpointers
[(int) RID_EXTERN
])
18259 else if (storage
== ridpointers
[(int) RID_STATIC
])
18263 error ("storage class %qD applied to template instantiation",
18269 if (CLASSTYPE_TEMPLATE_SPECIALIZATION (t
))
18271 /* DR 259 [temp.spec].
18273 Both an explicit instantiation and a declaration of an explicit
18274 specialization shall not appear in a program unless the explicit
18275 instantiation follows a declaration of the explicit specialization.
18277 For a given set of template parameters, if an explicit
18278 instantiation of a template appears after a declaration of an
18279 explicit specialization for that template, the explicit
18280 instantiation has no effect. */
18283 else if (CLASSTYPE_EXPLICIT_INSTANTIATION (t
))
18287 No program shall explicitly instantiate any template more
18290 If PREVIOUS_INSTANTIATION_EXTERN_P, then the first explicit
18291 instantiation was `extern'. If EXTERN_P then the second is.
18292 These cases are OK. */
18293 previous_instantiation_extern_p
= CLASSTYPE_INTERFACE_ONLY (t
);
18295 if (!previous_instantiation_extern_p
&& !extern_p
18296 && (complain
& tf_error
))
18297 permerror (input_location
, "duplicate explicit instantiation of %q#T", t
);
18299 /* If we've already instantiated the template, just return now. */
18300 if (!CLASSTYPE_INTERFACE_ONLY (t
))
18304 check_explicit_instantiation_namespace (TYPE_NAME (t
));
18305 mark_class_instantiated (t
, extern_p
);
18313 /* In contrast to implicit instantiation, where only the
18314 declarations, and not the definitions, of members are
18315 instantiated, we have here:
18319 The explicit instantiation of a class template specialization
18320 implies the instantiation of all of its members not
18321 previously explicitly specialized in the translation unit
18322 containing the explicit instantiation.
18324 Of course, we can't instantiate member template classes, since
18325 we don't have any arguments for them. Note that the standard
18326 is unclear on whether the instantiation of the members are
18327 *explicit* instantiations or not. However, the most natural
18328 interpretation is that it should be an explicit instantiation. */
18331 for (tmp
= TYPE_METHODS (t
); tmp
; tmp
= DECL_CHAIN (tmp
))
18332 if (TREE_CODE (tmp
) == FUNCTION_DECL
18333 && DECL_TEMPLATE_INSTANTIATION (tmp
))
18334 instantiate_class_member (tmp
, extern_p
);
18336 for (tmp
= TYPE_FIELDS (t
); tmp
; tmp
= DECL_CHAIN (tmp
))
18337 if (TREE_CODE (tmp
) == VAR_DECL
&& DECL_TEMPLATE_INSTANTIATION (tmp
))
18338 instantiate_class_member (tmp
, extern_p
);
18340 if (CLASSTYPE_NESTED_UTDS (t
))
18341 binding_table_foreach (CLASSTYPE_NESTED_UTDS (t
),
18342 bt_instantiate_type_proc
, &storage
);
18346 /* Given a function DECL, which is a specialization of TMPL, modify
18347 DECL to be a re-instantiation of TMPL with the same template
18348 arguments. TMPL should be the template into which tsubst'ing
18349 should occur for DECL, not the most general template.
18351 One reason for doing this is a scenario like this:
18354 void f(const T&, int i);
18356 void g() { f(3, 7); }
18359 void f(const T& t, const int i) { }
18361 Note that when the template is first instantiated, with
18362 instantiate_template, the resulting DECL will have no name for the
18363 first parameter, and the wrong type for the second. So, when we go
18364 to instantiate the DECL, we regenerate it. */
18367 regenerate_decl_from_template (tree decl
, tree tmpl
)
18369 /* The arguments used to instantiate DECL, from the most general
18374 args
= DECL_TI_ARGS (decl
);
18375 code_pattern
= DECL_TEMPLATE_RESULT (tmpl
);
18377 /* Make sure that we can see identifiers, and compute access
18379 push_access_scope (decl
);
18381 if (TREE_CODE (decl
) == FUNCTION_DECL
)
18389 args_depth
= TMPL_ARGS_DEPTH (args
);
18390 parms_depth
= TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (tmpl
));
18391 if (args_depth
> parms_depth
)
18392 args
= get_innermost_template_args (args
, parms_depth
);
18394 specs
= tsubst_exception_specification (TREE_TYPE (code_pattern
),
18395 args
, tf_error
, NULL_TREE
,
18396 /*defer_ok*/false);
18397 if (specs
&& specs
!= error_mark_node
)
18398 TREE_TYPE (decl
) = build_exception_variant (TREE_TYPE (decl
),
18401 /* Merge parameter declarations. */
18402 decl_parm
= skip_artificial_parms_for (decl
,
18403 DECL_ARGUMENTS (decl
));
18405 = skip_artificial_parms_for (code_pattern
,
18406 DECL_ARGUMENTS (code_pattern
));
18407 while (decl_parm
&& !FUNCTION_PARAMETER_PACK_P (pattern_parm
))
18412 if (DECL_NAME (decl_parm
) != DECL_NAME (pattern_parm
))
18413 DECL_NAME (decl_parm
) = DECL_NAME (pattern_parm
);
18414 parm_type
= tsubst (TREE_TYPE (pattern_parm
), args
, tf_error
,
18416 parm_type
= type_decays_to (parm_type
);
18417 if (!same_type_p (TREE_TYPE (decl_parm
), parm_type
))
18418 TREE_TYPE (decl_parm
) = parm_type
;
18419 attributes
= DECL_ATTRIBUTES (pattern_parm
);
18420 if (DECL_ATTRIBUTES (decl_parm
) != attributes
)
18422 DECL_ATTRIBUTES (decl_parm
) = attributes
;
18423 cplus_decl_attributes (&decl_parm
, attributes
, /*flags=*/0);
18425 decl_parm
= DECL_CHAIN (decl_parm
);
18426 pattern_parm
= DECL_CHAIN (pattern_parm
);
18428 /* Merge any parameters that match with the function parameter
18430 if (pattern_parm
&& FUNCTION_PARAMETER_PACK_P (pattern_parm
))
18433 tree expanded_types
;
18434 /* Expand the TYPE_PACK_EXPANSION that provides the types for
18435 the parameters in this function parameter pack. */
18436 expanded_types
= tsubst_pack_expansion (TREE_TYPE (pattern_parm
),
18437 args
, tf_error
, NULL_TREE
);
18438 len
= TREE_VEC_LENGTH (expanded_types
);
18439 for (i
= 0; i
< len
; i
++)
18444 if (DECL_NAME (decl_parm
) != DECL_NAME (pattern_parm
))
18445 /* Rename the parameter to include the index. */
18446 DECL_NAME (decl_parm
) =
18447 make_ith_pack_parameter_name (DECL_NAME (pattern_parm
), i
);
18448 parm_type
= TREE_VEC_ELT (expanded_types
, i
);
18449 parm_type
= type_decays_to (parm_type
);
18450 if (!same_type_p (TREE_TYPE (decl_parm
), parm_type
))
18451 TREE_TYPE (decl_parm
) = parm_type
;
18452 attributes
= DECL_ATTRIBUTES (pattern_parm
);
18453 if (DECL_ATTRIBUTES (decl_parm
) != attributes
)
18455 DECL_ATTRIBUTES (decl_parm
) = attributes
;
18456 cplus_decl_attributes (&decl_parm
, attributes
, /*flags=*/0);
18458 decl_parm
= DECL_CHAIN (decl_parm
);
18461 /* Merge additional specifiers from the CODE_PATTERN. */
18462 if (DECL_DECLARED_INLINE_P (code_pattern
)
18463 && !DECL_DECLARED_INLINE_P (decl
))
18464 DECL_DECLARED_INLINE_P (decl
) = 1;
18466 else if (TREE_CODE (decl
) == VAR_DECL
)
18468 DECL_INITIAL (decl
) =
18469 tsubst_expr (DECL_INITIAL (code_pattern
), args
,
18470 tf_error
, DECL_TI_TEMPLATE (decl
),
18471 /*integral_constant_expression_p=*/false);
18472 if (VAR_HAD_UNKNOWN_BOUND (decl
))
18473 TREE_TYPE (decl
) = tsubst (TREE_TYPE (code_pattern
), args
,
18474 tf_error
, DECL_TI_TEMPLATE (decl
));
18477 gcc_unreachable ();
18479 pop_access_scope (decl
);
18482 /* Return the TEMPLATE_DECL into which DECL_TI_ARGS(DECL) should be
18483 substituted to get DECL. */
18486 template_for_substitution (tree decl
)
18488 tree tmpl
= DECL_TI_TEMPLATE (decl
);
18490 /* Set TMPL to the template whose DECL_TEMPLATE_RESULT is the pattern
18491 for the instantiation. This is not always the most general
18492 template. Consider, for example:
18495 struct S { template <class U> void f();
18496 template <> void f<int>(); };
18498 and an instantiation of S<double>::f<int>. We want TD to be the
18499 specialization S<T>::f<int>, not the more general S<T>::f<U>. */
18500 while (/* An instantiation cannot have a definition, so we need a
18501 more general template. */
18502 DECL_TEMPLATE_INSTANTIATION (tmpl
)
18503 /* We must also deal with friend templates. Given:
18505 template <class T> struct S {
18506 template <class U> friend void f() {};
18509 S<int>::f<U> say, is not an instantiation of S<T>::f<U>,
18510 so far as the language is concerned, but that's still
18511 where we get the pattern for the instantiation from. On
18512 other hand, if the definition comes outside the class, say:
18514 template <class T> struct S {
18515 template <class U> friend void f();
18517 template <class U> friend void f() {}
18519 we don't need to look any further. That's what the check for
18520 DECL_INITIAL is for. */
18521 || (TREE_CODE (decl
) == FUNCTION_DECL
18522 && DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION (tmpl
)
18523 && !DECL_INITIAL (DECL_TEMPLATE_RESULT (tmpl
))))
18525 /* The present template, TD, should not be a definition. If it
18526 were a definition, we should be using it! Note that we
18527 cannot restructure the loop to just keep going until we find
18528 a template with a definition, since that might go too far if
18529 a specialization was declared, but not defined. */
18530 gcc_assert (TREE_CODE (decl
) != VAR_DECL
18531 || DECL_IN_AGGR_P (DECL_TEMPLATE_RESULT (tmpl
)));
18533 /* Fetch the more general template. */
18534 tmpl
= DECL_TI_TEMPLATE (tmpl
);
18540 /* Returns true if we need to instantiate this template instance even if we
18541 know we aren't going to emit it.. */
18544 always_instantiate_p (tree decl
)
18546 /* We always instantiate inline functions so that we can inline them. An
18547 explicit instantiation declaration prohibits implicit instantiation of
18548 non-inline functions. With high levels of optimization, we would
18549 normally inline non-inline functions -- but we're not allowed to do
18550 that for "extern template" functions. Therefore, we check
18551 DECL_DECLARED_INLINE_P, rather than possibly_inlined_p. */
18552 return ((TREE_CODE (decl
) == FUNCTION_DECL
18553 && (DECL_DECLARED_INLINE_P (decl
)
18554 || type_uses_auto (TREE_TYPE (TREE_TYPE (decl
)))))
18555 /* And we need to instantiate static data members so that
18556 their initializers are available in integral constant
18558 || (TREE_CODE (decl
) == VAR_DECL
18559 && decl_maybe_constant_var_p (decl
)));
18562 /* If FN has a noexcept-specifier that hasn't been instantiated yet,
18563 instantiate it now, modifying TREE_TYPE (fn). */
18566 maybe_instantiate_noexcept (tree fn
)
18568 tree fntype
, spec
, noex
, clone
;
18570 if (DECL_CLONED_FUNCTION_P (fn
))
18571 fn
= DECL_CLONED_FUNCTION (fn
);
18572 fntype
= TREE_TYPE (fn
);
18573 spec
= TYPE_RAISES_EXCEPTIONS (fntype
);
18575 if (!DEFERRED_NOEXCEPT_SPEC_P (spec
))
18578 noex
= TREE_PURPOSE (spec
);
18580 if (TREE_CODE (noex
) == DEFERRED_NOEXCEPT
)
18582 if (push_tinst_level (fn
))
18584 push_access_scope (fn
);
18585 push_deferring_access_checks (dk_no_deferred
);
18586 input_location
= DECL_SOURCE_LOCATION (fn
);
18587 noex
= tsubst_copy_and_build (DEFERRED_NOEXCEPT_PATTERN (noex
),
18588 DEFERRED_NOEXCEPT_ARGS (noex
),
18589 tf_warning_or_error
, fn
,
18590 /*function_p=*/false,
18591 /*integral_constant_expression_p=*/true);
18592 pop_deferring_access_checks ();
18593 pop_access_scope (fn
);
18594 pop_tinst_level ();
18595 spec
= build_noexcept_spec (noex
, tf_warning_or_error
);
18596 if (spec
== error_mark_node
)
18597 spec
= noexcept_false_spec
;
18600 spec
= noexcept_false_spec
;
18604 /* This is an implicitly declared function, so NOEX is a list of
18605 other functions to evaluate and merge. */
18607 spec
= noexcept_true_spec
;
18608 for (elt
= noex
; elt
; elt
= OVL_NEXT (elt
))
18610 tree fn
= OVL_CURRENT (elt
);
18612 maybe_instantiate_noexcept (fn
);
18613 subspec
= TYPE_RAISES_EXCEPTIONS (TREE_TYPE (fn
));
18614 spec
= merge_exception_specifiers (spec
, subspec
, NULL_TREE
);
18618 TREE_TYPE (fn
) = build_exception_variant (fntype
, spec
);
18620 FOR_EACH_CLONE (clone
, fn
)
18622 if (TREE_TYPE (clone
) == fntype
)
18623 TREE_TYPE (clone
) = TREE_TYPE (fn
);
18625 TREE_TYPE (clone
) = build_exception_variant (TREE_TYPE (clone
), spec
);
18629 /* Produce the definition of D, a _DECL generated from a template. If
18630 DEFER_OK is nonzero, then we don't have to actually do the
18631 instantiation now; we just have to do it sometime. Normally it is
18632 an error if this is an explicit instantiation but D is undefined.
18633 EXPL_INST_CLASS_MEM_P is true iff D is a member of an
18634 explicitly instantiated class template. */
18637 instantiate_decl (tree d
, int defer_ok
,
18638 bool expl_inst_class_mem_p
)
18640 tree tmpl
= DECL_TI_TEMPLATE (d
);
18647 bool pattern_defined
;
18648 location_t saved_loc
= input_location
;
18653 /* This function should only be used to instantiate templates for
18654 functions and static member variables. */
18655 gcc_assert (TREE_CODE (d
) == FUNCTION_DECL
18656 || TREE_CODE (d
) == VAR_DECL
);
18658 /* Variables are never deferred; if instantiation is required, they
18659 are instantiated right away. That allows for better code in the
18660 case that an expression refers to the value of the variable --
18661 if the variable has a constant value the referring expression can
18662 take advantage of that fact. */
18663 if (TREE_CODE (d
) == VAR_DECL
18664 || DECL_DECLARED_CONSTEXPR_P (d
))
18667 /* Don't instantiate cloned functions. Instead, instantiate the
18668 functions they cloned. */
18669 if (TREE_CODE (d
) == FUNCTION_DECL
&& DECL_CLONED_FUNCTION_P (d
))
18670 d
= DECL_CLONED_FUNCTION (d
);
18672 if (DECL_TEMPLATE_INSTANTIATED (d
)
18673 || (TREE_CODE (d
) == FUNCTION_DECL
18674 && DECL_DEFAULTED_FN (d
) && DECL_INITIAL (d
))
18675 || DECL_TEMPLATE_SPECIALIZATION (d
))
18676 /* D has already been instantiated or explicitly specialized, so
18677 there's nothing for us to do here.
18679 It might seem reasonable to check whether or not D is an explicit
18680 instantiation, and, if so, stop here. But when an explicit
18681 instantiation is deferred until the end of the compilation,
18682 DECL_EXPLICIT_INSTANTIATION is set, even though we still need to do
18683 the instantiation. */
18686 /* Check to see whether we know that this template will be
18687 instantiated in some other file, as with "extern template"
18689 external_p
= (DECL_INTERFACE_KNOWN (d
) && DECL_REALLY_EXTERN (d
));
18691 /* In general, we do not instantiate such templates. */
18692 if (external_p
&& !always_instantiate_p (d
))
18695 gen_tmpl
= most_general_template (tmpl
);
18696 gen_args
= DECL_TI_ARGS (d
);
18698 if (tmpl
!= gen_tmpl
)
18699 /* We should already have the extra args. */
18700 gcc_assert (TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (gen_tmpl
))
18701 == TMPL_ARGS_DEPTH (gen_args
));
18702 /* And what's in the hash table should match D. */
18703 gcc_assert ((spec
= retrieve_specialization (gen_tmpl
, gen_args
, 0)) == d
18704 || spec
== NULL_TREE
);
18706 /* This needs to happen before any tsubsting. */
18707 if (! push_tinst_level (d
))
18710 timevar_push (TV_TEMPLATE_INST
);
18712 /* Set TD to the template whose DECL_TEMPLATE_RESULT is the pattern
18713 for the instantiation. */
18714 td
= template_for_substitution (d
);
18715 code_pattern
= DECL_TEMPLATE_RESULT (td
);
18717 /* We should never be trying to instantiate a member of a class
18718 template or partial specialization. */
18719 gcc_assert (d
!= code_pattern
);
18721 if ((DECL_NAMESPACE_SCOPE_P (d
) && !DECL_INITIALIZED_IN_CLASS_P (d
))
18722 || DECL_TEMPLATE_SPECIALIZATION (td
))
18723 /* In the case of a friend template whose definition is provided
18724 outside the class, we may have too many arguments. Drop the
18725 ones we don't need. The same is true for specializations. */
18726 args
= get_innermost_template_args
18727 (gen_args
, TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (td
)));
18731 if (TREE_CODE (d
) == FUNCTION_DECL
)
18732 pattern_defined
= (DECL_SAVED_TREE (code_pattern
) != NULL_TREE
18733 || DECL_DEFAULTED_OUTSIDE_CLASS_P (code_pattern
));
18735 pattern_defined
= ! DECL_IN_AGGR_P (code_pattern
);
18737 /* We may be in the middle of deferred access check. Disable it now. */
18738 push_deferring_access_checks (dk_no_deferred
);
18740 /* Unless an explicit instantiation directive has already determined
18741 the linkage of D, remember that a definition is available for
18743 if (pattern_defined
18744 && !DECL_INTERFACE_KNOWN (d
)
18745 && !DECL_NOT_REALLY_EXTERN (d
))
18746 mark_definable (d
);
18748 DECL_SOURCE_LOCATION (td
) = DECL_SOURCE_LOCATION (code_pattern
);
18749 DECL_SOURCE_LOCATION (d
) = DECL_SOURCE_LOCATION (code_pattern
);
18750 input_location
= DECL_SOURCE_LOCATION (d
);
18752 /* If D is a member of an explicitly instantiated class template,
18753 and no definition is available, treat it like an implicit
18755 if (!pattern_defined
&& expl_inst_class_mem_p
18756 && DECL_EXPLICIT_INSTANTIATION (d
))
18758 /* Leave linkage flags alone on instantiations with anonymous
18760 if (TREE_PUBLIC (d
))
18762 DECL_NOT_REALLY_EXTERN (d
) = 0;
18763 DECL_INTERFACE_KNOWN (d
) = 0;
18765 SET_DECL_IMPLICIT_INSTANTIATION (d
);
18768 if (TREE_CODE (d
) == FUNCTION_DECL
)
18769 maybe_instantiate_noexcept (d
);
18771 /* Defer all other templates, unless we have been explicitly
18772 forbidden from doing so. */
18773 if (/* If there is no definition, we cannot instantiate the
18776 /* If it's OK to postpone instantiation, do so. */
18778 /* If this is a static data member that will be defined
18779 elsewhere, we don't want to instantiate the entire data
18780 member, but we do want to instantiate the initializer so that
18781 we can substitute that elsewhere. */
18782 || (external_p
&& TREE_CODE (d
) == VAR_DECL
))
18784 /* The definition of the static data member is now required so
18785 we must substitute the initializer. */
18786 if (TREE_CODE (d
) == VAR_DECL
18787 && !DECL_INITIAL (d
)
18788 && DECL_INITIAL (code_pattern
))
18792 bool const_init
= false;
18794 ns
= decl_namespace_context (d
);
18795 push_nested_namespace (ns
);
18796 push_nested_class (DECL_CONTEXT (d
));
18797 init
= tsubst_expr (DECL_INITIAL (code_pattern
),
18799 tf_warning_or_error
, NULL_TREE
,
18800 /*integral_constant_expression_p=*/false);
18801 /* Make sure the initializer is still constant, in case of
18802 circular dependency (template/instantiate6.C). */
18804 = DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (code_pattern
);
18805 cp_finish_decl (d
, init
, /*init_const_expr_p=*/const_init
,
18806 /*asmspec_tree=*/NULL_TREE
,
18807 LOOKUP_ONLYCONVERTING
);
18808 pop_nested_class ();
18809 pop_nested_namespace (ns
);
18812 /* We restore the source position here because it's used by
18813 add_pending_template. */
18814 input_location
= saved_loc
;
18816 if (at_eof
&& !pattern_defined
18817 && DECL_EXPLICIT_INSTANTIATION (d
)
18818 && DECL_NOT_REALLY_EXTERN (d
))
18821 The definition of a non-exported function template, a
18822 non-exported member function template, or a non-exported
18823 member function or static data member of a class template
18824 shall be present in every translation unit in which it is
18825 explicitly instantiated. */
18826 permerror (input_location
, "explicit instantiation of %qD "
18827 "but no definition available", d
);
18829 /* If we're in unevaluated context, we just wanted to get the
18830 constant value; this isn't an odr use, so don't queue
18831 a full instantiation. */
18832 if (cp_unevaluated_operand
!= 0)
18834 /* ??? Historically, we have instantiated inline functions, even
18835 when marked as "extern template". */
18836 if (!(external_p
&& TREE_CODE (d
) == VAR_DECL
))
18837 add_pending_template (d
);
18840 /* Tell the repository that D is available in this translation unit
18841 -- and see if it is supposed to be instantiated here. */
18842 if (TREE_PUBLIC (d
) && !DECL_REALLY_EXTERN (d
) && !repo_emit_p (d
))
18844 /* In a PCH file, despite the fact that the repository hasn't
18845 requested instantiation in the PCH it is still possible that
18846 an instantiation will be required in a file that includes the
18849 add_pending_template (d
);
18850 /* Instantiate inline functions so that the inliner can do its
18851 job, even though we'll not be emitting a copy of this
18853 if (!(TREE_CODE (d
) == FUNCTION_DECL
&& possibly_inlined_p (d
)))
18857 fn_context
= decl_function_context (d
);
18858 nested
= (current_function_decl
!= NULL_TREE
);
18860 push_to_top_level ();
18862 push_function_context ();
18864 /* Mark D as instantiated so that recursive calls to
18865 instantiate_decl do not try to instantiate it again. */
18866 DECL_TEMPLATE_INSTANTIATED (d
) = 1;
18868 /* Regenerate the declaration in case the template has been modified
18869 by a subsequent redeclaration. */
18870 regenerate_decl_from_template (d
, td
);
18872 /* We already set the file and line above. Reset them now in case
18873 they changed as a result of calling regenerate_decl_from_template. */
18874 input_location
= DECL_SOURCE_LOCATION (d
);
18876 if (TREE_CODE (d
) == VAR_DECL
)
18879 bool const_init
= false;
18881 /* Clear out DECL_RTL; whatever was there before may not be right
18882 since we've reset the type of the declaration. */
18883 SET_DECL_RTL (d
, NULL
);
18884 DECL_IN_AGGR_P (d
) = 0;
18886 /* The initializer is placed in DECL_INITIAL by
18887 regenerate_decl_from_template so we don't need to
18888 push/pop_access_scope again here. Pull it out so that
18889 cp_finish_decl can process it. */
18890 init
= DECL_INITIAL (d
);
18891 DECL_INITIAL (d
) = NULL_TREE
;
18892 DECL_INITIALIZED_P (d
) = 0;
18894 /* Clear DECL_EXTERNAL so that cp_finish_decl will process the
18895 initializer. That function will defer actual emission until
18896 we have a chance to determine linkage. */
18897 DECL_EXTERNAL (d
) = 0;
18899 /* Enter the scope of D so that access-checking works correctly. */
18900 push_nested_class (DECL_CONTEXT (d
));
18901 const_init
= DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (code_pattern
);
18902 cp_finish_decl (d
, init
, const_init
, NULL_TREE
, 0);
18903 pop_nested_class ();
18905 else if (TREE_CODE (d
) == FUNCTION_DECL
&& DECL_DEFAULTED_FN (code_pattern
))
18906 synthesize_method (d
);
18907 else if (TREE_CODE (d
) == FUNCTION_DECL
)
18909 struct pointer_map_t
*saved_local_specializations
;
18914 /* Save away the current list, in case we are instantiating one
18915 template from within the body of another. */
18916 saved_local_specializations
= local_specializations
;
18918 /* Set up the list of local specializations. */
18919 local_specializations
= pointer_map_create ();
18921 /* Set up context. */
18922 start_preparsed_function (d
, NULL_TREE
, SF_PRE_PARSED
);
18924 /* Some typedefs referenced from within the template code need to be
18925 access checked at template instantiation time, i.e now. These
18926 types were added to the template at parsing time. Let's get those
18927 and perform the access checks then. */
18928 perform_typedefs_access_check (DECL_TEMPLATE_RESULT (gen_tmpl
),
18931 /* Create substitution entries for the parameters. */
18932 subst_decl
= DECL_TEMPLATE_RESULT (template_for_substitution (d
));
18933 tmpl_parm
= DECL_ARGUMENTS (subst_decl
);
18934 spec_parm
= DECL_ARGUMENTS (d
);
18935 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (d
))
18937 register_local_specialization (spec_parm
, tmpl_parm
);
18938 spec_parm
= skip_artificial_parms_for (d
, spec_parm
);
18939 tmpl_parm
= skip_artificial_parms_for (subst_decl
, tmpl_parm
);
18941 for (; tmpl_parm
; tmpl_parm
= DECL_CHAIN (tmpl_parm
))
18943 if (!FUNCTION_PARAMETER_PACK_P (tmpl_parm
))
18945 register_local_specialization (spec_parm
, tmpl_parm
);
18946 spec_parm
= DECL_CHAIN (spec_parm
);
18950 /* Register the (value) argument pack as a specialization of
18951 TMPL_PARM, then move on. */
18952 tree argpack
= extract_fnparm_pack (tmpl_parm
, &spec_parm
);
18953 register_local_specialization (argpack
, tmpl_parm
);
18956 gcc_assert (!spec_parm
);
18958 /* Substitute into the body of the function. */
18959 tsubst_expr (DECL_SAVED_TREE (code_pattern
), args
,
18960 tf_warning_or_error
, tmpl
,
18961 /*integral_constant_expression_p=*/false);
18963 /* Set the current input_location to the end of the function
18964 so that finish_function knows where we are. */
18965 input_location
= DECL_STRUCT_FUNCTION (code_pattern
)->function_end_locus
;
18967 /* We don't need the local specializations any more. */
18968 pointer_map_destroy (local_specializations
);
18969 local_specializations
= saved_local_specializations
;
18971 /* Finish the function. */
18972 d
= finish_function (0);
18973 expand_or_defer_fn (d
);
18976 /* We're not deferring instantiation any more. */
18977 TI_PENDING_TEMPLATE_FLAG (DECL_TEMPLATE_INFO (d
)) = 0;
18980 pop_from_top_level ();
18982 pop_function_context ();
18985 input_location
= saved_loc
;
18986 pop_deferring_access_checks ();
18987 pop_tinst_level ();
18989 timevar_pop (TV_TEMPLATE_INST
);
18994 /* Run through the list of templates that we wish we could
18995 instantiate, and instantiate any we can. RETRIES is the
18996 number of times we retry pending template instantiation. */
18999 instantiate_pending_templates (int retries
)
19002 location_t saved_loc
= input_location
;
19004 /* Instantiating templates may trigger vtable generation. This in turn
19005 may require further template instantiations. We place a limit here
19006 to avoid infinite loop. */
19007 if (pending_templates
&& retries
>= max_tinst_depth
)
19009 tree decl
= pending_templates
->tinst
->decl
;
19011 error ("template instantiation depth exceeds maximum of %d"
19012 " instantiating %q+D, possibly from virtual table generation"
19013 " (use -ftemplate-depth= to increase the maximum)",
19014 max_tinst_depth
, decl
);
19015 if (TREE_CODE (decl
) == FUNCTION_DECL
)
19016 /* Pretend that we defined it. */
19017 DECL_INITIAL (decl
) = error_mark_node
;
19023 struct pending_template
**t
= &pending_templates
;
19024 struct pending_template
*last
= NULL
;
19028 tree instantiation
= reopen_tinst_level ((*t
)->tinst
);
19029 bool complete
= false;
19031 if (TYPE_P (instantiation
))
19035 if (!COMPLETE_TYPE_P (instantiation
))
19037 instantiate_class_template (instantiation
);
19038 if (CLASSTYPE_TEMPLATE_INSTANTIATION (instantiation
))
19039 for (fn
= TYPE_METHODS (instantiation
);
19041 fn
= TREE_CHAIN (fn
))
19042 if (! DECL_ARTIFICIAL (fn
))
19043 instantiate_decl (fn
,
19045 /*expl_inst_class_mem_p=*/false);
19046 if (COMPLETE_TYPE_P (instantiation
))
19050 complete
= COMPLETE_TYPE_P (instantiation
);
19054 if (!DECL_TEMPLATE_SPECIALIZATION (instantiation
)
19055 && !DECL_TEMPLATE_INSTANTIATED (instantiation
))
19058 = instantiate_decl (instantiation
,
19060 /*expl_inst_class_mem_p=*/false);
19061 if (DECL_TEMPLATE_INSTANTIATED (instantiation
))
19065 complete
= (DECL_TEMPLATE_SPECIALIZATION (instantiation
)
19066 || DECL_TEMPLATE_INSTANTIATED (instantiation
));
19070 /* If INSTANTIATION has been instantiated, then we don't
19071 need to consider it again in the future. */
19079 current_tinst_level
= NULL
;
19081 last_pending_template
= last
;
19083 while (reconsider
);
19085 input_location
= saved_loc
;
19088 /* Substitute ARGVEC into T, which is a list of initializers for
19089 either base class or a non-static data member. The TREE_PURPOSEs
19090 are DECLs, and the TREE_VALUEs are the initializer values. Used by
19091 instantiate_decl. */
19094 tsubst_initializer_list (tree t
, tree argvec
)
19096 tree inits
= NULL_TREE
;
19098 for (; t
; t
= TREE_CHAIN (t
))
19102 tree expanded_bases
= NULL_TREE
;
19103 tree expanded_arguments
= NULL_TREE
;
19106 if (TREE_CODE (TREE_PURPOSE (t
)) == TYPE_PACK_EXPANSION
)
19111 /* Expand the base class expansion type into separate base
19113 expanded_bases
= tsubst_pack_expansion (TREE_PURPOSE (t
), argvec
,
19114 tf_warning_or_error
,
19116 if (expanded_bases
== error_mark_node
)
19119 /* We'll be building separate TREE_LISTs of arguments for
19121 len
= TREE_VEC_LENGTH (expanded_bases
);
19122 expanded_arguments
= make_tree_vec (len
);
19123 for (i
= 0; i
< len
; i
++)
19124 TREE_VEC_ELT (expanded_arguments
, i
) = NULL_TREE
;
19126 /* Build a dummy EXPR_PACK_EXPANSION that will be used to
19127 expand each argument in the TREE_VALUE of t. */
19128 expr
= make_node (EXPR_PACK_EXPANSION
);
19129 PACK_EXPANSION_LOCAL_P (expr
) = true;
19130 PACK_EXPANSION_PARAMETER_PACKS (expr
) =
19131 PACK_EXPANSION_PARAMETER_PACKS (TREE_PURPOSE (t
));
19133 if (TREE_VALUE (t
) == void_type_node
)
19134 /* VOID_TYPE_NODE is used to indicate
19135 value-initialization. */
19137 for (i
= 0; i
< len
; i
++)
19138 TREE_VEC_ELT (expanded_arguments
, i
) = void_type_node
;
19142 /* Substitute parameter packs into each argument in the
19144 in_base_initializer
= 1;
19145 for (arg
= TREE_VALUE (t
); arg
; arg
= TREE_CHAIN (arg
))
19147 tree expanded_exprs
;
19149 /* Expand the argument. */
19150 SET_PACK_EXPANSION_PATTERN (expr
, TREE_VALUE (arg
));
19152 = tsubst_pack_expansion (expr
, argvec
,
19153 tf_warning_or_error
,
19155 if (expanded_exprs
== error_mark_node
)
19158 /* Prepend each of the expanded expressions to the
19159 corresponding TREE_LIST in EXPANDED_ARGUMENTS. */
19160 for (i
= 0; i
< len
; i
++)
19162 TREE_VEC_ELT (expanded_arguments
, i
) =
19163 tree_cons (NULL_TREE
,
19164 TREE_VEC_ELT (expanded_exprs
, i
),
19165 TREE_VEC_ELT (expanded_arguments
, i
));
19168 in_base_initializer
= 0;
19170 /* Reverse all of the TREE_LISTs in EXPANDED_ARGUMENTS,
19171 since we built them backwards. */
19172 for (i
= 0; i
< len
; i
++)
19174 TREE_VEC_ELT (expanded_arguments
, i
) =
19175 nreverse (TREE_VEC_ELT (expanded_arguments
, i
));
19180 for (i
= 0; i
< len
; ++i
)
19182 if (expanded_bases
)
19184 decl
= TREE_VEC_ELT (expanded_bases
, i
);
19185 decl
= expand_member_init (decl
);
19186 init
= TREE_VEC_ELT (expanded_arguments
, i
);
19191 decl
= tsubst_copy (TREE_PURPOSE (t
), argvec
,
19192 tf_warning_or_error
, NULL_TREE
);
19194 decl
= expand_member_init (decl
);
19195 if (decl
&& !DECL_P (decl
))
19196 in_base_initializer
= 1;
19198 init
= TREE_VALUE (t
);
19200 if (init
!= void_type_node
)
19201 init
= tsubst_expr (init
, argvec
,
19202 tf_warning_or_error
, NULL_TREE
,
19203 /*integral_constant_expression_p=*/false);
19204 if (init
== NULL_TREE
&& tmp
!= NULL_TREE
)
19205 /* If we had an initializer but it instantiated to nothing,
19206 value-initialize the object. This will only occur when
19207 the initializer was a pack expansion where the parameter
19208 packs used in that expansion were of length zero. */
19209 init
= void_type_node
;
19210 in_base_initializer
= 0;
19215 init
= build_tree_list (decl
, init
);
19216 TREE_CHAIN (init
) = inits
;
19224 /* Set CURRENT_ACCESS_SPECIFIER based on the protection of DECL. */
19227 set_current_access_from_decl (tree decl
)
19229 if (TREE_PRIVATE (decl
))
19230 current_access_specifier
= access_private_node
;
19231 else if (TREE_PROTECTED (decl
))
19232 current_access_specifier
= access_protected_node
;
19234 current_access_specifier
= access_public_node
;
19237 /* Instantiate an enumerated type. TAG is the template type, NEWTAG
19238 is the instantiation (which should have been created with
19239 start_enum) and ARGS are the template arguments to use. */
19242 tsubst_enum (tree tag
, tree newtag
, tree args
)
19246 if (SCOPED_ENUM_P (newtag
))
19247 begin_scope (sk_scoped_enum
, newtag
);
19249 for (e
= TYPE_VALUES (tag
); e
; e
= TREE_CHAIN (e
))
19254 decl
= TREE_VALUE (e
);
19255 /* Note that in a template enum, the TREE_VALUE is the
19256 CONST_DECL, not the corresponding INTEGER_CST. */
19257 value
= tsubst_expr (DECL_INITIAL (decl
),
19258 args
, tf_warning_or_error
, NULL_TREE
,
19259 /*integral_constant_expression_p=*/true);
19261 /* Give this enumeration constant the correct access. */
19262 set_current_access_from_decl (decl
);
19264 /* Actually build the enumerator itself. */
19266 (DECL_NAME (decl
), value
, newtag
, DECL_SOURCE_LOCATION (decl
));
19269 if (SCOPED_ENUM_P (newtag
))
19272 finish_enum_value_list (newtag
);
19273 finish_enum (newtag
);
19275 DECL_SOURCE_LOCATION (TYPE_NAME (newtag
))
19276 = DECL_SOURCE_LOCATION (TYPE_NAME (tag
));
19279 /* DECL is a FUNCTION_DECL that is a template specialization. Return
19280 its type -- but without substituting the innermost set of template
19281 arguments. So, innermost set of template parameters will appear in
19285 get_mostly_instantiated_function_type (tree decl
)
19293 tmpl
= most_general_template (DECL_TI_TEMPLATE (decl
));
19294 targs
= DECL_TI_ARGS (decl
);
19295 tparms
= DECL_TEMPLATE_PARMS (tmpl
);
19296 parm_depth
= TMPL_PARMS_DEPTH (tparms
);
19298 /* There should be as many levels of arguments as there are levels
19300 gcc_assert (parm_depth
== TMPL_ARGS_DEPTH (targs
));
19302 fn_type
= TREE_TYPE (tmpl
);
19304 if (parm_depth
== 1)
19305 /* No substitution is necessary. */
19312 /* Replace the innermost level of the TARGS with NULL_TREEs to
19313 let tsubst know not to substitute for those parameters. */
19314 partial_args
= make_tree_vec (TREE_VEC_LENGTH (targs
));
19315 for (i
= 1; i
< TMPL_ARGS_DEPTH (targs
); ++i
)
19316 SET_TMPL_ARGS_LEVEL (partial_args
, i
,
19317 TMPL_ARGS_LEVEL (targs
, i
));
19318 SET_TMPL_ARGS_LEVEL (partial_args
,
19319 TMPL_ARGS_DEPTH (targs
),
19320 make_tree_vec (DECL_NTPARMS (tmpl
)));
19322 /* Make sure that we can see identifiers, and compute access
19324 push_access_scope (decl
);
19326 ++processing_template_decl
;
19327 /* Now, do the (partial) substitution to figure out the
19328 appropriate function type. */
19329 fn_type
= tsubst (fn_type
, partial_args
, tf_error
, NULL_TREE
);
19330 --processing_template_decl
;
19332 /* Substitute into the template parameters to obtain the real
19333 innermost set of parameters. This step is important if the
19334 innermost set of template parameters contains value
19335 parameters whose types depend on outer template parameters. */
19336 TREE_VEC_LENGTH (partial_args
)--;
19337 tparms
= tsubst_template_parms (tparms
, partial_args
, tf_error
);
19339 pop_access_scope (decl
);
19345 /* Return truthvalue if we're processing a template different from
19346 the last one involved in diagnostics. */
19348 problematic_instantiation_changed (void)
19350 return current_tinst_level
!= last_error_tinst_level
;
19353 /* Remember current template involved in diagnostics. */
19355 record_last_problematic_instantiation (void)
19357 last_error_tinst_level
= current_tinst_level
;
19360 struct tinst_level
*
19361 current_instantiation (void)
19363 return current_tinst_level
;
19366 /* [temp.param] Check that template non-type parm TYPE is of an allowable
19367 type. Return zero for ok, nonzero for disallowed. Issue error and
19368 warning messages under control of COMPLAIN. */
19371 invalid_nontype_parm_type_p (tree type
, tsubst_flags_t complain
)
19373 if (INTEGRAL_OR_ENUMERATION_TYPE_P (type
))
19375 else if (POINTER_TYPE_P (type
))
19377 else if (TYPE_PTRMEM_P (type
))
19379 else if (TREE_CODE (type
) == TEMPLATE_TYPE_PARM
)
19381 else if (TREE_CODE (type
) == TYPENAME_TYPE
)
19383 else if (TREE_CODE (type
) == DECLTYPE_TYPE
)
19385 else if (TREE_CODE (type
) == NULLPTR_TYPE
)
19388 if (complain
& tf_error
)
19390 if (type
== error_mark_node
)
19391 inform (input_location
, "invalid template non-type parameter");
19393 error ("%q#T is not a valid type for a template non-type parameter",
19399 /* Returns TRUE if TYPE is dependent, in the sense of [temp.dep.type].
19400 Assumes that TYPE really is a type, and not the ERROR_MARK_NODE.*/
19403 dependent_type_p_r (tree type
)
19409 A type is dependent if it is:
19411 -- a template parameter. Template template parameters are types
19412 for us (since TYPE_P holds true for them) so we handle
19414 if (TREE_CODE (type
) == TEMPLATE_TYPE_PARM
19415 || TREE_CODE (type
) == TEMPLATE_TEMPLATE_PARM
)
19417 /* -- a qualified-id with a nested-name-specifier which contains a
19418 class-name that names a dependent type or whose unqualified-id
19419 names a dependent type. */
19420 if (TREE_CODE (type
) == TYPENAME_TYPE
)
19422 /* -- a cv-qualified type where the cv-unqualified type is
19424 type
= TYPE_MAIN_VARIANT (type
);
19425 /* -- a compound type constructed from any dependent type. */
19426 if (TYPE_PTRMEM_P (type
))
19427 return (dependent_type_p (TYPE_PTRMEM_CLASS_TYPE (type
))
19428 || dependent_type_p (TYPE_PTRMEM_POINTED_TO_TYPE
19430 else if (TREE_CODE (type
) == POINTER_TYPE
19431 || TREE_CODE (type
) == REFERENCE_TYPE
)
19432 return dependent_type_p (TREE_TYPE (type
));
19433 else if (TREE_CODE (type
) == FUNCTION_TYPE
19434 || TREE_CODE (type
) == METHOD_TYPE
)
19438 if (dependent_type_p (TREE_TYPE (type
)))
19440 for (arg_type
= TYPE_ARG_TYPES (type
);
19442 arg_type
= TREE_CHAIN (arg_type
))
19443 if (dependent_type_p (TREE_VALUE (arg_type
)))
19447 /* -- an array type constructed from any dependent type or whose
19448 size is specified by a constant expression that is
19451 We checked for type- and value-dependence of the bounds in
19452 compute_array_index_type, so TYPE_DEPENDENT_P is already set. */
19453 if (TREE_CODE (type
) == ARRAY_TYPE
)
19455 if (TYPE_DOMAIN (type
)
19456 && dependent_type_p (TYPE_DOMAIN (type
)))
19458 return dependent_type_p (TREE_TYPE (type
));
19461 /* -- a template-id in which either the template name is a template
19463 if (TREE_CODE (type
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
19465 /* ... or any of the template arguments is a dependent type or
19466 an expression that is type-dependent or value-dependent. */
19467 else if (CLASS_TYPE_P (type
) && CLASSTYPE_TEMPLATE_INFO (type
)
19468 && (any_dependent_template_arguments_p
19469 (INNERMOST_TEMPLATE_ARGS (CLASSTYPE_TI_ARGS (type
)))))
19472 /* All TYPEOF_TYPEs, DECLTYPE_TYPEs, and UNDERLYING_TYPEs are
19473 dependent; if the argument of the `typeof' expression is not
19474 type-dependent, then it should already been have resolved. */
19475 if (TREE_CODE (type
) == TYPEOF_TYPE
19476 || TREE_CODE (type
) == DECLTYPE_TYPE
19477 || TREE_CODE (type
) == UNDERLYING_TYPE
)
19480 /* A template argument pack is dependent if any of its packed
19482 if (TREE_CODE (type
) == TYPE_ARGUMENT_PACK
)
19484 tree args
= ARGUMENT_PACK_ARGS (type
);
19485 int i
, len
= TREE_VEC_LENGTH (args
);
19486 for (i
= 0; i
< len
; ++i
)
19487 if (dependent_template_arg_p (TREE_VEC_ELT (args
, i
)))
19491 /* All TYPE_PACK_EXPANSIONs are dependent, because parameter packs must
19492 be template parameters. */
19493 if (TREE_CODE (type
) == TYPE_PACK_EXPANSION
)
19496 /* The standard does not specifically mention types that are local
19497 to template functions or local classes, but they should be
19498 considered dependent too. For example:
19500 template <int I> void f() {
19505 The size of `E' cannot be known until the value of `I' has been
19506 determined. Therefore, `E' must be considered dependent. */
19507 scope
= TYPE_CONTEXT (type
);
19508 if (scope
&& TYPE_P (scope
))
19509 return dependent_type_p (scope
);
19510 /* Don't use type_dependent_expression_p here, as it can lead
19511 to infinite recursion trying to determine whether a lambda
19512 nested in a lambda is dependent (c++/47687). */
19513 else if (scope
&& TREE_CODE (scope
) == FUNCTION_DECL
19514 && DECL_LANG_SPECIFIC (scope
)
19515 && DECL_TEMPLATE_INFO (scope
)
19516 && (any_dependent_template_arguments_p
19517 (INNERMOST_TEMPLATE_ARGS (DECL_TI_ARGS (scope
)))))
19520 /* Other types are non-dependent. */
19524 /* Returns TRUE if TYPE is dependent, in the sense of
19525 [temp.dep.type]. Note that a NULL type is considered dependent. */
19528 dependent_type_p (tree type
)
19530 /* If there are no template parameters in scope, then there can't be
19531 any dependent types. */
19532 if (!processing_template_decl
)
19534 /* If we are not processing a template, then nobody should be
19535 providing us with a dependent type. */
19537 gcc_assert (TREE_CODE (type
) != TEMPLATE_TYPE_PARM
|| is_auto (type
));
19541 /* If the type is NULL, we have not computed a type for the entity
19542 in question; in that case, the type is dependent. */
19546 /* Erroneous types can be considered non-dependent. */
19547 if (type
== error_mark_node
)
19550 /* If we have not already computed the appropriate value for TYPE,
19552 if (!TYPE_DEPENDENT_P_VALID (type
))
19554 TYPE_DEPENDENT_P (type
) = dependent_type_p_r (type
);
19555 TYPE_DEPENDENT_P_VALID (type
) = 1;
19558 return TYPE_DEPENDENT_P (type
);
19561 /* Returns TRUE if SCOPE is a dependent scope, in which we can't do any
19562 lookup. In other words, a dependent type that is not the current
19566 dependent_scope_p (tree scope
)
19568 return (scope
&& TYPE_P (scope
) && dependent_type_p (scope
)
19569 && !currently_open_class (scope
));
19572 /* T is a SCOPE_REF; return whether we need to consider it
19573 instantiation-dependent so that we can check access at instantiation
19574 time even though we know which member it resolves to. */
19577 instantiation_dependent_scope_ref_p (tree t
)
19579 if (DECL_P (TREE_OPERAND (t
, 1))
19580 && CLASS_TYPE_P (TREE_OPERAND (t
, 0))
19581 && accessible_in_template_p (TREE_OPERAND (t
, 0),
19582 TREE_OPERAND (t
, 1)))
19588 /* Returns TRUE if the EXPRESSION is value-dependent, in the sense of
19589 [temp.dep.constexpr]. EXPRESSION is already known to be a constant
19592 /* Note that this predicate is not appropriate for general expressions;
19593 only constant expressions (that satisfy potential_constant_expression)
19594 can be tested for value dependence. */
19597 value_dependent_expression_p (tree expression
)
19599 if (!processing_template_decl
)
19602 /* A name declared with a dependent type. */
19603 if (DECL_P (expression
) && type_dependent_expression_p (expression
))
19606 switch (TREE_CODE (expression
))
19608 case IDENTIFIER_NODE
:
19609 /* A name that has not been looked up -- must be dependent. */
19612 case TEMPLATE_PARM_INDEX
:
19613 /* A non-type template parm. */
19617 /* A non-type template parm. */
19618 if (DECL_TEMPLATE_PARM_P (expression
))
19620 return value_dependent_expression_p (DECL_INITIAL (expression
));
19623 /* A constant with literal type and is initialized
19624 with an expression that is value-dependent.
19626 Note that a non-dependent parenthesized initializer will have
19627 already been replaced with its constant value, so if we see
19628 a TREE_LIST it must be dependent. */
19629 if (DECL_INITIAL (expression
)
19630 && decl_constant_var_p (expression
)
19631 && (TREE_CODE (DECL_INITIAL (expression
)) == TREE_LIST
19632 || value_dependent_expression_p (DECL_INITIAL (expression
))))
19636 case DYNAMIC_CAST_EXPR
:
19637 case STATIC_CAST_EXPR
:
19638 case CONST_CAST_EXPR
:
19639 case REINTERPRET_CAST_EXPR
:
19641 /* These expressions are value-dependent if the type to which
19642 the cast occurs is dependent or the expression being casted
19643 is value-dependent. */
19645 tree type
= TREE_TYPE (expression
);
19647 if (dependent_type_p (type
))
19650 /* A functional cast has a list of operands. */
19651 expression
= TREE_OPERAND (expression
, 0);
19654 /* If there are no operands, it must be an expression such
19655 as "int()". This should not happen for aggregate types
19656 because it would form non-constant expressions. */
19657 gcc_assert (cxx_dialect
>= cxx0x
19658 || INTEGRAL_OR_ENUMERATION_TYPE_P (type
));
19663 if (TREE_CODE (expression
) == TREE_LIST
)
19664 return any_value_dependent_elements_p (expression
);
19666 return value_dependent_expression_p (expression
);
19670 if (SIZEOF_EXPR_TYPE_P (expression
))
19671 return dependent_type_p (TREE_TYPE (TREE_OPERAND (expression
, 0)));
19675 /* A `sizeof' expression is value-dependent if the operand is
19676 type-dependent or is a pack expansion. */
19677 expression
= TREE_OPERAND (expression
, 0);
19678 if (PACK_EXPANSION_P (expression
))
19680 else if (TYPE_P (expression
))
19681 return dependent_type_p (expression
);
19682 return instantiation_dependent_expression_p (expression
);
19684 case AT_ENCODE_EXPR
:
19685 /* An 'encode' expression is value-dependent if the operand is
19687 expression
= TREE_OPERAND (expression
, 0);
19688 return dependent_type_p (expression
);
19690 case NOEXCEPT_EXPR
:
19691 expression
= TREE_OPERAND (expression
, 0);
19692 return instantiation_dependent_expression_p (expression
);
19695 /* All instantiation-dependent expressions should also be considered
19696 value-dependent. */
19697 return instantiation_dependent_scope_ref_p (expression
);
19699 case COMPONENT_REF
:
19700 return (value_dependent_expression_p (TREE_OPERAND (expression
, 0))
19701 || value_dependent_expression_p (TREE_OPERAND (expression
, 1)));
19703 case NONTYPE_ARGUMENT_PACK
:
19704 /* A NONTYPE_ARGUMENT_PACK is value-dependent if any packed argument
19705 is value-dependent. */
19707 tree values
= ARGUMENT_PACK_ARGS (expression
);
19708 int i
, len
= TREE_VEC_LENGTH (values
);
19710 for (i
= 0; i
< len
; ++i
)
19711 if (value_dependent_expression_p (TREE_VEC_ELT (values
, i
)))
19719 tree type2
= TRAIT_EXPR_TYPE2 (expression
);
19720 return (dependent_type_p (TRAIT_EXPR_TYPE1 (expression
))
19721 || (type2
? dependent_type_p (type2
) : false));
19725 return ((value_dependent_expression_p (TREE_OPERAND (expression
, 0)))
19726 || (value_dependent_expression_p (TREE_OPERAND (expression
, 2))));
19729 return ((value_dependent_expression_p (TREE_OPERAND (expression
, 0)))
19730 || (value_dependent_expression_p (TREE_OPERAND (expression
, 1))));
19734 tree op
= TREE_OPERAND (expression
, 0);
19735 return (value_dependent_expression_p (op
)
19736 || has_value_dependent_address (op
));
19741 tree fn
= get_callee_fndecl (expression
);
19743 if (!fn
&& value_dependent_expression_p (CALL_EXPR_FN (expression
)))
19745 nargs
= call_expr_nargs (expression
);
19746 for (i
= 0; i
< nargs
; ++i
)
19748 tree op
= CALL_EXPR_ARG (expression
, i
);
19749 /* In a call to a constexpr member function, look through the
19750 implicit ADDR_EXPR on the object argument so that it doesn't
19751 cause the call to be considered value-dependent. We also
19752 look through it in potential_constant_expression. */
19753 if (i
== 0 && fn
&& DECL_DECLARED_CONSTEXPR_P (fn
)
19754 && DECL_NONSTATIC_MEMBER_FUNCTION_P (fn
)
19755 && TREE_CODE (op
) == ADDR_EXPR
)
19756 op
= TREE_OPERAND (op
, 0);
19757 if (value_dependent_expression_p (op
))
19763 case TEMPLATE_ID_EXPR
:
19764 /* If a TEMPLATE_ID_EXPR involves a dependent name, it will be
19766 return type_dependent_expression_p (expression
);
19772 FOR_EACH_CONSTRUCTOR_VALUE (CONSTRUCTOR_ELTS (expression
), ix
, val
)
19773 if (value_dependent_expression_p (val
))
19779 /* Treat a GNU statement expression as dependent to avoid crashing
19780 under fold_non_dependent_expr; it can't be constant. */
19784 /* A constant expression is value-dependent if any subexpression is
19785 value-dependent. */
19786 switch (TREE_CODE_CLASS (TREE_CODE (expression
)))
19788 case tcc_reference
:
19790 case tcc_comparison
:
19792 case tcc_expression
:
19795 int i
, len
= cp_tree_operand_length (expression
);
19797 for (i
= 0; i
< len
; i
++)
19799 tree t
= TREE_OPERAND (expression
, i
);
19801 /* In some cases, some of the operands may be missing.l
19802 (For example, in the case of PREDECREMENT_EXPR, the
19803 amount to increment by may be missing.) That doesn't
19804 make the expression dependent. */
19805 if (t
&& value_dependent_expression_p (t
))
19816 /* The expression is not value-dependent. */
19820 /* Returns TRUE if the EXPRESSION is type-dependent, in the sense of
19821 [temp.dep.expr]. Note that an expression with no type is
19822 considered dependent. Other parts of the compiler arrange for an
19823 expression with type-dependent subexpressions to have no type, so
19824 this function doesn't have to be fully recursive. */
19827 type_dependent_expression_p (tree expression
)
19829 if (!processing_template_decl
)
19832 if (expression
== error_mark_node
)
19835 /* An unresolved name is always dependent. */
19836 if (TREE_CODE (expression
) == IDENTIFIER_NODE
19837 || TREE_CODE (expression
) == USING_DECL
)
19840 /* Some expression forms are never type-dependent. */
19841 if (TREE_CODE (expression
) == PSEUDO_DTOR_EXPR
19842 || TREE_CODE (expression
) == SIZEOF_EXPR
19843 || TREE_CODE (expression
) == ALIGNOF_EXPR
19844 || TREE_CODE (expression
) == AT_ENCODE_EXPR
19845 || TREE_CODE (expression
) == NOEXCEPT_EXPR
19846 || TREE_CODE (expression
) == TRAIT_EXPR
19847 || TREE_CODE (expression
) == TYPEID_EXPR
19848 || TREE_CODE (expression
) == DELETE_EXPR
19849 || TREE_CODE (expression
) == VEC_DELETE_EXPR
19850 || TREE_CODE (expression
) == THROW_EXPR
)
19853 /* The types of these expressions depends only on the type to which
19854 the cast occurs. */
19855 if (TREE_CODE (expression
) == DYNAMIC_CAST_EXPR
19856 || TREE_CODE (expression
) == STATIC_CAST_EXPR
19857 || TREE_CODE (expression
) == CONST_CAST_EXPR
19858 || TREE_CODE (expression
) == REINTERPRET_CAST_EXPR
19859 || TREE_CODE (expression
) == IMPLICIT_CONV_EXPR
19860 || TREE_CODE (expression
) == CAST_EXPR
)
19861 return dependent_type_p (TREE_TYPE (expression
));
19863 /* The types of these expressions depends only on the type created
19864 by the expression. */
19865 if (TREE_CODE (expression
) == NEW_EXPR
19866 || TREE_CODE (expression
) == VEC_NEW_EXPR
)
19868 /* For NEW_EXPR tree nodes created inside a template, either
19869 the object type itself or a TREE_LIST may appear as the
19871 tree type
= TREE_OPERAND (expression
, 1);
19872 if (TREE_CODE (type
) == TREE_LIST
)
19873 /* This is an array type. We need to check array dimensions
19875 return dependent_type_p (TREE_VALUE (TREE_PURPOSE (type
)))
19876 || value_dependent_expression_p
19877 (TREE_OPERAND (TREE_VALUE (type
), 1));
19879 return dependent_type_p (type
);
19882 if (TREE_CODE (expression
) == SCOPE_REF
)
19884 tree scope
= TREE_OPERAND (expression
, 0);
19885 tree name
= TREE_OPERAND (expression
, 1);
19887 /* 14.6.2.2 [temp.dep.expr]: An id-expression is type-dependent if it
19888 contains an identifier associated by name lookup with one or more
19889 declarations declared with a dependent type, or...a
19890 nested-name-specifier or qualified-id that names a member of an
19891 unknown specialization. */
19892 return (type_dependent_expression_p (name
)
19893 || dependent_scope_p (scope
));
19896 if (TREE_CODE (expression
) == FUNCTION_DECL
19897 && DECL_LANG_SPECIFIC (expression
)
19898 && DECL_TEMPLATE_INFO (expression
)
19899 && (any_dependent_template_arguments_p
19900 (INNERMOST_TEMPLATE_ARGS (DECL_TI_ARGS (expression
)))))
19903 if (TREE_CODE (expression
) == TEMPLATE_DECL
19904 && !DECL_TEMPLATE_TEMPLATE_PARM_P (expression
))
19907 if (TREE_CODE (expression
) == STMT_EXPR
)
19908 expression
= stmt_expr_value_expr (expression
);
19910 if (BRACE_ENCLOSED_INITIALIZER_P (expression
))
19915 FOR_EACH_CONSTRUCTOR_VALUE (CONSTRUCTOR_ELTS (expression
), i
, elt
)
19917 if (type_dependent_expression_p (elt
))
19923 /* A static data member of the current instantiation with incomplete
19924 array type is type-dependent, as the definition and specializations
19925 can have different bounds. */
19926 if (TREE_CODE (expression
) == VAR_DECL
19927 && DECL_CLASS_SCOPE_P (expression
)
19928 && dependent_type_p (DECL_CONTEXT (expression
))
19929 && VAR_HAD_UNKNOWN_BOUND (expression
))
19932 /* An array of unknown bound depending on a variadic parameter, eg:
19934 template<typename... Args>
19935 void foo (Args... args)
19937 int arr[] = { args... };
19940 template<int... vals>
19943 int arr[] = { vals... };
19946 If the array has no length and has an initializer, it must be that
19947 we couldn't determine its length in cp_complete_array_type because
19948 it is dependent. */
19949 if (TREE_CODE (expression
) == VAR_DECL
19950 && TREE_CODE (TREE_TYPE (expression
)) == ARRAY_TYPE
19951 && !TYPE_DOMAIN (TREE_TYPE (expression
))
19952 && DECL_INITIAL (expression
))
19955 if (TREE_TYPE (expression
) == unknown_type_node
)
19957 if (TREE_CODE (expression
) == ADDR_EXPR
)
19958 return type_dependent_expression_p (TREE_OPERAND (expression
, 0));
19959 if (TREE_CODE (expression
) == COMPONENT_REF
19960 || TREE_CODE (expression
) == OFFSET_REF
)
19962 if (type_dependent_expression_p (TREE_OPERAND (expression
, 0)))
19964 expression
= TREE_OPERAND (expression
, 1);
19965 if (TREE_CODE (expression
) == IDENTIFIER_NODE
)
19968 /* SCOPE_REF with non-null TREE_TYPE is always non-dependent. */
19969 if (TREE_CODE (expression
) == SCOPE_REF
)
19972 /* Always dependent, on the number of arguments if nothing else. */
19973 if (TREE_CODE (expression
) == EXPR_PACK_EXPANSION
)
19976 if (BASELINK_P (expression
))
19977 expression
= BASELINK_FUNCTIONS (expression
);
19979 if (TREE_CODE (expression
) == TEMPLATE_ID_EXPR
)
19981 if (any_dependent_template_arguments_p
19982 (TREE_OPERAND (expression
, 1)))
19984 expression
= TREE_OPERAND (expression
, 0);
19986 gcc_assert (TREE_CODE (expression
) == OVERLOAD
19987 || TREE_CODE (expression
) == FUNCTION_DECL
);
19991 if (type_dependent_expression_p (OVL_CURRENT (expression
)))
19993 expression
= OVL_NEXT (expression
);
19998 gcc_assert (TREE_CODE (expression
) != TYPE_DECL
);
20000 return (dependent_type_p (TREE_TYPE (expression
)));
20003 /* walk_tree callback function for instantiation_dependent_expression_p,
20004 below. Returns non-zero if a dependent subexpression is found. */
20007 instantiation_dependent_r (tree
*tp
, int *walk_subtrees
,
20012 /* We don't have to worry about decltype currently because decltype
20013 of an instantiation-dependent expr is a dependent type. This
20014 might change depending on the resolution of DR 1172. */
20015 *walk_subtrees
= false;
20018 enum tree_code code
= TREE_CODE (*tp
);
20021 /* Don't treat an argument list as dependent just because it has no
20027 case TEMPLATE_PARM_INDEX
:
20030 /* Handle expressions with type operands. */
20034 case AT_ENCODE_EXPR
:
20036 tree op
= TREE_OPERAND (*tp
, 0);
20037 if (code
== SIZEOF_EXPR
&& SIZEOF_EXPR_TYPE_P (*tp
))
20038 op
= TREE_TYPE (op
);
20041 if (dependent_type_p (op
))
20045 *walk_subtrees
= false;
20053 if (dependent_type_p (TRAIT_EXPR_TYPE1 (*tp
))
20054 || (TRAIT_EXPR_TYPE2 (*tp
)
20055 && dependent_type_p (TRAIT_EXPR_TYPE2 (*tp
))))
20057 *walk_subtrees
= false;
20060 case COMPONENT_REF
:
20061 if (TREE_CODE (TREE_OPERAND (*tp
, 1)) == IDENTIFIER_NODE
)
20062 /* In a template, finish_class_member_access_expr creates a
20063 COMPONENT_REF with an IDENTIFIER_NODE for op1 even if it isn't
20064 type-dependent, so that we can check access control at
20065 instantiation time (PR 42277). See also Core issue 1273. */
20070 if (instantiation_dependent_scope_ref_p (*tp
))
20075 /* Treat statement-expressions as dependent. */
20083 if (type_dependent_expression_p (*tp
))
20089 /* Returns TRUE if the EXPRESSION is instantiation-dependent, in the
20090 sense defined by the ABI:
20092 "An expression is instantiation-dependent if it is type-dependent
20093 or value-dependent, or it has a subexpression that is type-dependent
20094 or value-dependent." */
20097 instantiation_dependent_expression_p (tree expression
)
20101 if (!processing_template_decl
)
20104 if (expression
== error_mark_node
)
20107 result
= cp_walk_tree_without_duplicates (&expression
,
20108 instantiation_dependent_r
, NULL
);
20109 return result
!= NULL_TREE
;
20112 /* Like type_dependent_expression_p, but it also works while not processing
20113 a template definition, i.e. during substitution or mangling. */
20116 type_dependent_expression_p_push (tree expr
)
20119 ++processing_template_decl
;
20120 b
= type_dependent_expression_p (expr
);
20121 --processing_template_decl
;
20125 /* Returns TRUE if ARGS contains a type-dependent expression. */
20128 any_type_dependent_arguments_p (const vec
<tree
, va_gc
> *args
)
20133 FOR_EACH_VEC_SAFE_ELT (args
, i
, arg
)
20135 if (type_dependent_expression_p (arg
))
20141 /* Returns TRUE if LIST (a TREE_LIST whose TREE_VALUEs are
20142 expressions) contains any type-dependent expressions. */
20145 any_type_dependent_elements_p (const_tree list
)
20147 for (; list
; list
= TREE_CHAIN (list
))
20148 if (type_dependent_expression_p (TREE_VALUE (list
)))
20154 /* Returns TRUE if LIST (a TREE_LIST whose TREE_VALUEs are
20155 expressions) contains any value-dependent expressions. */
20158 any_value_dependent_elements_p (const_tree list
)
20160 for (; list
; list
= TREE_CHAIN (list
))
20161 if (value_dependent_expression_p (TREE_VALUE (list
)))
20167 /* Returns TRUE if the ARG (a template argument) is dependent. */
20170 dependent_template_arg_p (tree arg
)
20172 if (!processing_template_decl
)
20175 /* Assume a template argument that was wrongly written by the user
20176 is dependent. This is consistent with what
20177 any_dependent_template_arguments_p [that calls this function]
20179 if (!arg
|| arg
== error_mark_node
)
20182 if (TREE_CODE (arg
) == ARGUMENT_PACK_SELECT
)
20183 arg
= ARGUMENT_PACK_SELECT_ARG (arg
);
20185 if (TREE_CODE (arg
) == TEMPLATE_DECL
20186 || TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
)
20187 return dependent_template_p (arg
);
20188 else if (ARGUMENT_PACK_P (arg
))
20190 tree args
= ARGUMENT_PACK_ARGS (arg
);
20191 int i
, len
= TREE_VEC_LENGTH (args
);
20192 for (i
= 0; i
< len
; ++i
)
20194 if (dependent_template_arg_p (TREE_VEC_ELT (args
, i
)))
20200 else if (TYPE_P (arg
))
20201 return dependent_type_p (arg
);
20203 return (type_dependent_expression_p (arg
)
20204 || value_dependent_expression_p (arg
));
20207 /* Returns true if ARGS (a collection of template arguments) contains
20208 any types that require structural equality testing. */
20211 any_template_arguments_need_structural_equality_p (tree args
)
20218 if (args
== error_mark_node
)
20221 for (i
= 0; i
< TMPL_ARGS_DEPTH (args
); ++i
)
20223 tree level
= TMPL_ARGS_LEVEL (args
, i
+ 1);
20224 for (j
= 0; j
< TREE_VEC_LENGTH (level
); ++j
)
20226 tree arg
= TREE_VEC_ELT (level
, j
);
20227 tree packed_args
= NULL_TREE
;
20230 if (ARGUMENT_PACK_P (arg
))
20232 /* Look inside the argument pack. */
20233 packed_args
= ARGUMENT_PACK_ARGS (arg
);
20234 len
= TREE_VEC_LENGTH (packed_args
);
20237 for (k
= 0; k
< len
; ++k
)
20240 arg
= TREE_VEC_ELT (packed_args
, k
);
20242 if (error_operand_p (arg
))
20244 else if (TREE_CODE (arg
) == TEMPLATE_DECL
20245 || TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
)
20247 else if (TYPE_P (arg
) && TYPE_STRUCTURAL_EQUALITY_P (arg
))
20249 else if (!TYPE_P (arg
) && TREE_TYPE (arg
)
20250 && TYPE_STRUCTURAL_EQUALITY_P (TREE_TYPE (arg
)))
20259 /* Returns true if ARGS (a collection of template arguments) contains
20260 any dependent arguments. */
20263 any_dependent_template_arguments_p (const_tree args
)
20270 if (args
== error_mark_node
)
20273 for (i
= 0; i
< TMPL_ARGS_DEPTH (args
); ++i
)
20275 const_tree level
= TMPL_ARGS_LEVEL (args
, i
+ 1);
20276 for (j
= 0; j
< TREE_VEC_LENGTH (level
); ++j
)
20277 if (dependent_template_arg_p (TREE_VEC_ELT (level
, j
)))
20284 /* Returns TRUE if the template TMPL is dependent. */
20287 dependent_template_p (tree tmpl
)
20289 if (TREE_CODE (tmpl
) == OVERLOAD
)
20293 if (dependent_template_p (OVL_CURRENT (tmpl
)))
20295 tmpl
= OVL_NEXT (tmpl
);
20300 /* Template template parameters are dependent. */
20301 if (DECL_TEMPLATE_TEMPLATE_PARM_P (tmpl
)
20302 || TREE_CODE (tmpl
) == TEMPLATE_TEMPLATE_PARM
)
20304 /* So are names that have not been looked up. */
20305 if (TREE_CODE (tmpl
) == SCOPE_REF
20306 || TREE_CODE (tmpl
) == IDENTIFIER_NODE
)
20308 /* So are member templates of dependent classes. */
20309 if (TYPE_P (CP_DECL_CONTEXT (tmpl
)))
20310 return dependent_type_p (DECL_CONTEXT (tmpl
));
20314 /* Returns TRUE if the specialization TMPL<ARGS> is dependent. */
20317 dependent_template_id_p (tree tmpl
, tree args
)
20319 return (dependent_template_p (tmpl
)
20320 || any_dependent_template_arguments_p (args
));
20323 /* Returns TRUE if OMP_FOR with DECLV, INITV, CONDV and INCRV vectors
20327 dependent_omp_for_p (tree declv
, tree initv
, tree condv
, tree incrv
)
20331 if (!processing_template_decl
)
20334 for (i
= 0; i
< TREE_VEC_LENGTH (declv
); i
++)
20336 tree decl
= TREE_VEC_ELT (declv
, i
);
20337 tree init
= TREE_VEC_ELT (initv
, i
);
20338 tree cond
= TREE_VEC_ELT (condv
, i
);
20339 tree incr
= TREE_VEC_ELT (incrv
, i
);
20341 if (type_dependent_expression_p (decl
))
20344 if (init
&& type_dependent_expression_p (init
))
20347 if (type_dependent_expression_p (cond
))
20350 if (COMPARISON_CLASS_P (cond
)
20351 && (type_dependent_expression_p (TREE_OPERAND (cond
, 0))
20352 || type_dependent_expression_p (TREE_OPERAND (cond
, 1))))
20355 if (TREE_CODE (incr
) == MODOP_EXPR
)
20357 if (type_dependent_expression_p (TREE_OPERAND (incr
, 0))
20358 || type_dependent_expression_p (TREE_OPERAND (incr
, 2)))
20361 else if (type_dependent_expression_p (incr
))
20363 else if (TREE_CODE (incr
) == MODIFY_EXPR
)
20365 if (type_dependent_expression_p (TREE_OPERAND (incr
, 0)))
20367 else if (BINARY_CLASS_P (TREE_OPERAND (incr
, 1)))
20369 tree t
= TREE_OPERAND (incr
, 1);
20370 if (type_dependent_expression_p (TREE_OPERAND (t
, 0))
20371 || type_dependent_expression_p (TREE_OPERAND (t
, 1)))
20380 /* TYPE is a TYPENAME_TYPE. Returns the ordinary TYPE to which the
20381 TYPENAME_TYPE corresponds. Returns the original TYPENAME_TYPE if
20382 no such TYPE can be found. Note that this function peers inside
20383 uninstantiated templates and therefore should be used only in
20384 extremely limited situations. ONLY_CURRENT_P restricts this
20385 peering to the currently open classes hierarchy (which is required
20386 when comparing types). */
20389 resolve_typename_type (tree type
, bool only_current_p
)
20398 gcc_assert (TREE_CODE (type
) == TYPENAME_TYPE
);
20400 scope
= TYPE_CONTEXT (type
);
20401 /* Usually the non-qualified identifier of a TYPENAME_TYPE is
20402 TYPE_IDENTIFIER (type). But when 'type' is a typedef variant of
20403 a TYPENAME_TYPE node, then TYPE_NAME (type) is set to the TYPE_DECL representing
20404 the typedef. In that case TYPE_IDENTIFIER (type) is not the non-qualified
20405 identifier of the TYPENAME_TYPE anymore.
20406 So by getting the TYPE_IDENTIFIER of the _main declaration_ of the
20407 TYPENAME_TYPE instead, we avoid messing up with a possible
20408 typedef variant case. */
20409 name
= TYPE_IDENTIFIER (TYPE_MAIN_VARIANT (type
));
20411 /* If the SCOPE is itself a TYPENAME_TYPE, then we need to resolve
20412 it first before we can figure out what NAME refers to. */
20413 if (TREE_CODE (scope
) == TYPENAME_TYPE
)
20415 if (TYPENAME_IS_RESOLVING_P (scope
))
20416 /* Given a class template A with a dependent base with nested type C,
20417 typedef typename A::C::C C will land us here, as trying to resolve
20418 the initial A::C leads to the local C typedef, which leads back to
20419 A::C::C. So we break the recursion now. */
20422 scope
= resolve_typename_type (scope
, only_current_p
);
20424 /* If we don't know what SCOPE refers to, then we cannot resolve the
20426 if (TREE_CODE (scope
) == TYPENAME_TYPE
)
20428 /* If the SCOPE is a template type parameter, we have no way of
20429 resolving the name. */
20430 if (TREE_CODE (scope
) == TEMPLATE_TYPE_PARM
)
20432 /* If the SCOPE is not the current instantiation, there's no reason
20433 to look inside it. */
20434 if (only_current_p
&& !currently_open_class (scope
))
20436 /* If this is a typedef, we don't want to look inside (c++/11987). */
20437 if (typedef_variant_p (type
))
20439 /* If SCOPE isn't the template itself, it will not have a valid
20440 TYPE_FIELDS list. */
20441 if (same_type_p (scope
, CLASSTYPE_PRIMARY_TEMPLATE_TYPE (scope
)))
20442 /* scope is either the template itself or a compatible instantiation
20443 like X<T>, so look up the name in the original template. */
20444 scope
= CLASSTYPE_PRIMARY_TEMPLATE_TYPE (scope
);
20446 /* scope is a partial instantiation, so we can't do the lookup or we
20447 will lose the template arguments. */
20449 /* Enter the SCOPE so that name lookup will be resolved as if we
20450 were in the class definition. In particular, SCOPE will no
20451 longer be considered a dependent type. */
20452 pushed_scope
= push_scope (scope
);
20453 /* Look up the declaration. */
20454 decl
= lookup_member (scope
, name
, /*protect=*/0, /*want_type=*/true,
20455 tf_warning_or_error
);
20457 result
= NULL_TREE
;
20459 /* For a TYPENAME_TYPE like "typename X::template Y<T>", we want to
20460 find a TEMPLATE_DECL. Otherwise, we want to find a TYPE_DECL. */
20463 else if (TREE_CODE (TYPENAME_TYPE_FULLNAME (type
)) == IDENTIFIER_NODE
20464 && TREE_CODE (decl
) == TYPE_DECL
)
20466 result
= TREE_TYPE (decl
);
20467 if (result
== error_mark_node
)
20468 result
= NULL_TREE
;
20470 else if (TREE_CODE (TYPENAME_TYPE_FULLNAME (type
)) == TEMPLATE_ID_EXPR
20471 && DECL_CLASS_TEMPLATE_P (decl
))
20475 /* Obtain the template and the arguments. */
20476 tmpl
= TREE_OPERAND (TYPENAME_TYPE_FULLNAME (type
), 0);
20477 args
= TREE_OPERAND (TYPENAME_TYPE_FULLNAME (type
), 1);
20478 /* Instantiate the template. */
20479 result
= lookup_template_class (tmpl
, args
, NULL_TREE
, NULL_TREE
,
20480 /*entering_scope=*/0,
20481 tf_error
| tf_user
);
20482 if (result
== error_mark_node
)
20483 result
= NULL_TREE
;
20486 /* Leave the SCOPE. */
20488 pop_scope (pushed_scope
);
20490 /* If we failed to resolve it, return the original typename. */
20494 /* If lookup found a typename type, resolve that too. */
20495 if (TREE_CODE (result
) == TYPENAME_TYPE
&& !TYPENAME_IS_RESOLVING_P (result
))
20497 /* Ill-formed programs can cause infinite recursion here, so we
20498 must catch that. */
20499 TYPENAME_IS_RESOLVING_P (type
) = 1;
20500 result
= resolve_typename_type (result
, only_current_p
);
20501 TYPENAME_IS_RESOLVING_P (type
) = 0;
20504 /* Qualify the resulting type. */
20505 quals
= cp_type_quals (type
);
20507 result
= cp_build_qualified_type (result
, cp_type_quals (result
) | quals
);
20512 /* EXPR is an expression which is not type-dependent. Return a proxy
20513 for EXPR that can be used to compute the types of larger
20514 expressions containing EXPR. */
20517 build_non_dependent_expr (tree expr
)
20521 #ifdef ENABLE_CHECKING
20522 /* Try to get a constant value for all non-dependent expressions in
20523 order to expose bugs in *_dependent_expression_p and constexpr. */
20524 if (cxx_dialect
>= cxx0x
20525 && !instantiation_dependent_expression_p (expr
))
20526 maybe_constant_value (fold_non_dependent_expr_sfinae (expr
, tf_none
));
20529 /* Preserve OVERLOADs; the functions must be available to resolve
20532 if (TREE_CODE (inner_expr
) == STMT_EXPR
)
20533 inner_expr
= stmt_expr_value_expr (inner_expr
);
20534 if (TREE_CODE (inner_expr
) == ADDR_EXPR
)
20535 inner_expr
= TREE_OPERAND (inner_expr
, 0);
20536 if (TREE_CODE (inner_expr
) == COMPONENT_REF
)
20537 inner_expr
= TREE_OPERAND (inner_expr
, 1);
20538 if (is_overloaded_fn (inner_expr
)
20539 || TREE_CODE (inner_expr
) == OFFSET_REF
)
20541 /* There is no need to return a proxy for a variable. */
20542 if (TREE_CODE (expr
) == VAR_DECL
)
20544 /* Preserve string constants; conversions from string constants to
20545 "char *" are allowed, even though normally a "const char *"
20546 cannot be used to initialize a "char *". */
20547 if (TREE_CODE (expr
) == STRING_CST
)
20549 /* Preserve arithmetic constants, as an optimization -- there is no
20550 reason to create a new node. */
20551 if (TREE_CODE (expr
) == INTEGER_CST
|| TREE_CODE (expr
) == REAL_CST
)
20553 /* Preserve THROW_EXPRs -- all throw-expressions have type "void".
20554 There is at least one place where we want to know that a
20555 particular expression is a throw-expression: when checking a ?:
20556 expression, there are special rules if the second or third
20557 argument is a throw-expression. */
20558 if (TREE_CODE (expr
) == THROW_EXPR
)
20561 /* Don't wrap an initializer list, we need to be able to look inside. */
20562 if (BRACE_ENCLOSED_INITIALIZER_P (expr
))
20565 /* Don't wrap a dummy object, we need to be able to test for it. */
20566 if (is_dummy_object (expr
))
20569 if (TREE_CODE (expr
) == COND_EXPR
)
20570 return build3 (COND_EXPR
,
20572 TREE_OPERAND (expr
, 0),
20573 (TREE_OPERAND (expr
, 1)
20574 ? build_non_dependent_expr (TREE_OPERAND (expr
, 1))
20575 : build_non_dependent_expr (TREE_OPERAND (expr
, 0))),
20576 build_non_dependent_expr (TREE_OPERAND (expr
, 2)));
20577 if (TREE_CODE (expr
) == COMPOUND_EXPR
20578 && !COMPOUND_EXPR_OVERLOADED (expr
))
20579 return build2 (COMPOUND_EXPR
,
20581 TREE_OPERAND (expr
, 0),
20582 build_non_dependent_expr (TREE_OPERAND (expr
, 1)));
20584 /* If the type is unknown, it can't really be non-dependent */
20585 gcc_assert (TREE_TYPE (expr
) != unknown_type_node
);
20587 /* Otherwise, build a NON_DEPENDENT_EXPR. */
20588 return build1 (NON_DEPENDENT_EXPR
, TREE_TYPE (expr
), expr
);
20591 /* ARGS is a vector of expressions as arguments to a function call.
20592 Replace the arguments with equivalent non-dependent expressions.
20593 This modifies ARGS in place. */
20596 make_args_non_dependent (vec
<tree
, va_gc
> *args
)
20601 FOR_EACH_VEC_SAFE_ELT (args
, ix
, arg
)
20603 tree newarg
= build_non_dependent_expr (arg
);
20605 (*args
)[ix
] = newarg
;
20609 /* Returns a type which represents 'auto'. We use a TEMPLATE_TYPE_PARM
20610 with a level one deeper than the actual template parms. */
20615 tree au
= cxx_make_type (TEMPLATE_TYPE_PARM
);
20616 TYPE_NAME (au
) = build_decl (BUILTINS_LOCATION
,
20617 TYPE_DECL
, get_identifier ("auto"), au
);
20618 TYPE_STUB_DECL (au
) = TYPE_NAME (au
);
20619 TEMPLATE_TYPE_PARM_INDEX (au
) = build_template_parm_index
20620 (0, processing_template_decl
+ 1, processing_template_decl
+ 1,
20621 TYPE_NAME (au
), NULL_TREE
);
20622 TYPE_CANONICAL (au
) = canonical_type_parameter (au
);
20623 DECL_ARTIFICIAL (TYPE_NAME (au
)) = 1;
20624 SET_DECL_TEMPLATE_PARM_P (TYPE_NAME (au
));
20629 /* Given type ARG, return std::initializer_list<ARG>. */
20634 tree std_init_list
= namespace_binding
20635 (get_identifier ("initializer_list"), std_node
);
20637 if (!std_init_list
|| !DECL_CLASS_TEMPLATE_P (std_init_list
))
20639 error ("deducing from brace-enclosed initializer list requires "
20640 "#include <initializer_list>");
20641 return error_mark_node
;
20643 argvec
= make_tree_vec (1);
20644 TREE_VEC_ELT (argvec
, 0) = arg
;
20645 return lookup_template_class (std_init_list
, argvec
, NULL_TREE
,
20646 NULL_TREE
, 0, tf_warning_or_error
);
20649 /* Replace auto in TYPE with std::initializer_list<auto>. */
20652 listify_autos (tree type
, tree auto_node
)
20654 tree init_auto
= listify (auto_node
);
20655 tree argvec
= make_tree_vec (1);
20656 TREE_VEC_ELT (argvec
, 0) = init_auto
;
20657 if (processing_template_decl
)
20658 argvec
= add_to_template_args (current_template_args (), argvec
);
20659 return tsubst (type
, argvec
, tf_warning_or_error
, NULL_TREE
);
20662 /* Replace occurrences of 'auto' in TYPE with the appropriate type deduced
20663 from INIT. AUTO_NODE is the TEMPLATE_TYPE_PARM used for 'auto' in TYPE. */
20666 do_auto_deduction (tree type
, tree init
, tree auto_node
)
20668 tree parms
, tparms
, targs
;
20672 if (init
== error_mark_node
)
20673 return error_mark_node
;
20675 if (type_dependent_expression_p (init
))
20676 /* Defining a subset of type-dependent expressions that we can deduce
20677 from ahead of time isn't worth the trouble. */
20680 /* [dcl.spec.auto]: Obtain P from T by replacing the occurrences of auto
20681 with either a new invented type template parameter U or, if the
20682 initializer is a braced-init-list (8.5.4), with
20683 std::initializer_list<U>. */
20684 if (BRACE_ENCLOSED_INITIALIZER_P (init
))
20685 type
= listify_autos (type
, auto_node
);
20687 init
= resolve_nondeduced_context (init
);
20689 parms
= build_tree_list (NULL_TREE
, type
);
20691 tparms
= make_tree_vec (1);
20692 targs
= make_tree_vec (1);
20693 TREE_VEC_ELT (tparms
, 0)
20694 = build_tree_list (NULL_TREE
, TYPE_NAME (auto_node
));
20695 val
= type_unification_real (tparms
, targs
, parms
, args
, 1, 0,
20696 DEDUCE_CALL
, LOOKUP_NORMAL
,
20697 NULL
, /*explain_p=*/false);
20700 if (processing_template_decl
)
20701 /* Try again at instantiation time. */
20703 if (type
&& type
!= error_mark_node
)
20704 /* If type is error_mark_node a diagnostic must have been
20705 emitted by now. Also, having a mention to '<type error>'
20706 in the diagnostic is not really useful to the user. */
20708 if (cfun
&& auto_node
== current_function_auto_return_pattern
20709 && LAMBDA_FUNCTION_P (current_function_decl
))
20710 error ("unable to deduce lambda return type from %qE", init
);
20712 error ("unable to deduce %qT from %qE", type
, init
);
20714 return error_mark_node
;
20717 /* If the list of declarators contains more than one declarator, the type
20718 of each declared variable is determined as described above. If the
20719 type deduced for the template parameter U is not the same in each
20720 deduction, the program is ill-formed. */
20721 if (TREE_TYPE (auto_node
)
20722 && !same_type_p (TREE_TYPE (auto_node
), TREE_VEC_ELT (targs
, 0)))
20724 if (cfun
&& auto_node
== current_function_auto_return_pattern
20725 && LAMBDA_FUNCTION_P (current_function_decl
))
20726 error ("inconsistent types %qT and %qT deduced for "
20727 "lambda return type", TREE_TYPE (auto_node
),
20728 TREE_VEC_ELT (targs
, 0));
20730 error ("inconsistent deduction for %qT: %qT and then %qT",
20731 auto_node
, TREE_TYPE (auto_node
), TREE_VEC_ELT (targs
, 0));
20732 return error_mark_node
;
20734 TREE_TYPE (auto_node
) = TREE_VEC_ELT (targs
, 0);
20736 if (processing_template_decl
)
20737 targs
= add_to_template_args (current_template_args (), targs
);
20738 return tsubst (type
, targs
, tf_warning_or_error
, NULL_TREE
);
20741 /* Substitutes LATE_RETURN_TYPE for 'auto' in TYPE and returns the
20745 splice_late_return_type (tree type
, tree late_return_type
)
20749 if (late_return_type
== NULL_TREE
)
20751 argvec
= make_tree_vec (1);
20752 TREE_VEC_ELT (argvec
, 0) = late_return_type
;
20753 if (processing_template_parmlist
)
20754 /* For a late-specified return type in a template type-parameter, we
20755 need to add a dummy argument level for its parmlist. */
20756 argvec
= add_to_template_args
20757 (make_tree_vec (processing_template_parmlist
), argvec
);
20758 if (current_template_parms
)
20759 argvec
= add_to_template_args (current_template_args (), argvec
);
20760 return tsubst (type
, argvec
, tf_warning_or_error
, NULL_TREE
);
20763 /* Returns true iff TYPE is a TEMPLATE_TYPE_PARM representing 'auto'. */
20766 is_auto (const_tree type
)
20768 if (TREE_CODE (type
) == TEMPLATE_TYPE_PARM
20769 && TYPE_IDENTIFIER (type
) == get_identifier ("auto"))
20775 /* Returns true iff TYPE contains a use of 'auto'. Since auto can only
20776 appear as a type-specifier for the declaration in question, we don't
20777 have to look through the whole type. */
20780 type_uses_auto (tree type
)
20782 enum tree_code code
;
20783 if (is_auto (type
))
20786 code
= TREE_CODE (type
);
20788 if (code
== POINTER_TYPE
|| code
== REFERENCE_TYPE
20789 || code
== OFFSET_TYPE
|| code
== FUNCTION_TYPE
20790 || code
== METHOD_TYPE
|| code
== ARRAY_TYPE
)
20791 return type_uses_auto (TREE_TYPE (type
));
20793 if (TYPE_PTRMEMFUNC_P (type
))
20794 return type_uses_auto (TREE_TYPE (TREE_TYPE
20795 (TYPE_PTRMEMFUNC_FN_TYPE (type
))));
20800 /* For a given template T, return the vector of typedefs referenced
20801 in T for which access check is needed at T instantiation time.
20802 T is either a FUNCTION_DECL or a RECORD_TYPE.
20803 Those typedefs were added to T by the function
20804 append_type_to_template_for_access_check. */
20806 vec
<qualified_typedef_usage_t
, va_gc
> *
20807 get_types_needing_access_check (tree t
)
20810 vec
<qualified_typedef_usage_t
, va_gc
> *result
= NULL
;
20812 if (!t
|| t
== error_mark_node
)
20815 if (!(ti
= get_template_info (t
)))
20818 if (CLASS_TYPE_P (t
)
20819 || TREE_CODE (t
) == FUNCTION_DECL
)
20821 if (!TI_TEMPLATE (ti
))
20824 result
= TI_TYPEDEFS_NEEDING_ACCESS_CHECKING (ti
);
20830 /* Append the typedef TYPE_DECL used in template T to a list of typedefs
20831 tied to T. That list of typedefs will be access checked at
20832 T instantiation time.
20833 T is either a FUNCTION_DECL or a RECORD_TYPE.
20834 TYPE_DECL is a TYPE_DECL node representing a typedef.
20835 SCOPE is the scope through which TYPE_DECL is accessed.
20836 LOCATION is the location of the usage point of TYPE_DECL.
20838 This function is a subroutine of
20839 append_type_to_template_for_access_check. */
20842 append_type_to_template_for_access_check_1 (tree t
,
20845 location_t location
)
20847 qualified_typedef_usage_t typedef_usage
;
20850 if (!t
|| t
== error_mark_node
)
20853 gcc_assert ((TREE_CODE (t
) == FUNCTION_DECL
20854 || CLASS_TYPE_P (t
))
20856 && TREE_CODE (type_decl
) == TYPE_DECL
20859 if (!(ti
= get_template_info (t
)))
20862 gcc_assert (TI_TEMPLATE (ti
));
20864 typedef_usage
.typedef_decl
= type_decl
;
20865 typedef_usage
.context
= scope
;
20866 typedef_usage
.locus
= location
;
20868 vec_safe_push (TI_TYPEDEFS_NEEDING_ACCESS_CHECKING (ti
), typedef_usage
);
20871 /* Append TYPE_DECL to the template TEMPL.
20872 TEMPL is either a class type, a FUNCTION_DECL or a a TEMPLATE_DECL.
20873 At TEMPL instanciation time, TYPE_DECL will be checked to see
20874 if it can be accessed through SCOPE.
20875 LOCATION is the location of the usage point of TYPE_DECL.
20877 e.g. consider the following code snippet:
20884 template<class U> struct S
20886 C::myint mi; // <-- usage point of the typedef C::myint
20891 At S<char> instantiation time, we need to check the access of C::myint
20892 In other words, we need to check the access of the myint typedef through
20893 the C scope. For that purpose, this function will add the myint typedef
20894 and the scope C through which its being accessed to a list of typedefs
20895 tied to the template S. That list will be walked at template instantiation
20896 time and access check performed on each typedefs it contains.
20897 Note that this particular code snippet should yield an error because
20898 myint is private to C. */
20901 append_type_to_template_for_access_check (tree templ
,
20904 location_t location
)
20906 qualified_typedef_usage_t
*iter
;
20909 gcc_assert (type_decl
&& (TREE_CODE (type_decl
) == TYPE_DECL
));
20911 /* Make sure we don't append the type to the template twice. */
20912 FOR_EACH_VEC_SAFE_ELT (get_types_needing_access_check (templ
), i
, iter
)
20913 if (iter
->typedef_decl
== type_decl
&& scope
== iter
->context
)
20916 append_type_to_template_for_access_check_1 (templ
, type_decl
,
20920 /* Set up the hash tables for template instantiations. */
20923 init_template_processing (void)
20925 decl_specializations
= htab_create_ggc (37,
20926 hash_specialization
,
20927 eq_specializations
,
20929 type_specializations
= htab_create_ggc (37,
20930 hash_specialization
,
20931 eq_specializations
,
20935 /* Print stats about the template hash tables for -fstats. */
20938 print_template_statistics (void)
20940 fprintf (stderr
, "decl_specializations: size %ld, %ld elements, "
20941 "%f collisions\n", (long) htab_size (decl_specializations
),
20942 (long) htab_elements (decl_specializations
),
20943 htab_collisions (decl_specializations
));
20944 fprintf (stderr
, "type_specializations: size %ld, %ld elements, "
20945 "%f collisions\n", (long) htab_size (type_specializations
),
20946 (long) htab_elements (type_specializations
),
20947 htab_collisions (type_specializations
));
20950 #include "gt-cp-pt.h"