1 /* Handle parameterized types (templates) for GNU -*- C++ -*-.
2 Copyright (C) 1992-2015 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"
34 #include "stringpool.h"
37 #include "stor-layout.h"
41 #include "c-family/c-common.h"
42 #include "c-family/c-objc.h"
43 #include "cp-objcp-common.h"
44 #include "tree-inline.h"
48 #include "tree-iterator.h"
49 #include "type-utils.h"
52 /* The type of functions taking a tree, and some additional data, and
54 typedef int (*tree_fn_t
) (tree
, void*);
56 /* The PENDING_TEMPLATES is a TREE_LIST of templates whose
57 instantiations have been deferred, either because their definitions
58 were not yet available, or because we were putting off doing the work. */
59 struct GTY ((chain_next ("%h.next"))) pending_template
{
60 struct pending_template
*next
;
61 struct tinst_level
*tinst
;
64 static GTY(()) struct pending_template
*pending_templates
;
65 static GTY(()) struct pending_template
*last_pending_template
;
67 int processing_template_parmlist
;
68 static int template_header_count
;
70 static GTY(()) tree saved_trees
;
71 static vec
<int> inline_parm_levels
;
73 static GTY(()) struct tinst_level
*current_tinst_level
;
75 static GTY(()) tree saved_access_scope
;
77 /* Live only within one (recursive) call to tsubst_expr. We use
78 this to pass the statement expression node from the STMT_EXPR
79 to the EXPR_STMT that is its result. */
80 static tree cur_stmt_expr
;
82 /* True if we've recursed into fn_type_unification too many times. */
83 static bool excessive_deduction_depth
;
85 struct GTY((for_user
)) spec_entry
92 struct spec_hasher
: ggc_ptr_hash
<spec_entry
>
94 static hashval_t
hash (spec_entry
*);
95 static bool equal (spec_entry
*, spec_entry
*);
98 static GTY (()) hash_table
<spec_hasher
> *decl_specializations
;
100 static GTY (()) hash_table
<spec_hasher
> *type_specializations
;
102 /* Contains canonical template parameter types. The vector is indexed by
103 the TEMPLATE_TYPE_IDX of the template parameter. Each element is a
104 TREE_LIST, whose TREE_VALUEs contain the canonical template
105 parameters of various types and levels. */
106 static GTY(()) vec
<tree
, va_gc
> *canonical_template_parms
;
108 #define UNIFY_ALLOW_NONE 0
109 #define UNIFY_ALLOW_MORE_CV_QUAL 1
110 #define UNIFY_ALLOW_LESS_CV_QUAL 2
111 #define UNIFY_ALLOW_DERIVED 4
112 #define UNIFY_ALLOW_INTEGER 8
113 #define UNIFY_ALLOW_OUTER_LEVEL 16
114 #define UNIFY_ALLOW_OUTER_MORE_CV_QUAL 32
115 #define UNIFY_ALLOW_OUTER_LESS_CV_QUAL 64
117 enum template_base_result
{
119 tbr_ambiguous_baseclass
,
123 static void push_access_scope (tree
);
124 static void pop_access_scope (tree
);
125 static bool resolve_overloaded_unification (tree
, tree
, tree
, tree
,
126 unification_kind_t
, int,
128 static int try_one_overload (tree
, tree
, tree
, tree
, tree
,
129 unification_kind_t
, int, bool, bool);
130 static int unify (tree
, tree
, tree
, tree
, int, bool);
131 static void add_pending_template (tree
);
132 static tree
reopen_tinst_level (struct tinst_level
*);
133 static tree
tsubst_initializer_list (tree
, tree
);
134 static tree
get_partial_spec_bindings (tree
, tree
, tree
, tree
);
135 static tree
coerce_template_parms (tree
, tree
, tree
, tsubst_flags_t
,
137 static tree
coerce_innermost_template_parms (tree
, tree
, tree
, tsubst_flags_t
,
139 static void tsubst_enum (tree
, tree
, tree
);
140 static tree
add_to_template_args (tree
, tree
);
141 static tree
add_outermost_template_args (tree
, tree
);
142 static bool check_instantiated_args (tree
, tree
, tsubst_flags_t
);
143 static int maybe_adjust_types_for_deduction (unification_kind_t
, tree
*, tree
*,
145 static int type_unification_real (tree
, tree
, tree
, const tree
*,
146 unsigned int, int, unification_kind_t
, int,
147 vec
<deferred_access_check
, va_gc
> **,
149 static void note_template_header (int);
150 static tree
convert_nontype_argument_function (tree
, tree
, tsubst_flags_t
);
151 static tree
convert_nontype_argument (tree
, tree
, tsubst_flags_t
);
152 static tree
convert_template_argument (tree
, tree
, tree
,
153 tsubst_flags_t
, int, tree
);
154 static int for_each_template_parm (tree
, tree_fn_t
, void*,
155 hash_set
<tree
> *, bool);
156 static tree
expand_template_argument_pack (tree
);
157 static tree
build_template_parm_index (int, int, int, tree
, tree
);
158 static bool inline_needs_template_parms (tree
, bool);
159 static void push_inline_template_parms_recursive (tree
, int);
160 static tree
retrieve_local_specialization (tree
);
161 static void register_local_specialization (tree
, tree
);
162 static tree
reduce_template_parm_level (tree
, tree
, int, tree
, tsubst_flags_t
);
163 static int mark_template_parm (tree
, void *);
164 static int template_parm_this_level_p (tree
, void *);
165 static tree
tsubst_friend_function (tree
, tree
);
166 static tree
tsubst_friend_class (tree
, tree
);
167 static int can_complete_type_without_circularity (tree
);
168 static tree
get_bindings (tree
, tree
, tree
, bool);
169 static int template_decl_level (tree
);
170 static int check_cv_quals_for_unify (int, tree
, tree
);
171 static void template_parm_level_and_index (tree
, int*, int*);
172 static int unify_pack_expansion (tree
, tree
, tree
,
173 tree
, unification_kind_t
, bool, bool);
174 static tree
tsubst_template_arg (tree
, tree
, tsubst_flags_t
, tree
);
175 static tree
tsubst_template_args (tree
, tree
, tsubst_flags_t
, tree
);
176 static tree
tsubst_template_parms (tree
, tree
, tsubst_flags_t
);
177 static void regenerate_decl_from_template (tree
, tree
);
178 static tree
most_specialized_partial_spec (tree
, tsubst_flags_t
);
179 static tree
tsubst_aggr_type (tree
, tree
, tsubst_flags_t
, tree
, int);
180 static tree
tsubst_arg_types (tree
, tree
, tree
, tsubst_flags_t
, tree
);
181 static tree
tsubst_function_type (tree
, tree
, tsubst_flags_t
, tree
);
182 static bool check_specialization_scope (void);
183 static tree
process_partial_specialization (tree
);
184 static void set_current_access_from_decl (tree
);
185 static enum template_base_result
get_template_base (tree
, tree
, tree
, tree
,
187 static tree
try_class_unification (tree
, tree
, tree
, tree
, bool);
188 static int coerce_template_template_parms (tree
, tree
, tsubst_flags_t
,
190 static bool template_template_parm_bindings_ok_p (tree
, tree
);
191 static int template_args_equal (tree
, tree
);
192 static void tsubst_default_arguments (tree
, tsubst_flags_t
);
193 static tree
for_each_template_parm_r (tree
*, int *, void *);
194 static tree
copy_default_args_to_explicit_spec_1 (tree
, tree
);
195 static void copy_default_args_to_explicit_spec (tree
);
196 static int invalid_nontype_parm_type_p (tree
, tsubst_flags_t
);
197 static bool dependent_template_arg_p (tree
);
198 static bool any_template_arguments_need_structural_equality_p (tree
);
199 static bool dependent_type_p_r (tree
);
200 static tree
tsubst_expr (tree
, tree
, tsubst_flags_t
, tree
, bool);
201 static tree
tsubst_copy (tree
, tree
, tsubst_flags_t
, tree
);
202 static tree
tsubst_pack_expansion (tree
, tree
, tsubst_flags_t
, tree
);
203 static tree
tsubst_decl (tree
, tree
, tsubst_flags_t
);
204 static void perform_typedefs_access_check (tree tmpl
, tree targs
);
205 static void append_type_to_template_for_access_check_1 (tree
, tree
, tree
,
207 static tree
listify (tree
);
208 static tree
listify_autos (tree
, tree
);
209 static tree
template_parm_to_arg (tree t
);
210 static tree
current_template_args (void);
211 static tree
tsubst_template_parm (tree
, tree
, tsubst_flags_t
);
212 static tree
instantiate_alias_template (tree
, tree
, tsubst_flags_t
);
213 static bool complex_alias_template_p (const_tree tmpl
);
215 /* Make the current scope suitable for access checking when we are
216 processing T. T can be FUNCTION_DECL for instantiated function
217 template, VAR_DECL for static member variable, or TYPE_DECL for
218 alias template (needed by instantiate_decl). */
221 push_access_scope (tree t
)
223 gcc_assert (VAR_OR_FUNCTION_DECL_P (t
)
224 || TREE_CODE (t
) == TYPE_DECL
);
226 if (DECL_FRIEND_CONTEXT (t
))
227 push_nested_class (DECL_FRIEND_CONTEXT (t
));
228 else if (DECL_CLASS_SCOPE_P (t
))
229 push_nested_class (DECL_CONTEXT (t
));
231 push_to_top_level ();
233 if (TREE_CODE (t
) == FUNCTION_DECL
)
235 saved_access_scope
= tree_cons
236 (NULL_TREE
, current_function_decl
, saved_access_scope
);
237 current_function_decl
= t
;
241 /* Restore the scope set up by push_access_scope. T is the node we
245 pop_access_scope (tree t
)
247 if (TREE_CODE (t
) == FUNCTION_DECL
)
249 current_function_decl
= TREE_VALUE (saved_access_scope
);
250 saved_access_scope
= TREE_CHAIN (saved_access_scope
);
253 if (DECL_FRIEND_CONTEXT (t
) || DECL_CLASS_SCOPE_P (t
))
256 pop_from_top_level ();
259 /* Do any processing required when DECL (a member template
260 declaration) is finished. Returns the TEMPLATE_DECL corresponding
261 to DECL, unless it is a specialization, in which case the DECL
262 itself is returned. */
265 finish_member_template_decl (tree decl
)
267 if (decl
== error_mark_node
)
268 return error_mark_node
;
270 gcc_assert (DECL_P (decl
));
272 if (TREE_CODE (decl
) == TYPE_DECL
)
276 type
= TREE_TYPE (decl
);
277 if (type
== error_mark_node
)
278 return error_mark_node
;
279 if (MAYBE_CLASS_TYPE_P (type
)
280 && CLASSTYPE_TEMPLATE_INFO (type
)
281 && !CLASSTYPE_TEMPLATE_SPECIALIZATION (type
))
283 tree tmpl
= CLASSTYPE_TI_TEMPLATE (type
);
284 check_member_template (tmpl
);
289 else if (TREE_CODE (decl
) == FIELD_DECL
)
290 error ("data member %qD cannot be a member template", decl
);
291 else if (DECL_TEMPLATE_INFO (decl
))
293 if (!DECL_TEMPLATE_SPECIALIZATION (decl
))
295 check_member_template (DECL_TI_TEMPLATE (decl
));
296 return DECL_TI_TEMPLATE (decl
);
302 error ("invalid member template declaration %qD", decl
);
304 return error_mark_node
;
307 /* Create a template info node. */
310 build_template_info (tree template_decl
, tree template_args
)
312 tree result
= make_node (TEMPLATE_INFO
);
313 TI_TEMPLATE (result
) = template_decl
;
314 TI_ARGS (result
) = template_args
;
318 /* Return the template info node corresponding to T, whatever T is. */
321 get_template_info (const_tree t
)
323 tree tinfo
= NULL_TREE
;
325 if (!t
|| t
== error_mark_node
)
328 if (TREE_CODE (t
) == NAMESPACE_DECL
)
331 if (DECL_P (t
) && DECL_LANG_SPECIFIC (t
))
332 tinfo
= DECL_TEMPLATE_INFO (t
);
334 if (!tinfo
&& DECL_IMPLICIT_TYPEDEF_P (t
))
337 if (OVERLOAD_TYPE_P (t
))
338 tinfo
= TYPE_TEMPLATE_INFO (t
);
339 else if (TREE_CODE (t
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
340 tinfo
= TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (t
);
345 /* Returns the template nesting level of the indicated class TYPE.
355 A<T>::B<U> has depth two, while A<T> has depth one.
356 Both A<T>::B<int> and A<int>::B<U> have depth one, if
357 they are instantiations, not specializations.
359 This function is guaranteed to return 0 if passed NULL_TREE so
360 that, for example, `template_class_depth (current_class_type)' is
364 template_class_depth (tree type
)
369 type
&& TREE_CODE (type
) != NAMESPACE_DECL
;
370 type
= (TREE_CODE (type
) == FUNCTION_DECL
)
371 ? CP_DECL_CONTEXT (type
) : CP_TYPE_CONTEXT (type
))
373 tree tinfo
= get_template_info (type
);
375 if (tinfo
&& PRIMARY_TEMPLATE_P (TI_TEMPLATE (tinfo
))
376 && uses_template_parms (INNERMOST_TEMPLATE_ARGS (TI_ARGS (tinfo
))))
383 /* Subroutine of maybe_begin_member_template_processing.
384 Returns true if processing DECL needs us to push template parms. */
387 inline_needs_template_parms (tree decl
, bool nsdmi
)
389 if (!decl
|| (!nsdmi
&& ! DECL_TEMPLATE_INFO (decl
)))
392 return (TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (most_general_template (decl
)))
393 > (processing_template_decl
+ DECL_TEMPLATE_SPECIALIZATION (decl
)));
396 /* Subroutine of maybe_begin_member_template_processing.
397 Push the template parms in PARMS, starting from LEVELS steps into the
398 chain, and ending at the beginning, since template parms are listed
402 push_inline_template_parms_recursive (tree parmlist
, int levels
)
404 tree parms
= TREE_VALUE (parmlist
);
408 push_inline_template_parms_recursive (TREE_CHAIN (parmlist
), levels
- 1);
410 ++processing_template_decl
;
411 current_template_parms
412 = tree_cons (size_int (processing_template_decl
),
413 parms
, current_template_parms
);
414 TEMPLATE_PARMS_FOR_INLINE (current_template_parms
) = 1;
416 begin_scope (TREE_VEC_LENGTH (parms
) ? sk_template_parms
: sk_template_spec
,
418 for (i
= 0; i
< TREE_VEC_LENGTH (parms
); ++i
)
420 tree parm
= TREE_VALUE (TREE_VEC_ELT (parms
, i
));
422 if (error_operand_p (parm
))
425 gcc_assert (DECL_P (parm
));
427 switch (TREE_CODE (parm
))
436 /* Make a CONST_DECL as is done in process_template_parm.
437 It is ugly that we recreate this here; the original
438 version built in process_template_parm is no longer
440 tree decl
= build_decl (DECL_SOURCE_LOCATION (parm
),
441 CONST_DECL
, DECL_NAME (parm
),
443 DECL_ARTIFICIAL (decl
) = 1;
444 TREE_CONSTANT (decl
) = 1;
445 TREE_READONLY (decl
) = 1;
446 DECL_INITIAL (decl
) = DECL_INITIAL (parm
);
447 SET_DECL_TEMPLATE_PARM_P (decl
);
458 /* Restore the template parameter context for a member template, a
459 friend template defined in a class definition, or a non-template
460 member of template class. */
463 maybe_begin_member_template_processing (tree decl
)
467 bool nsdmi
= TREE_CODE (decl
) == FIELD_DECL
;
471 tree ctx
= DECL_CONTEXT (decl
);
472 decl
= (CLASSTYPE_TEMPLATE_INFO (ctx
)
473 /* Disregard full specializations (c++/60999). */
474 && uses_template_parms (ctx
)
475 ? CLASSTYPE_TI_TEMPLATE (ctx
) : NULL_TREE
);
478 if (inline_needs_template_parms (decl
, nsdmi
))
480 parms
= DECL_TEMPLATE_PARMS (most_general_template (decl
));
481 levels
= TMPL_PARMS_DEPTH (parms
) - processing_template_decl
;
483 if (DECL_TEMPLATE_SPECIALIZATION (decl
))
486 parms
= TREE_CHAIN (parms
);
489 push_inline_template_parms_recursive (parms
, levels
);
492 /* Remember how many levels of template parameters we pushed so that
493 we can pop them later. */
494 inline_parm_levels
.safe_push (levels
);
497 /* Undo the effects of maybe_begin_member_template_processing. */
500 maybe_end_member_template_processing (void)
505 if (inline_parm_levels
.length () == 0)
508 last
= inline_parm_levels
.pop ();
509 for (i
= 0; i
< last
; ++i
)
511 --processing_template_decl
;
512 current_template_parms
= TREE_CHAIN (current_template_parms
);
517 /* Return a new template argument vector which contains all of ARGS,
518 but has as its innermost set of arguments the EXTRA_ARGS. */
521 add_to_template_args (tree args
, tree extra_args
)
528 if (args
== NULL_TREE
|| extra_args
== error_mark_node
)
531 extra_depth
= TMPL_ARGS_DEPTH (extra_args
);
532 new_args
= make_tree_vec (TMPL_ARGS_DEPTH (args
) + extra_depth
);
534 for (i
= 1; i
<= TMPL_ARGS_DEPTH (args
); ++i
)
535 SET_TMPL_ARGS_LEVEL (new_args
, i
, TMPL_ARGS_LEVEL (args
, i
));
537 for (j
= 1; j
<= extra_depth
; ++j
, ++i
)
538 SET_TMPL_ARGS_LEVEL (new_args
, i
, TMPL_ARGS_LEVEL (extra_args
, j
));
543 /* Like add_to_template_args, but only the outermost ARGS are added to
544 the EXTRA_ARGS. In particular, all but TMPL_ARGS_DEPTH
545 (EXTRA_ARGS) levels are added. This function is used to combine
546 the template arguments from a partial instantiation with the
547 template arguments used to attain the full instantiation from the
548 partial instantiation. */
551 add_outermost_template_args (tree args
, tree extra_args
)
555 /* If there are more levels of EXTRA_ARGS than there are ARGS,
556 something very fishy is going on. */
557 gcc_assert (TMPL_ARGS_DEPTH (args
) >= TMPL_ARGS_DEPTH (extra_args
));
559 /* If *all* the new arguments will be the EXTRA_ARGS, just return
561 if (TMPL_ARGS_DEPTH (args
) == TMPL_ARGS_DEPTH (extra_args
))
564 /* For the moment, we make ARGS look like it contains fewer levels. */
565 TREE_VEC_LENGTH (args
) -= TMPL_ARGS_DEPTH (extra_args
);
567 new_args
= add_to_template_args (args
, extra_args
);
569 /* Now, we restore ARGS to its full dimensions. */
570 TREE_VEC_LENGTH (args
) += TMPL_ARGS_DEPTH (extra_args
);
575 /* Return the N levels of innermost template arguments from the ARGS. */
578 get_innermost_template_args (tree args
, int n
)
586 /* If N is 1, just return the innermost set of template arguments. */
588 return TMPL_ARGS_LEVEL (args
, TMPL_ARGS_DEPTH (args
));
590 /* If we're not removing anything, just return the arguments we were
592 extra_levels
= TMPL_ARGS_DEPTH (args
) - n
;
593 gcc_assert (extra_levels
>= 0);
594 if (extra_levels
== 0)
597 /* Make a new set of arguments, not containing the outer arguments. */
598 new_args
= make_tree_vec (n
);
599 for (i
= 1; i
<= n
; ++i
)
600 SET_TMPL_ARGS_LEVEL (new_args
, i
,
601 TMPL_ARGS_LEVEL (args
, i
+ extra_levels
));
606 /* The inverse of get_innermost_template_args: Return all but the innermost
607 EXTRA_LEVELS levels of template arguments from the ARGS. */
610 strip_innermost_template_args (tree args
, int extra_levels
)
613 int n
= TMPL_ARGS_DEPTH (args
) - extra_levels
;
618 /* If N is 1, just return the outermost set of template arguments. */
620 return TMPL_ARGS_LEVEL (args
, 1);
622 /* If we're not removing anything, just return the arguments we were
624 gcc_assert (extra_levels
>= 0);
625 if (extra_levels
== 0)
628 /* Make a new set of arguments, not containing the inner arguments. */
629 new_args
= make_tree_vec (n
);
630 for (i
= 1; i
<= n
; ++i
)
631 SET_TMPL_ARGS_LEVEL (new_args
, i
,
632 TMPL_ARGS_LEVEL (args
, i
));
637 /* We've got a template header coming up; push to a new level for storing
641 begin_template_parm_list (void)
643 /* We use a non-tag-transparent scope here, which causes pushtag to
644 put tags in this scope, rather than in the enclosing class or
645 namespace scope. This is the right thing, since we want
646 TEMPLATE_DECLS, and not TYPE_DECLS for template classes. For a
647 global template class, push_template_decl handles putting the
648 TEMPLATE_DECL into top-level scope. For a nested template class,
651 template <class T> struct S1 {
652 template <class T> struct S2 {};
655 pushtag contains special code to call pushdecl_with_scope on the
656 TEMPLATE_DECL for S2. */
657 begin_scope (sk_template_parms
, NULL
);
658 ++processing_template_decl
;
659 ++processing_template_parmlist
;
660 note_template_header (0);
663 /* This routine is called when a specialization is declared. If it is
664 invalid to declare a specialization here, an error is reported and
665 false is returned, otherwise this routine will return true. */
668 check_specialization_scope (void)
670 tree scope
= current_scope ();
674 An explicit specialization shall be declared in the namespace of
675 which the template is a member, or, for member templates, in the
676 namespace of which the enclosing class or enclosing class
677 template is a member. An explicit specialization of a member
678 function, member class or static data member of a class template
679 shall be declared in the namespace of which the class template
681 if (scope
&& TREE_CODE (scope
) != NAMESPACE_DECL
)
683 error ("explicit specialization in non-namespace scope %qD", scope
);
689 In an explicit specialization declaration for a member of a class
690 template or a member template that appears in namespace scope,
691 the member template and some of its enclosing class templates may
692 remain unspecialized, except that the declaration shall not
693 explicitly specialize a class member template if its enclosing
694 class templates are not explicitly specialized as well. */
695 if (current_template_parms
)
697 error ("enclosing class templates are not explicitly specialized");
704 /* We've just seen template <>. */
707 begin_specialization (void)
709 begin_scope (sk_template_spec
, NULL
);
710 note_template_header (1);
711 return check_specialization_scope ();
714 /* Called at then end of processing a declaration preceded by
718 end_specialization (void)
721 reset_specialization ();
724 /* Any template <>'s that we have seen thus far are not referring to a
725 function specialization. */
728 reset_specialization (void)
730 processing_specialization
= 0;
731 template_header_count
= 0;
734 /* We've just seen a template header. If SPECIALIZATION is nonzero,
735 it was of the form template <>. */
738 note_template_header (int specialization
)
740 processing_specialization
= specialization
;
741 template_header_count
++;
744 /* We're beginning an explicit instantiation. */
747 begin_explicit_instantiation (void)
749 gcc_assert (!processing_explicit_instantiation
);
750 processing_explicit_instantiation
= true;
755 end_explicit_instantiation (void)
757 gcc_assert (processing_explicit_instantiation
);
758 processing_explicit_instantiation
= false;
761 /* An explicit specialization or partial specialization of TMPL is being
762 declared. Check that the namespace in which the specialization is
763 occurring is permissible. Returns false iff it is invalid to
764 specialize TMPL in the current namespace. */
767 check_specialization_namespace (tree tmpl
)
769 tree tpl_ns
= decl_namespace_context (tmpl
);
773 An explicit specialization shall be declared in the namespace of
774 which the template is a member, or, for member templates, in the
775 namespace of which the enclosing class or enclosing class
776 template is a member. An explicit specialization of a member
777 function, member class or static data member of a class template
778 shall be declared in the namespace of which the class template is
780 if (current_scope() != DECL_CONTEXT (tmpl
)
781 && !at_namespace_scope_p ())
783 error ("specialization of %qD must appear at namespace scope", tmpl
);
786 if (is_associated_namespace (current_namespace
, tpl_ns
))
787 /* Same or super-using namespace. */
791 permerror (input_location
, "specialization of %qD in different namespace", tmpl
);
792 permerror (input_location
, " from definition of %q+#D", tmpl
);
797 /* SPEC is an explicit instantiation. Check that it is valid to
798 perform this explicit instantiation in the current namespace. */
801 check_explicit_instantiation_namespace (tree spec
)
805 /* DR 275: An explicit instantiation shall appear in an enclosing
806 namespace of its template. */
807 ns
= decl_namespace_context (spec
);
808 if (!is_ancestor (current_namespace
, ns
))
809 permerror (input_location
, "explicit instantiation of %qD in namespace %qD "
810 "(which does not enclose namespace %qD)",
811 spec
, current_namespace
, ns
);
814 /* The TYPE is being declared. If it is a template type, that means it
815 is a partial specialization. Do appropriate error-checking. */
818 maybe_process_partial_specialization (tree type
)
822 if (type
== error_mark_node
)
823 return error_mark_node
;
825 /* A lambda that appears in specialization context is not itself a
827 if (CLASS_TYPE_P (type
) && CLASSTYPE_LAMBDA_EXPR (type
))
830 if (TREE_CODE (type
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
832 error ("name of class shadows template template parameter %qD",
834 return error_mark_node
;
837 context
= TYPE_CONTEXT (type
);
839 if (TYPE_ALIAS_P (type
))
841 if (TYPE_TEMPLATE_INFO (type
)
842 && DECL_ALIAS_TEMPLATE_P (TYPE_TI_TEMPLATE (type
)))
843 error ("specialization of alias template %qD",
844 TYPE_TI_TEMPLATE (type
));
846 error ("explicit specialization of non-template %qT", type
);
847 return error_mark_node
;
849 else if (CLASS_TYPE_P (type
) && CLASSTYPE_USE_TEMPLATE (type
))
851 /* This is for ordinary explicit specialization and partial
852 specialization of a template class such as:
854 template <> class C<int>;
858 template <class T> class C<T*>;
860 Make sure that `C<int>' and `C<T*>' are implicit instantiations. */
862 if (CLASSTYPE_IMPLICIT_INSTANTIATION (type
)
863 && !COMPLETE_TYPE_P (type
))
865 if (!check_specialization_namespace (CLASSTYPE_TI_TEMPLATE (type
))
866 && !at_namespace_scope_p ())
867 return error_mark_node
;
868 SET_CLASSTYPE_TEMPLATE_SPECIALIZATION (type
);
869 DECL_SOURCE_LOCATION (TYPE_MAIN_DECL (type
)) = input_location
;
870 if (processing_template_decl
)
872 if (push_template_decl (TYPE_MAIN_DECL (type
))
874 return error_mark_node
;
877 else if (CLASSTYPE_TEMPLATE_INSTANTIATION (type
))
878 error ("specialization of %qT after instantiation", type
);
879 else if (errorcount
&& !processing_specialization
880 && CLASSTYPE_TEMPLATE_SPECIALIZATION (type
)
881 && !uses_template_parms (CLASSTYPE_TI_ARGS (type
)))
882 /* Trying to define a specialization either without a template<> header
883 or in an inappropriate place. We've already given an error, so just
884 bail now so we don't actually define the specialization. */
885 return error_mark_node
;
887 else if (CLASS_TYPE_P (type
)
888 && !CLASSTYPE_USE_TEMPLATE (type
)
889 && CLASSTYPE_TEMPLATE_INFO (type
)
890 && context
&& CLASS_TYPE_P (context
)
891 && CLASSTYPE_TEMPLATE_INFO (context
))
893 /* This is for an explicit specialization of member class
894 template according to [temp.expl.spec/18]:
896 template <> template <class U> class C<int>::D;
898 The context `C<int>' must be an implicit instantiation.
899 Otherwise this is just a member class template declared
902 template <> class C<int> { template <class U> class D; };
903 template <> template <class U> class C<int>::D;
905 In the first case, `C<int>::D' is a specialization of `C<T>::D'
906 while in the second case, `C<int>::D' is a primary template
907 and `C<T>::D' may not exist. */
909 if (CLASSTYPE_IMPLICIT_INSTANTIATION (context
)
910 && !COMPLETE_TYPE_P (type
))
913 tree tmpl
= CLASSTYPE_TI_TEMPLATE (type
);
915 if (current_namespace
916 != decl_namespace_context (tmpl
))
918 permerror (input_location
, "specializing %q#T in different namespace", type
);
919 permerror (input_location
, " from definition of %q+#D", tmpl
);
922 /* Check for invalid specialization after instantiation:
924 template <> template <> class C<int>::D<int>;
925 template <> template <class U> class C<int>::D; */
927 for (t
= DECL_TEMPLATE_INSTANTIATIONS (tmpl
);
928 t
; t
= TREE_CHAIN (t
))
930 tree inst
= TREE_VALUE (t
);
931 if (CLASSTYPE_TEMPLATE_SPECIALIZATION (inst
)
932 || !COMPLETE_OR_OPEN_TYPE_P (inst
))
934 /* We already have a full specialization of this partial
935 instantiation, or a full specialization has been
936 looked up but not instantiated. Reassign it to the
937 new member specialization template. */
941 elt
.tmpl
= most_general_template (tmpl
);
942 elt
.args
= CLASSTYPE_TI_ARGS (inst
);
945 type_specializations
->remove_elt (&elt
);
948 elt
.args
= INNERMOST_TEMPLATE_ARGS (elt
.args
);
951 = type_specializations
->find_slot (&elt
, INSERT
);
952 entry
= ggc_alloc
<spec_entry
> ();
957 /* But if we've had an implicit instantiation, that's a
958 problem ([temp.expl.spec]/6). */
959 error ("specialization %qT after instantiation %qT",
963 /* Mark TYPE as a specialization. And as a result, we only
964 have one level of template argument for the innermost
966 SET_CLASSTYPE_TEMPLATE_SPECIALIZATION (type
);
967 DECL_SOURCE_LOCATION (TYPE_MAIN_DECL (type
)) = input_location
;
968 CLASSTYPE_TI_ARGS (type
)
969 = INNERMOST_TEMPLATE_ARGS (CLASSTYPE_TI_ARGS (type
));
972 else if (processing_specialization
)
974 /* Someday C++0x may allow for enum template specialization. */
975 if (cxx_dialect
> cxx98
&& TREE_CODE (type
) == ENUMERAL_TYPE
976 && CLASS_TYPE_P (context
) && CLASSTYPE_USE_TEMPLATE (context
))
977 pedwarn (input_location
, OPT_Wpedantic
, "template specialization "
978 "of %qD not allowed by ISO C++", type
);
981 error ("explicit specialization of non-template %qT", type
);
982 return error_mark_node
;
989 /* Returns nonzero if we can optimize the retrieval of specializations
990 for TMPL, a TEMPLATE_DECL. In particular, for such a template, we
991 do not use DECL_TEMPLATE_SPECIALIZATIONS at all. */
994 optimize_specialization_lookup_p (tree tmpl
)
996 return (DECL_FUNCTION_TEMPLATE_P (tmpl
)
997 && DECL_CLASS_SCOPE_P (tmpl
)
998 /* DECL_CLASS_SCOPE_P holds of T::f even if T is a template
1000 && CLASS_TYPE_P (DECL_CONTEXT (tmpl
))
1001 /* The optimized lookup depends on the fact that the
1002 template arguments for the member function template apply
1003 purely to the containing class, which is not true if the
1004 containing class is an explicit or partial
1006 && !CLASSTYPE_TEMPLATE_SPECIALIZATION (DECL_CONTEXT (tmpl
))
1007 && !DECL_MEMBER_TEMPLATE_P (tmpl
)
1008 && !DECL_CONV_FN_P (tmpl
)
1009 /* It is possible to have a template that is not a member
1010 template and is not a member of a template class:
1012 template <typename T>
1013 struct S { friend A::f(); };
1015 Here, the friend function is a template, but the context does
1016 not have template information. The optimized lookup relies
1017 on having ARGS be the template arguments for both the class
1018 and the function template. */
1019 && !DECL_FRIEND_P (DECL_TEMPLATE_RESULT (tmpl
)));
1022 /* Retrieve the specialization (in the sense of [temp.spec] - a
1023 specialization is either an instantiation or an explicit
1024 specialization) of TMPL for the given template ARGS. If there is
1025 no such specialization, return NULL_TREE. The ARGS are a vector of
1026 arguments, or a vector of vectors of arguments, in the case of
1027 templates with more than one level of parameters.
1029 If TMPL is a type template and CLASS_SPECIALIZATIONS_P is true,
1030 then we search for a partial specialization matching ARGS. This
1031 parameter is ignored if TMPL is not a class template.
1033 We can also look up a FIELD_DECL, if it is a lambda capture pack; the
1034 result is a NONTYPE_ARGUMENT_PACK. */
1037 retrieve_specialization (tree tmpl
, tree args
, hashval_t hash
)
1039 if (tmpl
== NULL_TREE
)
1042 if (args
== error_mark_node
)
1045 gcc_assert (TREE_CODE (tmpl
) == TEMPLATE_DECL
1046 || TREE_CODE (tmpl
) == FIELD_DECL
);
1048 /* There should be as many levels of arguments as there are
1049 levels of parameters. */
1050 gcc_assert (TMPL_ARGS_DEPTH (args
)
1051 == (TREE_CODE (tmpl
) == TEMPLATE_DECL
1052 ? TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (tmpl
))
1053 : template_class_depth (DECL_CONTEXT (tmpl
))));
1055 #ifdef ENABLE_CHECKING
1056 /* We should have gone through coerce_template_parms by now. */
1057 ++processing_template_decl
;
1058 if (!any_dependent_template_arguments_p (args
))
1059 gcc_assert (strip_typedefs_expr (args
, NULL
) == args
);
1060 --processing_template_decl
;
1063 if (optimize_specialization_lookup_p (tmpl
))
1065 tree class_template
;
1066 tree class_specialization
;
1067 vec
<tree
, va_gc
> *methods
;
1071 /* The template arguments actually apply to the containing
1072 class. Find the class specialization with those
1074 class_template
= CLASSTYPE_TI_TEMPLATE (DECL_CONTEXT (tmpl
));
1075 class_specialization
1076 = retrieve_specialization (class_template
, args
, 0);
1077 if (!class_specialization
)
1079 /* Now, find the appropriate entry in the CLASSTYPE_METHOD_VEC
1080 for the specialization. */
1081 idx
= class_method_index_for_fn (class_specialization
, tmpl
);
1084 /* Iterate through the methods with the indicated name, looking
1085 for the one that has an instance of TMPL. */
1086 methods
= CLASSTYPE_METHOD_VEC (class_specialization
);
1087 for (fns
= (*methods
)[idx
]; fns
; fns
= OVL_NEXT (fns
))
1089 tree fn
= OVL_CURRENT (fns
);
1090 if (DECL_TEMPLATE_INFO (fn
) && DECL_TI_TEMPLATE (fn
) == tmpl
1091 /* using-declarations can add base methods to the method vec,
1092 and we don't want those here. */
1093 && DECL_CONTEXT (fn
) == class_specialization
)
1102 hash_table
<spec_hasher
> *specializations
;
1106 elt
.spec
= NULL_TREE
;
1108 if (DECL_CLASS_TEMPLATE_P (tmpl
))
1109 specializations
= type_specializations
;
1111 specializations
= decl_specializations
;
1114 hash
= spec_hasher::hash (&elt
);
1115 found
= specializations
->find_with_hash (&elt
, hash
);
1123 /* Like retrieve_specialization, but for local declarations. */
1126 retrieve_local_specialization (tree tmpl
)
1128 if (local_specializations
== NULL
)
1131 tree
*slot
= local_specializations
->get (tmpl
);
1132 return slot
? *slot
: NULL_TREE
;
1135 /* Returns nonzero iff DECL is a specialization of TMPL. */
1138 is_specialization_of (tree decl
, tree tmpl
)
1142 if (TREE_CODE (decl
) == FUNCTION_DECL
)
1146 t
= DECL_TEMPLATE_INFO (t
) ? DECL_TI_TEMPLATE (t
) : NULL_TREE
)
1152 gcc_assert (TREE_CODE (decl
) == TYPE_DECL
);
1154 for (t
= TREE_TYPE (decl
);
1156 t
= CLASSTYPE_USE_TEMPLATE (t
)
1157 ? TREE_TYPE (CLASSTYPE_TI_TEMPLATE (t
)) : NULL_TREE
)
1158 if (same_type_ignoring_top_level_qualifiers_p (t
, TREE_TYPE (tmpl
)))
1165 /* Returns nonzero iff DECL is a specialization of friend declaration
1166 FRIEND_DECL according to [temp.friend]. */
1169 is_specialization_of_friend (tree decl
, tree friend_decl
)
1171 bool need_template
= true;
1174 gcc_assert (TREE_CODE (decl
) == FUNCTION_DECL
1175 || TREE_CODE (decl
) == TYPE_DECL
);
1177 /* For [temp.friend/6] when FRIEND_DECL is an ordinary member function
1178 of a template class, we want to check if DECL is a specialization
1180 if (TREE_CODE (friend_decl
) == FUNCTION_DECL
1181 && DECL_TEMPLATE_INFO (friend_decl
)
1182 && !DECL_USE_TEMPLATE (friend_decl
))
1184 /* We want a TEMPLATE_DECL for `is_specialization_of'. */
1185 friend_decl
= DECL_TI_TEMPLATE (friend_decl
);
1186 need_template
= false;
1188 else if (TREE_CODE (friend_decl
) == TEMPLATE_DECL
1189 && !PRIMARY_TEMPLATE_P (friend_decl
))
1190 need_template
= false;
1192 /* There is nothing to do if this is not a template friend. */
1193 if (TREE_CODE (friend_decl
) != TEMPLATE_DECL
)
1196 if (is_specialization_of (decl
, friend_decl
))
1200 A member of a class template may be declared to be a friend of a
1201 non-template class. In this case, the corresponding member of
1202 every specialization of the class template is a friend of the
1203 class granting friendship.
1205 For example, given a template friend declaration
1207 template <class T> friend void A<T>::f();
1209 the member function below is considered a friend
1211 template <> struct A<int> {
1215 For this type of template friend, TEMPLATE_DEPTH below will be
1216 nonzero. To determine if DECL is a friend of FRIEND, we first
1217 check if the enclosing class is a specialization of another. */
1219 template_depth
= template_class_depth (CP_DECL_CONTEXT (friend_decl
));
1221 && DECL_CLASS_SCOPE_P (decl
)
1222 && is_specialization_of (TYPE_NAME (DECL_CONTEXT (decl
)),
1223 CLASSTYPE_TI_TEMPLATE (DECL_CONTEXT (friend_decl
))))
1225 /* Next, we check the members themselves. In order to handle
1226 a few tricky cases, such as when FRIEND_DECL's are
1228 template <class T> friend void A<T>::g(T t);
1229 template <class T> template <T t> friend void A<T>::h();
1233 void A<int>::g(int);
1234 template <int> void A<int>::h();
1236 we need to figure out ARGS, the template arguments from
1237 the context of DECL. This is required for template substitution
1238 of `T' in the function parameter of `g' and template parameter
1239 of `h' in the above examples. Here ARGS corresponds to `int'. */
1241 tree context
= DECL_CONTEXT (decl
);
1242 tree args
= NULL_TREE
;
1243 int current_depth
= 0;
1245 while (current_depth
< template_depth
)
1247 if (CLASSTYPE_TEMPLATE_INFO (context
))
1249 if (current_depth
== 0)
1250 args
= TYPE_TI_ARGS (context
);
1252 args
= add_to_template_args (TYPE_TI_ARGS (context
), args
);
1255 context
= TYPE_CONTEXT (context
);
1258 if (TREE_CODE (decl
) == FUNCTION_DECL
)
1263 tree friend_args_type
;
1264 tree decl_args_type
;
1266 /* Make sure that both DECL and FRIEND_DECL are templates or
1268 is_template
= DECL_TEMPLATE_INFO (decl
)
1269 && PRIMARY_TEMPLATE_P (DECL_TI_TEMPLATE (decl
));
1270 if (need_template
^ is_template
)
1272 else if (is_template
)
1274 /* If both are templates, check template parameter list. */
1276 = tsubst_template_parms (DECL_TEMPLATE_PARMS (friend_decl
),
1278 if (!comp_template_parms
1279 (DECL_TEMPLATE_PARMS (DECL_TI_TEMPLATE (decl
)),
1283 decl_type
= TREE_TYPE (DECL_TI_TEMPLATE (decl
));
1286 decl_type
= TREE_TYPE (decl
);
1288 friend_type
= tsubst_function_type (TREE_TYPE (friend_decl
), args
,
1289 tf_none
, NULL_TREE
);
1290 if (friend_type
== error_mark_node
)
1293 /* Check if return types match. */
1294 if (!same_type_p (TREE_TYPE (decl_type
), TREE_TYPE (friend_type
)))
1297 /* Check if function parameter types match, ignoring the
1298 `this' parameter. */
1299 friend_args_type
= TYPE_ARG_TYPES (friend_type
);
1300 decl_args_type
= TYPE_ARG_TYPES (decl_type
);
1301 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (friend_decl
))
1302 friend_args_type
= TREE_CHAIN (friend_args_type
);
1303 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (decl
))
1304 decl_args_type
= TREE_CHAIN (decl_args_type
);
1306 return compparms (decl_args_type
, friend_args_type
);
1310 /* DECL is a TYPE_DECL */
1312 tree decl_type
= TREE_TYPE (decl
);
1314 /* Make sure that both DECL and FRIEND_DECL are templates or
1317 = CLASSTYPE_TEMPLATE_INFO (decl_type
)
1318 && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (decl_type
));
1320 if (need_template
^ is_template
)
1322 else if (is_template
)
1325 /* If both are templates, check the name of the two
1326 TEMPLATE_DECL's first because is_friend didn't. */
1327 if (DECL_NAME (CLASSTYPE_TI_TEMPLATE (decl_type
))
1328 != DECL_NAME (friend_decl
))
1331 /* Now check template parameter list. */
1333 = tsubst_template_parms (DECL_TEMPLATE_PARMS (friend_decl
),
1335 return comp_template_parms
1336 (DECL_TEMPLATE_PARMS (CLASSTYPE_TI_TEMPLATE (decl_type
)),
1340 return (DECL_NAME (decl
)
1341 == DECL_NAME (friend_decl
));
1347 /* Register the specialization SPEC as a specialization of TMPL with
1348 the indicated ARGS. IS_FRIEND indicates whether the specialization
1349 is actually just a friend declaration. Returns SPEC, or an
1350 equivalent prior declaration, if available.
1352 We also store instantiations of field packs in the hash table, even
1353 though they are not themselves templates, to make lookup easier. */
1356 register_specialization (tree spec
, tree tmpl
, tree args
, bool is_friend
,
1360 spec_entry
**slot
= NULL
;
1363 gcc_assert ((TREE_CODE (tmpl
) == TEMPLATE_DECL
&& DECL_P (spec
))
1364 || (TREE_CODE (tmpl
) == FIELD_DECL
1365 && TREE_CODE (spec
) == NONTYPE_ARGUMENT_PACK
));
1367 if (TREE_CODE (spec
) == FUNCTION_DECL
1368 && uses_template_parms (DECL_TI_ARGS (spec
)))
1369 /* This is the FUNCTION_DECL for a partial instantiation. Don't
1370 register it; we want the corresponding TEMPLATE_DECL instead.
1371 We use `uses_template_parms (DECL_TI_ARGS (spec))' rather than
1372 the more obvious `uses_template_parms (spec)' to avoid problems
1373 with default function arguments. In particular, given
1374 something like this:
1376 template <class T> void f(T t1, T t = T())
1378 the default argument expression is not substituted for in an
1379 instantiation unless and until it is actually needed. */
1382 if (optimize_specialization_lookup_p (tmpl
))
1383 /* We don't put these specializations in the hash table, but we might
1384 want to give an error about a mismatch. */
1385 fn
= retrieve_specialization (tmpl
, args
, 0);
1393 hash
= spec_hasher::hash (&elt
);
1396 decl_specializations
->find_slot_with_hash (&elt
, hash
, INSERT
);
1398 fn
= ((spec_entry
*) *slot
)->spec
;
1403 /* We can sometimes try to re-register a specialization that we've
1404 already got. In particular, regenerate_decl_from_template calls
1405 duplicate_decls which will update the specialization list. But,
1406 we'll still get called again here anyhow. It's more convenient
1407 to simply allow this than to try to prevent it. */
1410 else if (fn
&& DECL_TEMPLATE_SPECIALIZATION (spec
))
1412 if (DECL_TEMPLATE_INSTANTIATION (fn
))
1414 if (DECL_ODR_USED (fn
)
1415 || DECL_EXPLICIT_INSTANTIATION (fn
))
1417 error ("specialization of %qD after instantiation",
1419 return error_mark_node
;
1424 /* This situation should occur only if the first
1425 specialization is an implicit instantiation, the
1426 second is an explicit specialization, and the
1427 implicit instantiation has not yet been used. That
1428 situation can occur if we have implicitly
1429 instantiated a member function and then specialized
1432 We can also wind up here if a friend declaration that
1433 looked like an instantiation turns out to be a
1436 template <class T> void foo(T);
1437 class S { friend void foo<>(int) };
1438 template <> void foo(int);
1440 We transform the existing DECL in place so that any
1441 pointers to it become pointers to the updated
1444 If there was a definition for the template, but not
1445 for the specialization, we want this to look as if
1446 there were no definition, and vice versa. */
1447 DECL_INITIAL (fn
) = NULL_TREE
;
1448 duplicate_decls (spec
, fn
, is_friend
);
1449 /* The call to duplicate_decls will have applied
1452 An explicit specialization of a function template
1453 is inline only if it is explicitly declared to be,
1454 and independently of whether its function template
1457 to the primary function; now copy the inline bits to
1458 the various clones. */
1459 FOR_EACH_CLONE (clone
, fn
)
1461 DECL_DECLARED_INLINE_P (clone
)
1462 = DECL_DECLARED_INLINE_P (fn
);
1463 DECL_SOURCE_LOCATION (clone
)
1464 = DECL_SOURCE_LOCATION (fn
);
1465 DECL_DELETED_FN (clone
)
1466 = DECL_DELETED_FN (fn
);
1468 check_specialization_namespace (tmpl
);
1473 else if (DECL_TEMPLATE_SPECIALIZATION (fn
))
1475 if (!duplicate_decls (spec
, fn
, is_friend
) && DECL_INITIAL (spec
))
1476 /* Dup decl failed, but this is a new definition. Set the
1477 line number so any errors match this new
1479 DECL_SOURCE_LOCATION (fn
) = DECL_SOURCE_LOCATION (spec
);
1485 return duplicate_decls (spec
, fn
, is_friend
);
1487 /* A specialization must be declared in the same namespace as the
1488 template it is specializing. */
1489 if (DECL_P (spec
) && DECL_TEMPLATE_SPECIALIZATION (spec
)
1490 && !check_specialization_namespace (tmpl
))
1491 DECL_CONTEXT (spec
) = DECL_CONTEXT (tmpl
);
1493 if (slot
!= NULL
/* !optimize_specialization_lookup_p (tmpl) */)
1495 spec_entry
*entry
= ggc_alloc
<spec_entry
> ();
1496 gcc_assert (tmpl
&& args
&& spec
);
1499 if ((TREE_CODE (spec
) == FUNCTION_DECL
&& DECL_NAMESPACE_SCOPE_P (spec
)
1500 && PRIMARY_TEMPLATE_P (tmpl
)
1501 && DECL_SAVED_TREE (DECL_TEMPLATE_RESULT (tmpl
)) == NULL_TREE
)
1502 || variable_template_p (tmpl
))
1503 /* If TMPL is a forward declaration of a template function, keep a list
1504 of all specializations in case we need to reassign them to a friend
1505 template later in tsubst_friend_function.
1507 Also keep a list of all variable template instantiations so that
1508 process_partial_specialization can check whether a later partial
1509 specialization would have used it. */
1510 DECL_TEMPLATE_INSTANTIATIONS (tmpl
)
1511 = tree_cons (args
, spec
, DECL_TEMPLATE_INSTANTIATIONS (tmpl
));
1517 /* Returns true iff two spec_entry nodes are equivalent. Only compares the
1518 TMPL and ARGS members, ignores SPEC. */
1520 int comparing_specializations
;
1523 spec_hasher::equal (spec_entry
*e1
, spec_entry
*e2
)
1527 ++comparing_specializations
;
1528 equal
= (e1
->tmpl
== e2
->tmpl
1529 && comp_template_args (e1
->args
, e2
->args
));
1530 --comparing_specializations
;
1535 /* Returns a hash for a template TMPL and template arguments ARGS. */
1538 hash_tmpl_and_args (tree tmpl
, tree args
)
1540 hashval_t val
= DECL_UID (tmpl
);
1541 return iterative_hash_template_arg (args
, val
);
1544 /* Returns a hash for a spec_entry node based on the TMPL and ARGS members,
1548 spec_hasher::hash (spec_entry
*e
)
1550 return hash_tmpl_and_args (e
->tmpl
, e
->args
);
1553 /* Recursively calculate a hash value for a template argument ARG, for use
1554 in the hash tables of template specializations. */
1557 iterative_hash_template_arg (tree arg
, hashval_t val
)
1559 unsigned HOST_WIDE_INT i
;
1560 enum tree_code code
;
1563 if (arg
== NULL_TREE
)
1564 return iterative_hash_object (arg
, val
);
1569 if (TREE_CODE (arg
) == ARGUMENT_PACK_SELECT
)
1570 /* We can get one of these when re-hashing a previous entry in the middle
1571 of substituting into a pack expansion. Just look through it. */
1572 arg
= ARGUMENT_PACK_SELECT_FROM_PACK (arg
);
1574 code
= TREE_CODE (arg
);
1575 tclass
= TREE_CODE_CLASS (code
);
1577 val
= iterative_hash_object (code
, val
);
1584 case IDENTIFIER_NODE
:
1585 return iterative_hash_object (IDENTIFIER_HASH_VALUE (arg
), val
);
1589 int i
, len
= TREE_VEC_LENGTH (arg
);
1590 for (i
= 0; i
< len
; ++i
)
1591 val
= iterative_hash_template_arg (TREE_VEC_ELT (arg
, i
), val
);
1595 case TYPE_PACK_EXPANSION
:
1596 case EXPR_PACK_EXPANSION
:
1597 val
= iterative_hash_template_arg (PACK_EXPANSION_PATTERN (arg
), val
);
1598 return iterative_hash_template_arg (PACK_EXPANSION_EXTRA_ARGS (arg
), val
);
1600 case TYPE_ARGUMENT_PACK
:
1601 case NONTYPE_ARGUMENT_PACK
:
1602 return iterative_hash_template_arg (ARGUMENT_PACK_ARGS (arg
), val
);
1605 for (; arg
; arg
= TREE_CHAIN (arg
))
1606 val
= iterative_hash_template_arg (TREE_VALUE (arg
), val
);
1610 for (; arg
; arg
= OVL_NEXT (arg
))
1611 val
= iterative_hash_template_arg (OVL_CURRENT (arg
), val
);
1617 iterative_hash_template_arg (TREE_TYPE (arg
), val
);
1618 FOR_EACH_CONSTRUCTOR_ELT (CONSTRUCTOR_ELTS (arg
), i
, field
, value
)
1620 val
= iterative_hash_template_arg (field
, val
);
1621 val
= iterative_hash_template_arg (value
, val
);
1627 if (!DECL_ARTIFICIAL (arg
))
1629 val
= iterative_hash_object (DECL_PARM_INDEX (arg
), val
);
1630 val
= iterative_hash_object (DECL_PARM_LEVEL (arg
), val
);
1632 return iterative_hash_template_arg (TREE_TYPE (arg
), val
);
1635 return iterative_hash_template_arg (TARGET_EXPR_INITIAL (arg
), val
);
1638 val
= iterative_hash_template_arg (PTRMEM_CST_CLASS (arg
), val
);
1639 return iterative_hash_template_arg (PTRMEM_CST_MEMBER (arg
), val
);
1641 case TEMPLATE_PARM_INDEX
:
1642 val
= iterative_hash_template_arg
1643 (TREE_TYPE (TEMPLATE_PARM_DECL (arg
)), val
);
1644 val
= iterative_hash_object (TEMPLATE_PARM_LEVEL (arg
), val
);
1645 return iterative_hash_object (TEMPLATE_PARM_IDX (arg
), val
);
1648 val
= iterative_hash_object (TRAIT_EXPR_KIND (arg
), val
);
1649 val
= iterative_hash_template_arg (TRAIT_EXPR_TYPE1 (arg
), val
);
1650 return iterative_hash_template_arg (TRAIT_EXPR_TYPE2 (arg
), val
);
1653 val
= iterative_hash_template_arg (BINFO_TYPE (BASELINK_BINFO (arg
)),
1655 return iterative_hash_template_arg (DECL_NAME (get_first_fn (arg
)),
1659 val
= iterative_hash_template_arg (TREE_OPERAND (arg
, 0), val
);
1660 code
= TREE_CODE (TREE_OPERAND (arg
, 1));
1661 val
= iterative_hash_object (code
, val
);
1662 return iterative_hash_template_arg (TREE_OPERAND (arg
, 2), val
);
1665 /* A lambda can't appear in a template arg, but don't crash on
1667 gcc_assert (seen_error ());
1671 case IMPLICIT_CONV_EXPR
:
1672 case STATIC_CAST_EXPR
:
1673 case REINTERPRET_CAST_EXPR
:
1674 case CONST_CAST_EXPR
:
1675 case DYNAMIC_CAST_EXPR
:
1677 val
= iterative_hash_template_arg (TREE_TYPE (arg
), val
);
1678 /* Now hash operands as usual. */
1688 if (alias_template_specialization_p (arg
))
1690 // We want an alias specialization that survived strip_typedefs
1691 // to hash differently from its TYPE_CANONICAL, to avoid hash
1692 // collisions that compare as different in template_args_equal.
1693 // These could be dependent specializations that strip_typedefs
1694 // left alone, or untouched specializations because
1695 // coerce_template_parms returns the unconverted template
1696 // arguments if it sees incomplete argument packs.
1697 tree ti
= TYPE_TEMPLATE_INFO (arg
);
1698 return hash_tmpl_and_args (TI_TEMPLATE (ti
), TI_ARGS (ti
));
1700 if (TYPE_CANONICAL (arg
))
1701 return iterative_hash_object (TYPE_HASH (TYPE_CANONICAL (arg
)),
1703 else if (TREE_CODE (arg
) == DECLTYPE_TYPE
)
1704 return iterative_hash_template_arg (DECLTYPE_TYPE_EXPR (arg
), val
);
1705 /* Otherwise just compare the types during lookup. */
1708 case tcc_declaration
:
1710 return iterative_hash_expr (arg
, val
);
1713 gcc_assert (IS_EXPR_CODE_CLASS (tclass
));
1715 unsigned n
= cp_tree_operand_length (arg
);
1716 for (i
= 0; i
< n
; ++i
)
1717 val
= iterative_hash_template_arg (TREE_OPERAND (arg
, i
), val
);
1725 /* Unregister the specialization SPEC as a specialization of TMPL.
1726 Replace it with NEW_SPEC, if NEW_SPEC is non-NULL. Returns true
1727 if the SPEC was listed as a specialization of TMPL.
1729 Note that SPEC has been ggc_freed, so we can't look inside it. */
1732 reregister_specialization (tree spec
, tree tinfo
, tree new_spec
)
1737 elt
.tmpl
= most_general_template (TI_TEMPLATE (tinfo
));
1738 elt
.args
= TI_ARGS (tinfo
);
1739 elt
.spec
= NULL_TREE
;
1741 entry
= decl_specializations
->find (&elt
);
1744 gcc_assert (entry
->spec
== spec
|| entry
->spec
== new_spec
);
1745 gcc_assert (new_spec
!= NULL_TREE
);
1746 entry
->spec
= new_spec
;
1753 /* Like register_specialization, but for local declarations. We are
1754 registering SPEC, an instantiation of TMPL. */
1757 register_local_specialization (tree spec
, tree tmpl
)
1759 local_specializations
->put (tmpl
, spec
);
1762 /* TYPE is a class type. Returns true if TYPE is an explicitly
1763 specialized class. */
1766 explicit_class_specialization_p (tree type
)
1768 if (!CLASSTYPE_TEMPLATE_SPECIALIZATION (type
))
1770 return !uses_template_parms (CLASSTYPE_TI_ARGS (type
));
1773 /* Print the list of functions at FNS, going through all the overloads
1774 for each element of the list. Alternatively, FNS can not be a
1775 TREE_LIST, in which case it will be printed together with all the
1778 MORE and *STR should respectively be FALSE and NULL when the function
1779 is called from the outside. They are used internally on recursive
1780 calls. print_candidates manages the two parameters and leaves NULL
1781 in *STR when it ends. */
1784 print_candidates_1 (tree fns
, bool more
, const char **str
)
1787 char *spaces
= NULL
;
1789 for (fn
= fns
; fn
; fn
= OVL_NEXT (fn
))
1790 if (TREE_CODE (fn
) == TREE_LIST
)
1792 for (fn2
= fn
; fn2
!= NULL_TREE
; fn2
= TREE_CHAIN (fn2
))
1793 print_candidates_1 (TREE_VALUE (fn2
),
1794 TREE_CHAIN (fn2
) || more
, str
);
1798 tree cand
= OVL_CURRENT (fn
);
1801 /* Pick the prefix string. */
1802 if (!more
&& !OVL_NEXT (fns
))
1804 inform (DECL_SOURCE_LOCATION (cand
),
1805 "candidate is: %#D", cand
);
1809 *str
= _("candidates are:");
1810 spaces
= get_spaces (*str
);
1812 inform (DECL_SOURCE_LOCATION (cand
), "%s %#D", *str
, cand
);
1813 *str
= spaces
? spaces
: *str
;
1823 /* Print the list of candidate FNS in an error message. FNS can also
1824 be a TREE_LIST of non-functions in the case of an ambiguous lookup. */
1827 print_candidates (tree fns
)
1829 const char *str
= NULL
;
1830 print_candidates_1 (fns
, false, &str
);
1831 gcc_assert (str
== NULL
);
1834 /* Returns the template (one of the functions given by TEMPLATE_ID)
1835 which can be specialized to match the indicated DECL with the
1836 explicit template args given in TEMPLATE_ID. The DECL may be
1837 NULL_TREE if none is available. In that case, the functions in
1838 TEMPLATE_ID are non-members.
1840 If NEED_MEMBER_TEMPLATE is nonzero the function is known to be a
1841 specialization of a member template.
1843 The TEMPLATE_COUNT is the number of references to qualifying
1844 template classes that appeared in the name of the function. See
1845 check_explicit_specialization for a more accurate description.
1847 TSK indicates what kind of template declaration (if any) is being
1848 declared. TSK_TEMPLATE indicates that the declaration given by
1849 DECL, though a FUNCTION_DECL, has template parameters, and is
1850 therefore a template function.
1852 The template args (those explicitly specified and those deduced)
1853 are output in a newly created vector *TARGS_OUT.
1855 If it is impossible to determine the result, an error message is
1856 issued. The error_mark_node is returned to indicate failure. */
1859 determine_specialization (tree template_id
,
1862 int need_member_template
,
1868 tree explicit_targs
;
1869 tree candidates
= NULL_TREE
;
1870 /* A TREE_LIST of templates of which DECL may be a specialization.
1871 The TREE_VALUE of each node is a TEMPLATE_DECL. The
1872 corresponding TREE_PURPOSE is the set of template arguments that,
1873 when used to instantiate the template, would produce a function
1874 with the signature of DECL. */
1875 tree templates
= NULL_TREE
;
1877 cp_binding_level
*b
;
1879 *targs_out
= NULL_TREE
;
1881 if (template_id
== error_mark_node
|| decl
== error_mark_node
)
1882 return error_mark_node
;
1884 /* We shouldn't be specializing a member template of an
1885 unspecialized class template; we already gave an error in
1886 check_specialization_scope, now avoid crashing. */
1887 if (template_count
&& DECL_CLASS_SCOPE_P (decl
)
1888 && template_class_depth (DECL_CONTEXT (decl
)) > 0)
1890 gcc_assert (errorcount
);
1891 return error_mark_node
;
1894 fns
= TREE_OPERAND (template_id
, 0);
1895 explicit_targs
= TREE_OPERAND (template_id
, 1);
1897 if (fns
== error_mark_node
)
1898 return error_mark_node
;
1900 /* Check for baselinks. */
1901 if (BASELINK_P (fns
))
1902 fns
= BASELINK_FUNCTIONS (fns
);
1904 if (TREE_CODE (decl
) == FUNCTION_DECL
&& !is_overloaded_fn (fns
))
1906 error ("%qD is not a function template", fns
);
1907 return error_mark_node
;
1909 else if (VAR_P (decl
) && !variable_template_p (fns
))
1911 error ("%qD is not a variable template", fns
);
1912 return error_mark_node
;
1915 /* Count the number of template headers specified for this
1918 for (b
= current_binding_level
;
1919 b
->kind
== sk_template_parms
;
1923 if (variable_template_p (fns
))
1925 tree parms
= INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (fns
));
1926 targs
= coerce_template_parms (parms
, explicit_targs
, fns
,
1927 tf_warning_or_error
,
1928 /*req_all*/true, /*use_defarg*/true);
1929 templates
= tree_cons (targs
, fns
, templates
);
1931 else for (; fns
; fns
= OVL_NEXT (fns
))
1933 tree fn
= OVL_CURRENT (fns
);
1935 if (TREE_CODE (fn
) == TEMPLATE_DECL
)
1937 tree decl_arg_types
;
1941 /* In case of explicit specialization, we need to check if
1942 the number of template headers appearing in the specialization
1943 is correct. This is usually done in check_explicit_specialization,
1944 but the check done there cannot be exhaustive when specializing
1945 member functions. Consider the following code:
1947 template <> void A<int>::f(int);
1948 template <> template <> void A<int>::f(int);
1950 Assuming that A<int> is not itself an explicit specialization
1951 already, the first line specializes "f" which is a non-template
1952 member function, whilst the second line specializes "f" which
1953 is a template member function. So both lines are syntactically
1954 correct, and check_explicit_specialization does not reject
1957 Here, we can do better, as we are matching the specialization
1958 against the declarations. We count the number of template
1959 headers, and we check if they match TEMPLATE_COUNT + 1
1960 (TEMPLATE_COUNT is the number of qualifying template classes,
1961 plus there must be another header for the member template
1964 Notice that if header_count is zero, this is not a
1965 specialization but rather a template instantiation, so there
1966 is no check we can perform here. */
1967 if (header_count
&& header_count
!= template_count
+ 1)
1970 /* Check that the number of template arguments at the
1971 innermost level for DECL is the same as for FN. */
1972 if (current_binding_level
->kind
== sk_template_parms
1973 && !current_binding_level
->explicit_spec_p
1974 && (TREE_VEC_LENGTH (DECL_INNERMOST_TEMPLATE_PARMS (fn
))
1975 != TREE_VEC_LENGTH (INNERMOST_TEMPLATE_PARMS
1976 (current_template_parms
))))
1979 /* DECL might be a specialization of FN. */
1980 decl_arg_types
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
1981 fn_arg_types
= TYPE_ARG_TYPES (TREE_TYPE (fn
));
1983 /* For a non-static member function, we need to make sure
1984 that the const qualification is the same. Since
1985 get_bindings does not try to merge the "this" parameter,
1986 we must do the comparison explicitly. */
1987 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (fn
)
1988 && !same_type_p (TREE_VALUE (fn_arg_types
),
1989 TREE_VALUE (decl_arg_types
)))
1992 /* Skip the "this" parameter and, for constructors of
1993 classes with virtual bases, the VTT parameter. A
1994 full specialization of a constructor will have a VTT
1995 parameter, but a template never will. */
1997 = skip_artificial_parms_for (decl
, decl_arg_types
);
1999 = skip_artificial_parms_for (fn
, fn_arg_types
);
2001 /* Function templates cannot be specializations; there are
2002 no partial specializations of functions. Therefore, if
2003 the type of DECL does not match FN, there is no
2005 if (tsk
== tsk_template
)
2007 if (compparms (fn_arg_types
, decl_arg_types
))
2008 candidates
= tree_cons (NULL_TREE
, fn
, candidates
);
2012 /* See whether this function might be a specialization of this
2013 template. Suppress access control because we might be trying
2014 to make this specialization a friend, and we have already done
2015 access control for the declaration of the specialization. */
2016 push_deferring_access_checks (dk_no_check
);
2017 targs
= get_bindings (fn
, decl
, explicit_targs
, /*check_ret=*/true);
2018 pop_deferring_access_checks ();
2021 /* We cannot deduce template arguments that when used to
2022 specialize TMPL will produce DECL. */
2025 /* Make sure that the deduced arguments actually work. */
2026 insttype
= tsubst (TREE_TYPE (fn
), targs
, tf_none
, NULL_TREE
);
2027 if (insttype
== error_mark_node
)
2030 = skip_artificial_parms_for (fn
, TYPE_ARG_TYPES (insttype
));
2031 if (!compparms (fn_arg_types
, decl_arg_types
))
2034 /* Save this template, and the arguments deduced. */
2035 templates
= tree_cons (targs
, fn
, templates
);
2037 else if (need_member_template
)
2038 /* FN is an ordinary member function, and we need a
2039 specialization of a member template. */
2041 else if (TREE_CODE (fn
) != FUNCTION_DECL
)
2042 /* We can get IDENTIFIER_NODEs here in certain erroneous
2045 else if (!DECL_FUNCTION_MEMBER_P (fn
))
2046 /* This is just an ordinary non-member function. Nothing can
2047 be a specialization of that. */
2049 else if (DECL_ARTIFICIAL (fn
))
2050 /* Cannot specialize functions that are created implicitly. */
2054 tree decl_arg_types
;
2056 /* This is an ordinary member function. However, since
2057 we're here, we can assume its enclosing class is a
2058 template class. For example,
2060 template <typename T> struct S { void f(); };
2061 template <> void S<int>::f() {}
2063 Here, S<int>::f is a non-template, but S<int> is a
2064 template class. If FN has the same type as DECL, we
2065 might be in business. */
2067 if (!DECL_TEMPLATE_INFO (fn
))
2068 /* Its enclosing class is an explicit specialization
2069 of a template class. This is not a candidate. */
2072 if (!same_type_p (TREE_TYPE (TREE_TYPE (decl
)),
2073 TREE_TYPE (TREE_TYPE (fn
))))
2074 /* The return types differ. */
2077 /* Adjust the type of DECL in case FN is a static member. */
2078 decl_arg_types
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
2079 if (DECL_STATIC_FUNCTION_P (fn
)
2080 && DECL_NONSTATIC_MEMBER_FUNCTION_P (decl
))
2081 decl_arg_types
= TREE_CHAIN (decl_arg_types
);
2083 if (compparms (TYPE_ARG_TYPES (TREE_TYPE (fn
)),
2086 candidates
= tree_cons (NULL_TREE
, fn
, candidates
);
2090 if (templates
&& TREE_CHAIN (templates
))
2096 It is possible for a specialization with a given function
2097 signature to be instantiated from more than one function
2098 template. In such cases, explicit specification of the
2099 template arguments must be used to uniquely identify the
2100 function template specialization being specialized.
2102 Note that here, there's no suggestion that we're supposed to
2103 determine which of the candidate templates is most
2104 specialized. However, we, also have:
2108 Partial ordering of overloaded function template
2109 declarations is used in the following contexts to select
2110 the function template to which a function template
2111 specialization refers:
2113 -- when an explicit specialization refers to a function
2116 So, we do use the partial ordering rules, at least for now.
2117 This extension can only serve to make invalid programs valid,
2118 so it's safe. And, there is strong anecdotal evidence that
2119 the committee intended the partial ordering rules to apply;
2120 the EDG front end has that behavior, and John Spicer claims
2121 that the committee simply forgot to delete the wording in
2122 [temp.expl.spec]. */
2123 tree tmpl
= most_specialized_instantiation (templates
);
2124 if (tmpl
!= error_mark_node
)
2127 TREE_CHAIN (templates
) = NULL_TREE
;
2131 if (templates
== NULL_TREE
&& candidates
== NULL_TREE
)
2133 error ("template-id %qD for %q+D does not match any template "
2134 "declaration", template_id
, decl
);
2135 if (header_count
&& header_count
!= template_count
+ 1)
2136 inform (input_location
, "saw %d %<template<>%>, need %d for "
2137 "specializing a member function template",
2138 header_count
, template_count
+ 1);
2139 return error_mark_node
;
2141 else if ((templates
&& TREE_CHAIN (templates
))
2142 || (candidates
&& TREE_CHAIN (candidates
))
2143 || (templates
&& candidates
))
2145 error ("ambiguous template specialization %qD for %q+D",
2147 candidates
= chainon (candidates
, templates
);
2148 print_candidates (candidates
);
2149 return error_mark_node
;
2152 /* We have one, and exactly one, match. */
2155 tree fn
= TREE_VALUE (candidates
);
2156 *targs_out
= copy_node (DECL_TI_ARGS (fn
));
2157 /* DECL is a re-declaration or partial instantiation of a template
2159 if (TREE_CODE (fn
) == TEMPLATE_DECL
)
2161 /* It was a specialization of an ordinary member function in a
2163 return DECL_TI_TEMPLATE (fn
);
2166 /* It was a specialization of a template. */
2167 targs
= DECL_TI_ARGS (DECL_TEMPLATE_RESULT (TREE_VALUE (templates
)));
2168 if (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (targs
))
2170 *targs_out
= copy_node (targs
);
2171 SET_TMPL_ARGS_LEVEL (*targs_out
,
2172 TMPL_ARGS_DEPTH (*targs_out
),
2173 TREE_PURPOSE (templates
));
2176 *targs_out
= TREE_PURPOSE (templates
);
2177 return TREE_VALUE (templates
);
2180 /* Returns a chain of parameter types, exactly like the SPEC_TYPES,
2181 but with the default argument values filled in from those in the
2185 copy_default_args_to_explicit_spec_1 (tree spec_types
,
2188 tree new_spec_types
;
2193 if (spec_types
== void_list_node
)
2194 return void_list_node
;
2196 /* Substitute into the rest of the list. */
2198 copy_default_args_to_explicit_spec_1 (TREE_CHAIN (spec_types
),
2199 TREE_CHAIN (tmpl_types
));
2201 /* Add the default argument for this parameter. */
2202 return hash_tree_cons (TREE_PURPOSE (tmpl_types
),
2203 TREE_VALUE (spec_types
),
2207 /* DECL is an explicit specialization. Replicate default arguments
2208 from the template it specializes. (That way, code like:
2210 template <class T> void f(T = 3);
2211 template <> void f(double);
2214 works, as required.) An alternative approach would be to look up
2215 the correct default arguments at the call-site, but this approach
2216 is consistent with how implicit instantiations are handled. */
2219 copy_default_args_to_explicit_spec (tree decl
)
2224 tree new_spec_types
;
2228 tree object_type
= NULL_TREE
;
2229 tree in_charge
= NULL_TREE
;
2230 tree vtt
= NULL_TREE
;
2232 /* See if there's anything we need to do. */
2233 tmpl
= DECL_TI_TEMPLATE (decl
);
2234 tmpl_types
= TYPE_ARG_TYPES (TREE_TYPE (DECL_TEMPLATE_RESULT (tmpl
)));
2235 for (t
= tmpl_types
; t
; t
= TREE_CHAIN (t
))
2236 if (TREE_PURPOSE (t
))
2241 old_type
= TREE_TYPE (decl
);
2242 spec_types
= TYPE_ARG_TYPES (old_type
);
2244 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (decl
))
2246 /* Remove the this pointer, but remember the object's type for
2248 object_type
= TREE_TYPE (TREE_VALUE (spec_types
));
2249 spec_types
= TREE_CHAIN (spec_types
);
2250 tmpl_types
= TREE_CHAIN (tmpl_types
);
2252 if (DECL_HAS_IN_CHARGE_PARM_P (decl
))
2254 /* DECL may contain more parameters than TMPL due to the extra
2255 in-charge parameter in constructors and destructors. */
2256 in_charge
= spec_types
;
2257 spec_types
= TREE_CHAIN (spec_types
);
2259 if (DECL_HAS_VTT_PARM_P (decl
))
2262 spec_types
= TREE_CHAIN (spec_types
);
2266 /* Compute the merged default arguments. */
2268 copy_default_args_to_explicit_spec_1 (spec_types
, tmpl_types
);
2270 /* Compute the new FUNCTION_TYPE. */
2274 new_spec_types
= hash_tree_cons (TREE_PURPOSE (vtt
),
2279 /* Put the in-charge parameter back. */
2280 new_spec_types
= hash_tree_cons (TREE_PURPOSE (in_charge
),
2281 TREE_VALUE (in_charge
),
2284 new_type
= build_method_type_directly (object_type
,
2285 TREE_TYPE (old_type
),
2289 new_type
= build_function_type (TREE_TYPE (old_type
),
2291 new_type
= cp_build_type_attribute_variant (new_type
,
2292 TYPE_ATTRIBUTES (old_type
));
2293 new_type
= build_exception_variant (new_type
,
2294 TYPE_RAISES_EXCEPTIONS (old_type
));
2296 if (TYPE_HAS_LATE_RETURN_TYPE (old_type
))
2297 TYPE_HAS_LATE_RETURN_TYPE (new_type
) = 1;
2299 TREE_TYPE (decl
) = new_type
;
2302 /* Return the number of template headers we expect to see for a definition
2303 or specialization of CTYPE or one of its non-template members. */
2306 num_template_headers_for_class (tree ctype
)
2308 int num_templates
= 0;
2310 while (ctype
&& CLASS_TYPE_P (ctype
))
2312 /* You're supposed to have one `template <...>' for every
2313 template class, but you don't need one for a full
2314 specialization. For example:
2316 template <class T> struct S{};
2317 template <> struct S<int> { void f(); };
2318 void S<int>::f () {}
2320 is correct; there shouldn't be a `template <>' for the
2321 definition of `S<int>::f'. */
2322 if (!CLASSTYPE_TEMPLATE_INFO (ctype
))
2323 /* If CTYPE does not have template information of any
2324 kind, then it is not a template, nor is it nested
2325 within a template. */
2327 if (explicit_class_specialization_p (ctype
))
2329 if (PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (ctype
)))
2332 ctype
= TYPE_CONTEXT (ctype
);
2335 return num_templates
;
2338 /* Do a simple sanity check on the template headers that precede the
2339 variable declaration DECL. */
2342 check_template_variable (tree decl
)
2344 tree ctx
= CP_DECL_CONTEXT (decl
);
2345 int wanted
= num_template_headers_for_class (ctx
);
2346 if (DECL_LANG_SPECIFIC (decl
) && DECL_TEMPLATE_INFO (decl
)
2347 && PRIMARY_TEMPLATE_P (DECL_TI_TEMPLATE (decl
)))
2349 if (cxx_dialect
< cxx14
)
2350 pedwarn (DECL_SOURCE_LOCATION (decl
), 0,
2351 "variable templates only available with "
2352 "-std=c++14 or -std=gnu++14");
2354 // Namespace-scope variable templates should have a template header.
2357 if (template_header_count
> wanted
)
2359 bool warned
= pedwarn (DECL_SOURCE_LOCATION (decl
), 0,
2360 "too many template headers for %D (should be %d)",
2362 if (warned
&& CLASS_TYPE_P (ctx
)
2363 && CLASSTYPE_TEMPLATE_SPECIALIZATION (ctx
))
2364 inform (DECL_SOURCE_LOCATION (decl
),
2365 "members of an explicitly specialized class are defined "
2366 "without a template header");
2370 /* Check to see if the function just declared, as indicated in
2371 DECLARATOR, and in DECL, is a specialization of a function
2372 template. We may also discover that the declaration is an explicit
2373 instantiation at this point.
2375 Returns DECL, or an equivalent declaration that should be used
2376 instead if all goes well. Issues an error message if something is
2377 amiss. Returns error_mark_node if the error is not easily
2380 FLAGS is a bitmask consisting of the following flags:
2382 2: The function has a definition.
2383 4: The function is a friend.
2385 The TEMPLATE_COUNT is the number of references to qualifying
2386 template classes that appeared in the name of the function. For
2389 template <class T> struct S { void f(); };
2392 the TEMPLATE_COUNT would be 1. However, explicitly specialized
2393 classes are not counted in the TEMPLATE_COUNT, so that in
2395 template <class T> struct S {};
2396 template <> struct S<int> { void f(); }
2397 template <> void S<int>::f();
2399 the TEMPLATE_COUNT would be 0. (Note that this declaration is
2400 invalid; there should be no template <>.)
2402 If the function is a specialization, it is marked as such via
2403 DECL_TEMPLATE_SPECIALIZATION. Furthermore, its DECL_TEMPLATE_INFO
2404 is set up correctly, and it is added to the list of specializations
2405 for that template. */
2408 check_explicit_specialization (tree declarator
,
2413 int have_def
= flags
& 2;
2414 int is_friend
= flags
& 4;
2415 int specialization
= 0;
2416 int explicit_instantiation
= 0;
2417 int member_specialization
= 0;
2418 tree ctype
= DECL_CLASS_CONTEXT (decl
);
2419 tree dname
= DECL_NAME (decl
);
2424 if (!processing_specialization
)
2427 tsk
= tsk_excessive_parms
;
2430 tsk
= current_tmpl_spec_kind (template_count
);
2435 if (processing_specialization
&& TREE_CODE (decl
) != VAR_DECL
)
2438 SET_DECL_TEMPLATE_SPECIALIZATION (decl
);
2440 else if (TREE_CODE (declarator
) == TEMPLATE_ID_EXPR
)
2443 /* This could be something like:
2445 template <class T> void f(T);
2446 class S { friend void f<>(int); } */
2450 /* This case handles bogus declarations like template <>
2451 template <class T> void f<int>(); */
2453 error ("template-id %qD in declaration of primary template",
2460 case tsk_invalid_member_spec
:
2461 /* The error has already been reported in
2462 check_specialization_scope. */
2463 return error_mark_node
;
2465 case tsk_invalid_expl_inst
:
2466 error ("template parameter list used in explicit instantiation");
2472 error ("definition provided for explicit instantiation");
2474 explicit_instantiation
= 1;
2477 case tsk_excessive_parms
:
2478 case tsk_insufficient_parms
:
2479 if (tsk
== tsk_excessive_parms
)
2480 error ("too many template parameter lists in declaration of %qD",
2482 else if (template_header_count
)
2483 error("too few template parameter lists in declaration of %qD", decl
);
2485 error("explicit specialization of %qD must be introduced by "
2486 "%<template <>%>", decl
);
2490 if (VAR_P (decl
) && TREE_CODE (declarator
) != TEMPLATE_ID_EXPR
)
2491 /* In cases like template<> constexpr bool v = true;
2492 We'll give an error in check_template_variable. */
2495 SET_DECL_TEMPLATE_SPECIALIZATION (decl
);
2497 member_specialization
= 1;
2503 if (TREE_CODE (declarator
) == TEMPLATE_ID_EXPR
)
2505 /* This case handles bogus declarations like template <>
2506 template <class T> void f<int>(); */
2508 if (!uses_template_parms (declarator
))
2509 error ("template-id %qD in declaration of primary template",
2511 else if (variable_template_p (TREE_OPERAND (declarator
, 0)))
2513 /* Partial specialization of variable template. */
2514 SET_DECL_TEMPLATE_SPECIALIZATION (decl
);
2518 else if (cxx_dialect
< cxx14
)
2519 error ("non-type partial specialization %qD "
2520 "is not allowed", declarator
);
2522 error ("non-class, non-variable partial specialization %qD "
2523 "is not allowed", declarator
);
2528 if (ctype
&& CLASSTYPE_TEMPLATE_INSTANTIATION (ctype
))
2529 /* This is a specialization of a member template, without
2530 specialization the containing class. Something like:
2532 template <class T> struct S {
2533 template <class U> void f (U);
2535 template <> template <class U> void S<int>::f(U) {}
2537 That's a specialization -- but of the entire template. */
2545 if ((specialization
|| member_specialization
)
2546 /* This doesn't apply to variable templates. */
2547 && (TREE_CODE (TREE_TYPE (decl
)) == FUNCTION_TYPE
2548 || TREE_CODE (TREE_TYPE (decl
)) == METHOD_TYPE
))
2550 tree t
= TYPE_ARG_TYPES (TREE_TYPE (decl
));
2551 for (; t
; t
= TREE_CHAIN (t
))
2552 if (TREE_PURPOSE (t
))
2554 permerror (input_location
,
2555 "default argument specified in explicit specialization");
2560 if (specialization
|| member_specialization
|| explicit_instantiation
)
2562 tree tmpl
= NULL_TREE
;
2563 tree targs
= NULL_TREE
;
2564 bool was_template_id
= (TREE_CODE (declarator
) == TEMPLATE_ID_EXPR
);
2566 /* Make sure that the declarator is a TEMPLATE_ID_EXPR. */
2567 if (!was_template_id
)
2571 gcc_assert (identifier_p (declarator
));
2576 /* If there is no class context, the explicit instantiation
2577 must be at namespace scope. */
2578 gcc_assert (DECL_NAMESPACE_SCOPE_P (decl
));
2580 /* Find the namespace binding, using the declaration
2582 fns
= lookup_qualified_name (CP_DECL_CONTEXT (decl
), dname
,
2584 if (fns
== error_mark_node
|| !is_overloaded_fn (fns
))
2586 error ("%qD is not a template function", dname
);
2587 fns
= error_mark_node
;
2591 tree fn
= OVL_CURRENT (fns
);
2592 if (!is_associated_namespace (CP_DECL_CONTEXT (decl
),
2593 CP_DECL_CONTEXT (fn
)))
2594 error ("%qD is not declared in %qD",
2595 decl
, current_namespace
);
2599 declarator
= lookup_template_function (fns
, NULL_TREE
);
2602 if (declarator
== error_mark_node
)
2603 return error_mark_node
;
2605 if (ctype
!= NULL_TREE
&& TYPE_BEING_DEFINED (ctype
))
2607 if (!explicit_instantiation
)
2608 /* A specialization in class scope. This is invalid,
2609 but the error will already have been flagged by
2610 check_specialization_scope. */
2611 return error_mark_node
;
2614 /* It's not valid to write an explicit instantiation in
2617 class C { template void f(); }
2619 This case is caught by the parser. However, on
2622 template class C { void f(); };
2624 (which is invalid) we can get here. The error will be
2631 else if (ctype
!= NULL_TREE
2632 && (identifier_p (TREE_OPERAND (declarator
, 0))))
2634 // We'll match variable templates in start_decl.
2638 /* Find the list of functions in ctype that have the same
2639 name as the declared function. */
2640 tree name
= TREE_OPERAND (declarator
, 0);
2641 tree fns
= NULL_TREE
;
2644 if (constructor_name_p (name
, ctype
))
2646 int is_constructor
= DECL_CONSTRUCTOR_P (decl
);
2648 if (is_constructor
? !TYPE_HAS_USER_CONSTRUCTOR (ctype
)
2649 : !CLASSTYPE_DESTRUCTORS (ctype
))
2651 /* From [temp.expl.spec]:
2653 If such an explicit specialization for the member
2654 of a class template names an implicitly-declared
2655 special member function (clause _special_), the
2656 program is ill-formed.
2658 Similar language is found in [temp.explicit]. */
2659 error ("specialization of implicitly-declared special member function");
2660 return error_mark_node
;
2663 name
= is_constructor
? ctor_identifier
: dtor_identifier
;
2666 if (!DECL_CONV_FN_P (decl
))
2668 idx
= lookup_fnfields_1 (ctype
, name
);
2670 fns
= (*CLASSTYPE_METHOD_VEC (ctype
))[idx
];
2674 vec
<tree
, va_gc
> *methods
;
2677 /* For a type-conversion operator, we cannot do a
2678 name-based lookup. We might be looking for `operator
2679 int' which will be a specialization of `operator T'.
2680 So, we find *all* the conversion operators, and then
2681 select from them. */
2684 methods
= CLASSTYPE_METHOD_VEC (ctype
);
2686 for (idx
= CLASSTYPE_FIRST_CONVERSION_SLOT
;
2687 methods
->iterate (idx
, &ovl
);
2690 if (!DECL_CONV_FN_P (OVL_CURRENT (ovl
)))
2691 /* There are no more conversion functions. */
2694 /* Glue all these conversion functions together
2695 with those we already have. */
2696 for (; ovl
; ovl
= OVL_NEXT (ovl
))
2697 fns
= ovl_cons (OVL_CURRENT (ovl
), fns
);
2701 if (fns
== NULL_TREE
)
2703 error ("no member function %qD declared in %qT", name
, ctype
);
2704 return error_mark_node
;
2707 TREE_OPERAND (declarator
, 0) = fns
;
2710 /* Figure out what exactly is being specialized at this point.
2711 Note that for an explicit instantiation, even one for a
2712 member function, we cannot tell apriori whether the
2713 instantiation is for a member template, or just a member
2714 function of a template class. Even if a member template is
2715 being instantiated, the member template arguments may be
2716 elided if they can be deduced from the rest of the
2718 tmpl
= determine_specialization (declarator
, decl
,
2720 member_specialization
,
2724 if (!tmpl
|| tmpl
== error_mark_node
)
2725 /* We couldn't figure out what this declaration was
2727 return error_mark_node
;
2730 tree gen_tmpl
= most_general_template (tmpl
);
2732 if (explicit_instantiation
)
2734 /* We don't set DECL_EXPLICIT_INSTANTIATION here; that
2735 is done by do_decl_instantiation later. */
2737 int arg_depth
= TMPL_ARGS_DEPTH (targs
);
2738 int parm_depth
= TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (tmpl
));
2740 if (arg_depth
> parm_depth
)
2742 /* If TMPL is not the most general template (for
2743 example, if TMPL is a friend template that is
2744 injected into namespace scope), then there will
2745 be too many levels of TARGS. Remove some of them
2750 new_targs
= make_tree_vec (parm_depth
);
2751 for (i
= arg_depth
- parm_depth
; i
< arg_depth
; ++i
)
2752 TREE_VEC_ELT (new_targs
, i
- (arg_depth
- parm_depth
))
2753 = TREE_VEC_ELT (targs
, i
);
2757 return instantiate_template (tmpl
, targs
, tf_error
);
2760 /* If we thought that the DECL was a member function, but it
2761 turns out to be specializing a static member function,
2762 make DECL a static member function as well. */
2763 if (DECL_FUNCTION_TEMPLATE_P (tmpl
)
2764 && DECL_STATIC_FUNCTION_P (tmpl
)
2765 && DECL_NONSTATIC_MEMBER_FUNCTION_P (decl
))
2766 revert_static_member_fn (decl
);
2768 /* If this is a specialization of a member template of a
2769 template class, we want to return the TEMPLATE_DECL, not
2770 the specialization of it. */
2771 if (tsk
== tsk_template
&& !was_template_id
)
2773 tree result
= DECL_TEMPLATE_RESULT (tmpl
);
2774 SET_DECL_TEMPLATE_SPECIALIZATION (tmpl
);
2775 DECL_INITIAL (result
) = NULL_TREE
;
2779 DECL_SOURCE_LOCATION (tmpl
) = DECL_SOURCE_LOCATION (decl
);
2780 DECL_SOURCE_LOCATION (result
)
2781 = DECL_SOURCE_LOCATION (decl
);
2782 /* We want to use the argument list specified in the
2783 definition, not in the original declaration. */
2784 DECL_ARGUMENTS (result
) = DECL_ARGUMENTS (decl
);
2785 for (parm
= DECL_ARGUMENTS (result
); parm
;
2786 parm
= DECL_CHAIN (parm
))
2787 DECL_CONTEXT (parm
) = result
;
2789 return register_specialization (tmpl
, gen_tmpl
, targs
,
2793 /* Set up the DECL_TEMPLATE_INFO for DECL. */
2794 DECL_TEMPLATE_INFO (decl
) = build_template_info (tmpl
, targs
);
2796 if (was_template_id
)
2797 TINFO_USED_TEMPLATE_ID (DECL_TEMPLATE_INFO (decl
)) = true;
2799 /* Inherit default function arguments from the template
2800 DECL is specializing. */
2801 if (DECL_FUNCTION_TEMPLATE_P (tmpl
))
2802 copy_default_args_to_explicit_spec (decl
);
2804 /* This specialization has the same protection as the
2805 template it specializes. */
2806 TREE_PRIVATE (decl
) = TREE_PRIVATE (gen_tmpl
);
2807 TREE_PROTECTED (decl
) = TREE_PROTECTED (gen_tmpl
);
2809 /* 7.1.1-1 [dcl.stc]
2811 A storage-class-specifier shall not be specified in an
2812 explicit specialization...
2814 The parser rejects these, so unless action is taken here,
2815 explicit function specializations will always appear with
2818 The action recommended by the C++ CWG in response to C++
2819 defect report 605 is to make the storage class and linkage
2820 of the explicit specialization match the templated function:
2822 http://www.open-std.org/jtc1/sc22/wg21/docs/cwg_active.html#605
2824 if (tsk
== tsk_expl_spec
&& DECL_FUNCTION_TEMPLATE_P (gen_tmpl
))
2826 tree tmpl_func
= DECL_TEMPLATE_RESULT (gen_tmpl
);
2827 gcc_assert (TREE_CODE (tmpl_func
) == FUNCTION_DECL
);
2829 /* This specialization has the same linkage and visibility as
2830 the function template it specializes. */
2831 TREE_PUBLIC (decl
) = TREE_PUBLIC (tmpl_func
);
2832 if (! TREE_PUBLIC (decl
))
2834 DECL_INTERFACE_KNOWN (decl
) = 1;
2835 DECL_NOT_REALLY_EXTERN (decl
) = 1;
2837 DECL_THIS_STATIC (decl
) = DECL_THIS_STATIC (tmpl_func
);
2838 if (DECL_VISIBILITY_SPECIFIED (tmpl_func
))
2840 DECL_VISIBILITY_SPECIFIED (decl
) = 1;
2841 DECL_VISIBILITY (decl
) = DECL_VISIBILITY (tmpl_func
);
2845 /* If DECL is a friend declaration, declared using an
2846 unqualified name, the namespace associated with DECL may
2847 have been set incorrectly. For example, in:
2849 template <typename T> void f(T);
2851 struct S { friend void f<int>(int); }
2854 we will have set the DECL_CONTEXT for the friend
2855 declaration to N, rather than to the global namespace. */
2856 if (DECL_NAMESPACE_SCOPE_P (decl
))
2857 DECL_CONTEXT (decl
) = DECL_CONTEXT (tmpl
);
2859 if (is_friend
&& !have_def
)
2860 /* This is not really a declaration of a specialization.
2861 It's just the name of an instantiation. But, it's not
2862 a request for an instantiation, either. */
2863 SET_DECL_IMPLICIT_INSTANTIATION (decl
);
2864 else if (TREE_CODE (decl
) == FUNCTION_DECL
)
2865 /* A specialization is not necessarily COMDAT. */
2866 DECL_COMDAT (decl
) = (TREE_PUBLIC (decl
)
2867 && DECL_DECLARED_INLINE_P (decl
));
2868 else if (TREE_CODE (decl
) == VAR_DECL
)
2869 DECL_COMDAT (decl
) = false;
2871 /* Register this specialization so that we can find it
2873 decl
= register_specialization (decl
, gen_tmpl
, targs
, is_friend
, 0);
2875 /* A 'structor should already have clones. */
2876 gcc_assert (decl
== error_mark_node
2877 || variable_template_p (tmpl
)
2878 || !(DECL_CONSTRUCTOR_P (decl
)
2879 || DECL_DESTRUCTOR_P (decl
))
2880 || DECL_CLONED_FUNCTION_P (DECL_CHAIN (decl
)));
2887 /* Returns 1 iff PARMS1 and PARMS2 are identical sets of template
2888 parameters. These are represented in the same format used for
2889 DECL_TEMPLATE_PARMS. */
2892 comp_template_parms (const_tree parms1
, const_tree parms2
)
2897 if (parms1
== parms2
)
2900 for (p1
= parms1
, p2
= parms2
;
2901 p1
!= NULL_TREE
&& p2
!= NULL_TREE
;
2902 p1
= TREE_CHAIN (p1
), p2
= TREE_CHAIN (p2
))
2904 tree t1
= TREE_VALUE (p1
);
2905 tree t2
= TREE_VALUE (p2
);
2908 gcc_assert (TREE_CODE (t1
) == TREE_VEC
);
2909 gcc_assert (TREE_CODE (t2
) == TREE_VEC
);
2911 if (TREE_VEC_LENGTH (t1
) != TREE_VEC_LENGTH (t2
))
2914 for (i
= 0; i
< TREE_VEC_LENGTH (t2
); ++i
)
2916 tree parm1
= TREE_VALUE (TREE_VEC_ELT (t1
, i
));
2917 tree parm2
= TREE_VALUE (TREE_VEC_ELT (t2
, i
));
2919 /* If either of the template parameters are invalid, assume
2920 they match for the sake of error recovery. */
2921 if (error_operand_p (parm1
) || error_operand_p (parm2
))
2924 if (TREE_CODE (parm1
) != TREE_CODE (parm2
))
2927 if (TREE_CODE (parm1
) == TEMPLATE_TYPE_PARM
2928 && (TEMPLATE_TYPE_PARAMETER_PACK (parm1
)
2929 == TEMPLATE_TYPE_PARAMETER_PACK (parm2
)))
2931 else if (!same_type_p (TREE_TYPE (parm1
), TREE_TYPE (parm2
)))
2936 if ((p1
!= NULL_TREE
) != (p2
!= NULL_TREE
))
2937 /* One set of parameters has more parameters lists than the
2944 /* Determine whether PARM is a parameter pack. */
2947 template_parameter_pack_p (const_tree parm
)
2949 /* Determine if we have a non-type template parameter pack. */
2950 if (TREE_CODE (parm
) == PARM_DECL
)
2951 return (DECL_TEMPLATE_PARM_P (parm
)
2952 && TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
)));
2953 if (TREE_CODE (parm
) == TEMPLATE_PARM_INDEX
)
2954 return TEMPLATE_PARM_PARAMETER_PACK (parm
);
2956 /* If this is a list of template parameters, we could get a
2957 TYPE_DECL or a TEMPLATE_DECL. */
2958 if (TREE_CODE (parm
) == TYPE_DECL
|| TREE_CODE (parm
) == TEMPLATE_DECL
)
2959 parm
= TREE_TYPE (parm
);
2961 /* Otherwise it must be a type template parameter. */
2962 return ((TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
2963 || TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
)
2964 && TEMPLATE_TYPE_PARAMETER_PACK (parm
));
2967 /* Determine if T is a function parameter pack. */
2970 function_parameter_pack_p (const_tree t
)
2972 if (t
&& TREE_CODE (t
) == PARM_DECL
)
2973 return DECL_PACK_P (t
);
2977 /* Return the function template declaration of PRIMARY_FUNC_TMPL_INST.
2978 PRIMARY_FUNC_TMPL_INST is a primary function template instantiation. */
2981 get_function_template_decl (const_tree primary_func_tmpl_inst
)
2983 if (! primary_func_tmpl_inst
2984 || TREE_CODE (primary_func_tmpl_inst
) != FUNCTION_DECL
2985 || ! primary_template_instantiation_p (primary_func_tmpl_inst
))
2988 return DECL_TEMPLATE_RESULT (DECL_TI_TEMPLATE (primary_func_tmpl_inst
));
2991 /* Return true iff the function parameter PARAM_DECL was expanded
2992 from the function parameter pack PACK. */
2995 function_parameter_expanded_from_pack_p (tree param_decl
, tree pack
)
2997 if (DECL_ARTIFICIAL (param_decl
)
2998 || !function_parameter_pack_p (pack
))
3001 /* The parameter pack and its pack arguments have the same
3003 return DECL_PARM_INDEX (pack
) == DECL_PARM_INDEX (param_decl
);
3006 /* Determine whether ARGS describes a variadic template args list,
3007 i.e., one that is terminated by a template argument pack. */
3010 template_args_variadic_p (tree args
)
3015 if (args
== NULL_TREE
)
3018 args
= INNERMOST_TEMPLATE_ARGS (args
);
3019 nargs
= TREE_VEC_LENGTH (args
);
3024 last_parm
= TREE_VEC_ELT (args
, nargs
- 1);
3026 return ARGUMENT_PACK_P (last_parm
);
3029 /* Generate a new name for the parameter pack name NAME (an
3030 IDENTIFIER_NODE) that incorporates its */
3033 make_ith_pack_parameter_name (tree name
, int i
)
3035 /* Munge the name to include the parameter index. */
3036 #define NUMBUF_LEN 128
3037 char numbuf
[NUMBUF_LEN
];
3041 if (name
== NULL_TREE
)
3043 snprintf (numbuf
, NUMBUF_LEN
, "%i", i
);
3044 newname_len
= IDENTIFIER_LENGTH (name
)
3045 + strlen (numbuf
) + 2;
3046 newname
= (char*)alloca (newname_len
);
3047 snprintf (newname
, newname_len
,
3048 "%s#%i", IDENTIFIER_POINTER (name
), i
);
3049 return get_identifier (newname
);
3052 /* Return true if T is a primary function, class or alias template
3056 primary_template_instantiation_p (const_tree t
)
3061 if (TREE_CODE (t
) == FUNCTION_DECL
)
3062 return DECL_LANG_SPECIFIC (t
)
3063 && DECL_TEMPLATE_INSTANTIATION (t
)
3064 && PRIMARY_TEMPLATE_P (DECL_TI_TEMPLATE (t
));
3065 else if (CLASS_TYPE_P (t
) && !TYPE_DECL_ALIAS_P (TYPE_NAME (t
)))
3066 return CLASSTYPE_TEMPLATE_INSTANTIATION (t
)
3067 && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (t
));
3068 else if (alias_template_specialization_p (t
))
3073 /* Return true if PARM is a template template parameter. */
3076 template_template_parameter_p (const_tree parm
)
3078 return DECL_TEMPLATE_TEMPLATE_PARM_P (parm
);
3081 /* Return true iff PARM is a DECL representing a type template
3085 template_type_parameter_p (const_tree parm
)
3088 && (TREE_CODE (parm
) == TYPE_DECL
3089 || TREE_CODE (parm
) == TEMPLATE_DECL
)
3090 && DECL_TEMPLATE_PARM_P (parm
));
3093 /* Return the template parameters of T if T is a
3094 primary template instantiation, NULL otherwise. */
3097 get_primary_template_innermost_parameters (const_tree t
)
3099 tree parms
= NULL
, template_info
= NULL
;
3101 if ((template_info
= get_template_info (t
))
3102 && primary_template_instantiation_p (t
))
3103 parms
= INNERMOST_TEMPLATE_PARMS
3104 (DECL_TEMPLATE_PARMS (TI_TEMPLATE (template_info
)));
3109 /* Return the template parameters of the LEVELth level from the full list
3110 of template parameters PARMS. */
3113 get_template_parms_at_level (tree parms
, int level
)
3117 || TREE_CODE (parms
) != TREE_LIST
3118 || level
> TMPL_PARMS_DEPTH (parms
))
3121 for (p
= parms
; p
; p
= TREE_CHAIN (p
))
3122 if (TMPL_PARMS_DEPTH (p
) == level
)
3128 /* Returns the template arguments of T if T is a template instantiation,
3132 get_template_innermost_arguments (const_tree t
)
3134 tree args
= NULL
, template_info
= NULL
;
3136 if ((template_info
= get_template_info (t
))
3137 && TI_ARGS (template_info
))
3138 args
= INNERMOST_TEMPLATE_ARGS (TI_ARGS (template_info
));
3143 /* Return the argument pack elements of T if T is a template argument pack,
3147 get_template_argument_pack_elems (const_tree t
)
3149 if (TREE_CODE (t
) != TYPE_ARGUMENT_PACK
3150 && TREE_CODE (t
) != NONTYPE_ARGUMENT_PACK
)
3153 return ARGUMENT_PACK_ARGS (t
);
3156 /* Structure used to track the progress of find_parameter_packs_r. */
3157 struct find_parameter_pack_data
3159 /* TREE_LIST that will contain all of the parameter packs found by
3161 tree
* parameter_packs
;
3163 /* Set of AST nodes that have been visited by the traversal. */
3164 hash_set
<tree
> *visited
;
3167 /* Identifies all of the argument packs that occur in a template
3168 argument and appends them to the TREE_LIST inside DATA, which is a
3169 find_parameter_pack_data structure. This is a subroutine of
3170 make_pack_expansion and uses_parameter_packs. */
3172 find_parameter_packs_r (tree
*tp
, int *walk_subtrees
, void* data
)
3175 struct find_parameter_pack_data
* ppd
=
3176 (struct find_parameter_pack_data
*)data
;
3177 bool parameter_pack_p
= false;
3179 /* Handle type aliases/typedefs. */
3180 if (TYPE_ALIAS_P (t
))
3182 if (TYPE_TEMPLATE_INFO (t
))
3183 cp_walk_tree (&TYPE_TI_ARGS (t
),
3184 &find_parameter_packs_r
,
3190 /* Identify whether this is a parameter pack or not. */
3191 switch (TREE_CODE (t
))
3193 case TEMPLATE_PARM_INDEX
:
3194 if (TEMPLATE_PARM_PARAMETER_PACK (t
))
3195 parameter_pack_p
= true;
3198 case TEMPLATE_TYPE_PARM
:
3199 t
= TYPE_MAIN_VARIANT (t
);
3200 case TEMPLATE_TEMPLATE_PARM
:
3201 if (TEMPLATE_TYPE_PARAMETER_PACK (t
))
3202 parameter_pack_p
= true;
3207 if (DECL_PACK_P (t
))
3209 /* We don't want to walk into the type of a PARM_DECL,
3210 because we don't want to see the type parameter pack. */
3212 parameter_pack_p
= true;
3216 /* Look through a lambda capture proxy to the field pack. */
3218 if (DECL_HAS_VALUE_EXPR_P (t
))
3220 tree v
= DECL_VALUE_EXPR (t
);
3222 &find_parameter_packs_r
,
3229 parameter_pack_p
= true;
3232 /* Not a parameter pack. */
3236 if (parameter_pack_p
)
3238 /* Add this parameter pack to the list. */
3239 *ppd
->parameter_packs
= tree_cons (NULL_TREE
, t
, *ppd
->parameter_packs
);
3243 cp_walk_tree (&TYPE_CONTEXT (t
),
3244 &find_parameter_packs_r
, ppd
, ppd
->visited
);
3246 /* This switch statement will return immediately if we don't find a
3248 switch (TREE_CODE (t
))
3250 case TEMPLATE_PARM_INDEX
:
3253 case BOUND_TEMPLATE_TEMPLATE_PARM
:
3254 /* Check the template itself. */
3255 cp_walk_tree (&TREE_TYPE (TYPE_TI_TEMPLATE (t
)),
3256 &find_parameter_packs_r
, ppd
, ppd
->visited
);
3257 /* Check the template arguments. */
3258 cp_walk_tree (&TYPE_TI_ARGS (t
), &find_parameter_packs_r
, ppd
,
3263 case TEMPLATE_TYPE_PARM
:
3264 case TEMPLATE_TEMPLATE_PARM
:
3271 if (TYPE_PTRMEMFUNC_P (t
))
3277 if (TYPE_TEMPLATE_INFO (t
))
3278 cp_walk_tree (&TYPE_TI_ARGS (t
),
3279 &find_parameter_packs_r
, ppd
, ppd
->visited
);
3286 cp_walk_tree (&TREE_TYPE (t
),
3287 &find_parameter_packs_r
, ppd
, ppd
->visited
);
3291 cp_walk_tree (&TYPENAME_TYPE_FULLNAME (t
), &find_parameter_packs_r
,
3296 case TYPE_PACK_EXPANSION
:
3297 case EXPR_PACK_EXPANSION
:
3302 cp_walk_tree (&TYPE_MAX_VALUE (t
), &find_parameter_packs_r
,
3307 case IDENTIFIER_NODE
:
3308 cp_walk_tree (&TREE_TYPE (t
), &find_parameter_packs_r
, ppd
,
3320 /* Determines if the expression or type T uses any parameter packs. */
3322 uses_parameter_packs (tree t
)
3324 tree parameter_packs
= NULL_TREE
;
3325 struct find_parameter_pack_data ppd
;
3326 ppd
.parameter_packs
= ¶meter_packs
;
3327 ppd
.visited
= new hash_set
<tree
>;
3328 cp_walk_tree (&t
, &find_parameter_packs_r
, &ppd
, ppd
.visited
);
3330 return parameter_packs
!= NULL_TREE
;
3333 /* Turn ARG, which may be an expression, type, or a TREE_LIST
3334 representation a base-class initializer into a parameter pack
3335 expansion. If all goes well, the resulting node will be an
3336 EXPR_PACK_EXPANSION, TYPE_PACK_EXPANSION, or TREE_LIST,
3339 make_pack_expansion (tree arg
)
3342 tree parameter_packs
= NULL_TREE
;
3343 bool for_types
= false;
3344 struct find_parameter_pack_data ppd
;
3346 if (!arg
|| arg
== error_mark_node
)
3349 if (TREE_CODE (arg
) == TREE_LIST
&& TREE_PURPOSE (arg
))
3351 /* A TREE_LIST with a non-null TREE_PURPOSE is for a base
3352 class initializer. In this case, the TREE_PURPOSE will be a
3353 _TYPE node (representing the base class expansion we're
3354 initializing) and the TREE_VALUE will be a TREE_LIST
3355 containing the initialization arguments.
3357 The resulting expansion looks somewhat different from most
3358 expansions. Rather than returning just one _EXPANSION, we
3359 return a TREE_LIST whose TREE_PURPOSE is a
3360 TYPE_PACK_EXPANSION containing the bases that will be
3361 initialized. The TREE_VALUE will be identical to the
3362 original TREE_VALUE, which is a list of arguments that will
3363 be passed to each base. We do not introduce any new pack
3364 expansion nodes into the TREE_VALUE (although it is possible
3365 that some already exist), because the TREE_PURPOSE and
3366 TREE_VALUE all need to be expanded together with the same
3367 _EXPANSION node. Note that the TYPE_PACK_EXPANSION in the
3368 resulting TREE_PURPOSE will mention the parameter packs in
3369 both the bases and the arguments to the bases. */
3372 tree parameter_packs
= NULL_TREE
;
3374 /* Determine which parameter packs will be used by the base
3376 ppd
.visited
= new hash_set
<tree
>;
3377 ppd
.parameter_packs
= ¶meter_packs
;
3378 cp_walk_tree (&TREE_PURPOSE (arg
), &find_parameter_packs_r
,
3381 if (parameter_packs
== NULL_TREE
)
3383 error ("base initializer expansion %<%T%> contains no parameter packs", arg
);
3385 return error_mark_node
;
3388 if (TREE_VALUE (arg
) != void_type_node
)
3390 /* Collect the sets of parameter packs used in each of the
3391 initialization arguments. */
3392 for (value
= TREE_VALUE (arg
); value
; value
= TREE_CHAIN (value
))
3394 /* Determine which parameter packs will be expanded in this
3396 cp_walk_tree (&TREE_VALUE (value
), &find_parameter_packs_r
,
3403 /* Create the pack expansion type for the base type. */
3404 purpose
= cxx_make_type (TYPE_PACK_EXPANSION
);
3405 SET_PACK_EXPANSION_PATTERN (purpose
, TREE_PURPOSE (arg
));
3406 PACK_EXPANSION_PARAMETER_PACKS (purpose
) = parameter_packs
;
3408 /* Just use structural equality for these TYPE_PACK_EXPANSIONS;
3409 they will rarely be compared to anything. */
3410 SET_TYPE_STRUCTURAL_EQUALITY (purpose
);
3412 return tree_cons (purpose
, TREE_VALUE (arg
), NULL_TREE
);
3415 if (TYPE_P (arg
) || TREE_CODE (arg
) == TEMPLATE_DECL
)
3418 /* Build the PACK_EXPANSION_* node. */
3420 ? cxx_make_type (TYPE_PACK_EXPANSION
)
3421 : make_node (EXPR_PACK_EXPANSION
);
3422 SET_PACK_EXPANSION_PATTERN (result
, arg
);
3423 if (TREE_CODE (result
) == EXPR_PACK_EXPANSION
)
3425 /* Propagate type and const-expression information. */
3426 TREE_TYPE (result
) = TREE_TYPE (arg
);
3427 TREE_CONSTANT (result
) = TREE_CONSTANT (arg
);
3430 /* Just use structural equality for these TYPE_PACK_EXPANSIONS;
3431 they will rarely be compared to anything. */
3432 SET_TYPE_STRUCTURAL_EQUALITY (result
);
3434 /* Determine which parameter packs will be expanded. */
3435 ppd
.parameter_packs
= ¶meter_packs
;
3436 ppd
.visited
= new hash_set
<tree
>;
3437 cp_walk_tree (&arg
, &find_parameter_packs_r
, &ppd
, ppd
.visited
);
3440 /* Make sure we found some parameter packs. */
3441 if (parameter_packs
== NULL_TREE
)
3444 error ("expansion pattern %<%T%> contains no argument packs", arg
);
3446 error ("expansion pattern %<%E%> contains no argument packs", arg
);
3447 return error_mark_node
;
3449 PACK_EXPANSION_PARAMETER_PACKS (result
) = parameter_packs
;
3451 PACK_EXPANSION_LOCAL_P (result
) = at_function_scope_p ();
3456 /* Checks T for any "bare" parameter packs, which have not yet been
3457 expanded, and issues an error if any are found. This operation can
3458 only be done on full expressions or types (e.g., an expression
3459 statement, "if" condition, etc.), because we could have expressions like:
3461 foo(f(g(h(args)))...)
3463 where "args" is a parameter pack. check_for_bare_parameter_packs
3464 should not be called for the subexpressions args, h(args),
3465 g(h(args)), or f(g(h(args))), because we would produce erroneous
3468 Returns TRUE and emits an error if there were bare parameter packs,
3469 returns FALSE otherwise. */
3471 check_for_bare_parameter_packs (tree t
)
3473 tree parameter_packs
= NULL_TREE
;
3474 struct find_parameter_pack_data ppd
;
3476 if (!processing_template_decl
|| !t
|| t
== error_mark_node
)
3479 if (TREE_CODE (t
) == TYPE_DECL
)
3482 ppd
.parameter_packs
= ¶meter_packs
;
3483 ppd
.visited
= new hash_set
<tree
>;
3484 cp_walk_tree (&t
, &find_parameter_packs_r
, &ppd
, ppd
.visited
);
3487 if (parameter_packs
)
3489 error ("parameter packs not expanded with %<...%>:");
3490 while (parameter_packs
)
3492 tree pack
= TREE_VALUE (parameter_packs
);
3493 tree name
= NULL_TREE
;
3495 if (TREE_CODE (pack
) == TEMPLATE_TYPE_PARM
3496 || TREE_CODE (pack
) == TEMPLATE_TEMPLATE_PARM
)
3497 name
= TYPE_NAME (pack
);
3498 else if (TREE_CODE (pack
) == TEMPLATE_PARM_INDEX
)
3499 name
= DECL_NAME (TEMPLATE_PARM_DECL (pack
));
3501 name
= DECL_NAME (pack
);
3504 inform (input_location
, " %qD", name
);
3506 inform (input_location
, " <anonymous>");
3508 parameter_packs
= TREE_CHAIN (parameter_packs
);
3517 /* Expand any parameter packs that occur in the template arguments in
3520 expand_template_argument_pack (tree args
)
3522 tree result_args
= NULL_TREE
;
3523 int in_arg
, out_arg
= 0, nargs
= args
? TREE_VEC_LENGTH (args
) : 0;
3524 int num_result_args
= -1;
3525 int non_default_args_count
= -1;
3527 /* First, determine if we need to expand anything, and the number of
3528 slots we'll need. */
3529 for (in_arg
= 0; in_arg
< nargs
; ++in_arg
)
3531 tree arg
= TREE_VEC_ELT (args
, in_arg
);
3532 if (arg
== NULL_TREE
)
3534 if (ARGUMENT_PACK_P (arg
))
3536 int num_packed
= TREE_VEC_LENGTH (ARGUMENT_PACK_ARGS (arg
));
3537 if (num_result_args
< 0)
3538 num_result_args
= in_arg
+ num_packed
;
3540 num_result_args
+= num_packed
;
3544 if (num_result_args
>= 0)
3549 /* If no expansion is necessary, we're done. */
3550 if (num_result_args
< 0)
3553 /* Expand arguments. */
3554 result_args
= make_tree_vec (num_result_args
);
3555 if (NON_DEFAULT_TEMPLATE_ARGS_COUNT (args
))
3556 non_default_args_count
=
3557 GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (args
);
3558 for (in_arg
= 0; in_arg
< nargs
; ++in_arg
)
3560 tree arg
= TREE_VEC_ELT (args
, in_arg
);
3561 if (ARGUMENT_PACK_P (arg
))
3563 tree packed
= ARGUMENT_PACK_ARGS (arg
);
3564 int i
, num_packed
= TREE_VEC_LENGTH (packed
);
3565 for (i
= 0; i
< num_packed
; ++i
, ++out_arg
)
3566 TREE_VEC_ELT (result_args
, out_arg
) = TREE_VEC_ELT(packed
, i
);
3567 if (non_default_args_count
> 0)
3568 non_default_args_count
+= num_packed
- 1;
3572 TREE_VEC_ELT (result_args
, out_arg
) = arg
;
3576 if (non_default_args_count
>= 0)
3577 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (result_args
, non_default_args_count
);
3581 /* Checks if DECL shadows a template parameter.
3583 [temp.local]: A template-parameter shall not be redeclared within its
3584 scope (including nested scopes).
3586 Emits an error and returns TRUE if the DECL shadows a parameter,
3587 returns FALSE otherwise. */
3590 check_template_shadow (tree decl
)
3594 /* If we're not in a template, we can't possibly shadow a template
3596 if (!current_template_parms
)
3599 /* Figure out what we're shadowing. */
3600 if (TREE_CODE (decl
) == OVERLOAD
)
3601 decl
= OVL_CURRENT (decl
);
3602 olddecl
= innermost_non_namespace_value (DECL_NAME (decl
));
3604 /* If there's no previous binding for this name, we're not shadowing
3605 anything, let alone a template parameter. */
3609 /* If we're not shadowing a template parameter, we're done. Note
3610 that OLDDECL might be an OVERLOAD (or perhaps even an
3611 ERROR_MARK), so we can't just blithely assume it to be a _DECL
3613 if (!DECL_P (olddecl
) || !DECL_TEMPLATE_PARM_P (olddecl
))
3616 /* We check for decl != olddecl to avoid bogus errors for using a
3617 name inside a class. We check TPFI to avoid duplicate errors for
3618 inline member templates. */
3620 || (DECL_TEMPLATE_PARM_P (decl
)
3621 && TEMPLATE_PARMS_FOR_INLINE (current_template_parms
)))
3624 /* Don't complain about the injected class name, as we've already
3625 complained about the class itself. */
3626 if (DECL_SELF_REFERENCE_P (decl
))
3629 error ("declaration of %q+#D", decl
);
3630 error (" shadows template parm %q+#D", olddecl
);
3634 /* Return a new TEMPLATE_PARM_INDEX with the indicated INDEX, LEVEL,
3635 ORIG_LEVEL, DECL, and TYPE. */
3638 build_template_parm_index (int index
,
3644 tree t
= make_node (TEMPLATE_PARM_INDEX
);
3645 TEMPLATE_PARM_IDX (t
) = index
;
3646 TEMPLATE_PARM_LEVEL (t
) = level
;
3647 TEMPLATE_PARM_ORIG_LEVEL (t
) = orig_level
;
3648 TEMPLATE_PARM_DECL (t
) = decl
;
3649 TREE_TYPE (t
) = type
;
3650 TREE_CONSTANT (t
) = TREE_CONSTANT (decl
);
3651 TREE_READONLY (t
) = TREE_READONLY (decl
);
3656 /* Find the canonical type parameter for the given template type
3657 parameter. Returns the canonical type parameter, which may be TYPE
3658 if no such parameter existed. */
3661 canonical_type_parameter (tree type
)
3664 int idx
= TEMPLATE_TYPE_IDX (type
);
3665 if (!canonical_template_parms
)
3666 vec_alloc (canonical_template_parms
, idx
+1);
3668 while (canonical_template_parms
->length () <= (unsigned)idx
)
3669 vec_safe_push (canonical_template_parms
, NULL_TREE
);
3671 list
= (*canonical_template_parms
)[idx
];
3672 while (list
&& !comptypes (type
, TREE_VALUE (list
), COMPARE_STRUCTURAL
))
3673 list
= TREE_CHAIN (list
);
3676 return TREE_VALUE (list
);
3679 (*canonical_template_parms
)[idx
]
3680 = tree_cons (NULL_TREE
, type
,
3681 (*canonical_template_parms
)[idx
]);
3686 /* Return a TEMPLATE_PARM_INDEX, similar to INDEX, but whose
3687 TEMPLATE_PARM_LEVEL has been decreased by LEVELS. If such a
3688 TEMPLATE_PARM_INDEX already exists, it is returned; otherwise, a
3689 new one is created. */
3692 reduce_template_parm_level (tree index
, tree type
, int levels
, tree args
,
3693 tsubst_flags_t complain
)
3695 if (TEMPLATE_PARM_DESCENDANTS (index
) == NULL_TREE
3696 || (TEMPLATE_PARM_LEVEL (TEMPLATE_PARM_DESCENDANTS (index
))
3697 != TEMPLATE_PARM_LEVEL (index
) - levels
)
3698 || !same_type_p (type
, TREE_TYPE (TEMPLATE_PARM_DESCENDANTS (index
))))
3700 tree orig_decl
= TEMPLATE_PARM_DECL (index
);
3703 decl
= build_decl (DECL_SOURCE_LOCATION (orig_decl
),
3704 TREE_CODE (orig_decl
), DECL_NAME (orig_decl
), type
);
3705 TREE_CONSTANT (decl
) = TREE_CONSTANT (orig_decl
);
3706 TREE_READONLY (decl
) = TREE_READONLY (orig_decl
);
3707 DECL_ARTIFICIAL (decl
) = 1;
3708 SET_DECL_TEMPLATE_PARM_P (decl
);
3710 t
= build_template_parm_index (TEMPLATE_PARM_IDX (index
),
3711 TEMPLATE_PARM_LEVEL (index
) - levels
,
3712 TEMPLATE_PARM_ORIG_LEVEL (index
),
3714 TEMPLATE_PARM_DESCENDANTS (index
) = t
;
3715 TEMPLATE_PARM_PARAMETER_PACK (t
)
3716 = TEMPLATE_PARM_PARAMETER_PACK (index
);
3718 /* Template template parameters need this. */
3719 if (TREE_CODE (decl
) == TEMPLATE_DECL
)
3720 DECL_TEMPLATE_PARMS (decl
) = tsubst_template_parms
3721 (DECL_TEMPLATE_PARMS (TEMPLATE_PARM_DECL (index
)),
3725 return TEMPLATE_PARM_DESCENDANTS (index
);
3728 /* Process information from new template parameter PARM and append it
3729 to the LIST being built. This new parameter is a non-type
3730 parameter iff IS_NON_TYPE is true. This new parameter is a
3731 parameter pack iff IS_PARAMETER_PACK is true. The location of PARM
3735 process_template_parm (tree list
, location_t parm_loc
, tree parm
,
3736 bool is_non_type
, bool is_parameter_pack
)
3742 gcc_assert (TREE_CODE (parm
) == TREE_LIST
);
3743 defval
= TREE_PURPOSE (parm
);
3747 tree p
= tree_last (list
);
3749 if (p
&& TREE_VALUE (p
) != error_mark_node
)
3752 if (TREE_CODE (p
) == TYPE_DECL
|| TREE_CODE (p
) == TEMPLATE_DECL
)
3753 idx
= TEMPLATE_TYPE_IDX (TREE_TYPE (p
));
3755 idx
= TEMPLATE_PARM_IDX (DECL_INITIAL (p
));
3763 parm
= TREE_VALUE (parm
);
3765 SET_DECL_TEMPLATE_PARM_P (parm
);
3767 if (TREE_TYPE (parm
) != error_mark_node
)
3771 The top-level cv-qualifiers on the template-parameter are
3772 ignored when determining its type. */
3773 TREE_TYPE (parm
) = TYPE_MAIN_VARIANT (TREE_TYPE (parm
));
3774 if (invalid_nontype_parm_type_p (TREE_TYPE (parm
), 1))
3775 TREE_TYPE (parm
) = error_mark_node
;
3776 else if (uses_parameter_packs (TREE_TYPE (parm
))
3777 && !is_parameter_pack
3778 /* If we're in a nested template parameter list, the template
3779 template parameter could be a parameter pack. */
3780 && processing_template_parmlist
== 1)
3782 /* This template parameter is not a parameter pack, but it
3783 should be. Complain about "bare" parameter packs. */
3784 check_for_bare_parameter_packs (TREE_TYPE (parm
));
3786 /* Recover by calling this a parameter pack. */
3787 is_parameter_pack
= true;
3791 /* A template parameter is not modifiable. */
3792 TREE_CONSTANT (parm
) = 1;
3793 TREE_READONLY (parm
) = 1;
3794 decl
= build_decl (parm_loc
,
3795 CONST_DECL
, DECL_NAME (parm
), TREE_TYPE (parm
));
3796 TREE_CONSTANT (decl
) = 1;
3797 TREE_READONLY (decl
) = 1;
3798 DECL_INITIAL (parm
) = DECL_INITIAL (decl
)
3799 = build_template_parm_index (idx
, processing_template_decl
,
3800 processing_template_decl
,
3801 decl
, TREE_TYPE (parm
));
3803 TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
))
3804 = is_parameter_pack
;
3809 parm
= TREE_VALUE (TREE_VALUE (parm
));
3811 if (parm
&& TREE_CODE (parm
) == TEMPLATE_DECL
)
3813 t
= cxx_make_type (TEMPLATE_TEMPLATE_PARM
);
3814 /* This is for distinguishing between real templates and template
3815 template parameters */
3816 TREE_TYPE (parm
) = t
;
3817 TREE_TYPE (DECL_TEMPLATE_RESULT (parm
)) = t
;
3822 t
= cxx_make_type (TEMPLATE_TYPE_PARM
);
3823 /* parm is either IDENTIFIER_NODE or NULL_TREE. */
3824 decl
= build_decl (parm_loc
,
3825 TYPE_DECL
, parm
, t
);
3828 TYPE_NAME (t
) = decl
;
3829 TYPE_STUB_DECL (t
) = decl
;
3831 TEMPLATE_TYPE_PARM_INDEX (t
)
3832 = build_template_parm_index (idx
, processing_template_decl
,
3833 processing_template_decl
,
3834 decl
, TREE_TYPE (parm
));
3835 TEMPLATE_TYPE_PARAMETER_PACK (t
) = is_parameter_pack
;
3836 TYPE_CANONICAL (t
) = canonical_type_parameter (t
);
3838 DECL_ARTIFICIAL (decl
) = 1;
3839 SET_DECL_TEMPLATE_PARM_P (decl
);
3841 parm
= build_tree_list (defval
, parm
);
3842 return chainon (list
, parm
);
3845 /* The end of a template parameter list has been reached. Process the
3846 tree list into a parameter vector, converting each parameter into a more
3847 useful form. Type parameters are saved as IDENTIFIER_NODEs, and others
3851 end_template_parm_list (tree parms
)
3855 tree saved_parmlist
= make_tree_vec (list_length (parms
));
3857 current_template_parms
3858 = tree_cons (size_int (processing_template_decl
),
3859 saved_parmlist
, current_template_parms
);
3861 for (parm
= parms
, nparms
= 0; parm
; parm
= next
, nparms
++)
3863 next
= TREE_CHAIN (parm
);
3864 TREE_VEC_ELT (saved_parmlist
, nparms
) = parm
;
3865 TREE_CHAIN (parm
) = NULL_TREE
;
3868 --processing_template_parmlist
;
3870 return saved_parmlist
;
3873 /* end_template_decl is called after a template declaration is seen. */
3876 end_template_decl (void)
3878 reset_specialization ();
3880 if (! processing_template_decl
)
3883 /* This matches the pushlevel in begin_template_parm_list. */
3886 --processing_template_decl
;
3887 current_template_parms
= TREE_CHAIN (current_template_parms
);
3890 /* Takes a TREE_LIST representing a template parameter and convert it
3891 into an argument suitable to be passed to the type substitution
3892 functions. Note that If the TREE_LIST contains an error_mark
3893 node, the returned argument is error_mark_node. */
3896 template_parm_to_arg (tree t
)
3900 || TREE_CODE (t
) != TREE_LIST
)
3903 if (error_operand_p (TREE_VALUE (t
)))
3904 return error_mark_node
;
3908 if (TREE_CODE (t
) == TYPE_DECL
3909 || TREE_CODE (t
) == TEMPLATE_DECL
)
3913 if (TEMPLATE_TYPE_PARAMETER_PACK (t
))
3915 /* Turn this argument into a TYPE_ARGUMENT_PACK
3916 with a single element, which expands T. */
3917 tree vec
= make_tree_vec (1);
3918 #ifdef ENABLE_CHECKING
3919 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT
3920 (vec
, TREE_VEC_LENGTH (vec
));
3922 TREE_VEC_ELT (vec
, 0) = make_pack_expansion (t
);
3924 t
= cxx_make_type (TYPE_ARGUMENT_PACK
);
3925 SET_ARGUMENT_PACK_ARGS (t
, vec
);
3930 t
= DECL_INITIAL (t
);
3932 if (TEMPLATE_PARM_PARAMETER_PACK (t
))
3934 /* Turn this argument into a NONTYPE_ARGUMENT_PACK
3935 with a single element, which expands T. */
3936 tree vec
= make_tree_vec (1);
3937 tree type
= TREE_TYPE (TEMPLATE_PARM_DECL (t
));
3938 #ifdef ENABLE_CHECKING
3939 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT
3940 (vec
, TREE_VEC_LENGTH (vec
));
3942 t
= convert_from_reference (t
);
3943 TREE_VEC_ELT (vec
, 0) = make_pack_expansion (t
);
3945 t
= make_node (NONTYPE_ARGUMENT_PACK
);
3946 SET_ARGUMENT_PACK_ARGS (t
, vec
);
3947 TREE_TYPE (t
) = type
;
3950 t
= convert_from_reference (t
);
3955 /* Given a set of template parameters, return them as a set of template
3956 arguments. The template parameters are represented as a TREE_VEC, in
3957 the form documented in cp-tree.h for template arguments. */
3960 template_parms_to_args (tree parms
)
3963 tree args
= NULL_TREE
;
3964 int length
= TMPL_PARMS_DEPTH (parms
);
3967 /* If there is only one level of template parameters, we do not
3968 create a TREE_VEC of TREE_VECs. Instead, we return a single
3969 TREE_VEC containing the arguments. */
3971 args
= make_tree_vec (length
);
3973 for (header
= parms
; header
; header
= TREE_CHAIN (header
))
3975 tree a
= copy_node (TREE_VALUE (header
));
3978 TREE_TYPE (a
) = NULL_TREE
;
3979 for (i
= TREE_VEC_LENGTH (a
) - 1; i
>= 0; --i
)
3980 TREE_VEC_ELT (a
, i
) = template_parm_to_arg (TREE_VEC_ELT (a
, i
));
3982 #ifdef ENABLE_CHECKING
3983 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (a
, TREE_VEC_LENGTH (a
));
3987 TREE_VEC_ELT (args
, --l
) = a
;
3992 if (length
> 1 && TREE_VEC_ELT (args
, 0) == NULL_TREE
)
3993 /* This can happen for template parms of a template template
3996 template<template<class T, class U> class TT> struct S;
3998 Consider the level of the parms of TT; T and U both have
3999 level 2; TT has no template parm of level 1. So in this case
4000 the first element of full_template_args is NULL_TREE. If we
4001 leave it like this TMPL_ARGS_DEPTH on args returns 1 instead
4002 of 2. This will make tsubst wrongly consider that T and U
4003 have level 1. Instead, let's create a dummy vector as the
4004 first element of full_template_args so that TMPL_ARGS_DEPTH
4005 returns the correct depth for args. */
4006 TREE_VEC_ELT (args
, 0) = make_tree_vec (1);
4010 /* Within the declaration of a template, return the currently active
4011 template parameters as an argument TREE_VEC. */
4014 current_template_args (void)
4016 return template_parms_to_args (current_template_parms
);
4019 /* Update the declared TYPE by doing any lookups which were thought to be
4020 dependent, but are not now that we know the SCOPE of the declarator. */
4023 maybe_update_decl_type (tree orig_type
, tree scope
)
4025 tree type
= orig_type
;
4027 if (type
== NULL_TREE
)
4030 if (TREE_CODE (orig_type
) == TYPE_DECL
)
4031 type
= TREE_TYPE (type
);
4033 if (scope
&& TYPE_P (scope
) && dependent_type_p (scope
)
4034 && dependent_type_p (type
)
4035 /* Don't bother building up the args in this case. */
4036 && TREE_CODE (type
) != TEMPLATE_TYPE_PARM
)
4038 /* tsubst in the args corresponding to the template parameters,
4039 including auto if present. Most things will be unchanged, but
4040 make_typename_type and tsubst_qualified_id will resolve
4041 TYPENAME_TYPEs and SCOPE_REFs that were previously dependent. */
4042 tree args
= current_template_args ();
4043 tree auto_node
= type_uses_auto (type
);
4047 tree auto_vec
= make_tree_vec (1);
4048 TREE_VEC_ELT (auto_vec
, 0) = auto_node
;
4049 args
= add_to_template_args (args
, auto_vec
);
4051 pushed
= push_scope (scope
);
4052 type
= tsubst (type
, args
, tf_warning_or_error
, NULL_TREE
);
4057 if (type
== error_mark_node
)
4060 if (TREE_CODE (orig_type
) == TYPE_DECL
)
4062 if (same_type_p (type
, TREE_TYPE (orig_type
)))
4065 type
= TYPE_NAME (type
);
4070 /* Return a TEMPLATE_DECL corresponding to DECL, using the indicated
4071 template PARMS. If MEMBER_TEMPLATE_P is true, the new template is
4072 a member template. Used by push_template_decl below. */
4075 build_template_decl (tree decl
, tree parms
, bool member_template_p
)
4077 tree tmpl
= build_lang_decl (TEMPLATE_DECL
, DECL_NAME (decl
), NULL_TREE
);
4078 DECL_TEMPLATE_PARMS (tmpl
) = parms
;
4079 DECL_CONTEXT (tmpl
) = DECL_CONTEXT (decl
);
4080 DECL_SOURCE_LOCATION (tmpl
) = DECL_SOURCE_LOCATION (decl
);
4081 DECL_MEMBER_TEMPLATE_P (tmpl
) = member_template_p
;
4086 struct template_parm_data
4088 /* The level of the template parameters we are currently
4092 /* The index of the specialization argument we are currently
4096 /* An array whose size is the number of template parameters. The
4097 elements are nonzero if the parameter has been used in any one
4098 of the arguments processed so far. */
4101 /* An array whose size is the number of template arguments. The
4102 elements are nonzero if the argument makes use of template
4103 parameters of this level. */
4104 int* arg_uses_template_parms
;
4107 /* Subroutine of push_template_decl used to see if each template
4108 parameter in a partial specialization is used in the explicit
4109 argument list. If T is of the LEVEL given in DATA (which is
4110 treated as a template_parm_data*), then DATA->PARMS is marked
4114 mark_template_parm (tree t
, void* data
)
4118 struct template_parm_data
* tpd
= (struct template_parm_data
*) data
;
4120 template_parm_level_and_index (t
, &level
, &idx
);
4122 if (level
== tpd
->level
)
4124 tpd
->parms
[idx
] = 1;
4125 tpd
->arg_uses_template_parms
[tpd
->current_arg
] = 1;
4128 /* Return zero so that for_each_template_parm will continue the
4129 traversal of the tree; we want to mark *every* template parm. */
4133 /* Process the partial specialization DECL. */
4136 process_partial_specialization (tree decl
)
4138 tree type
= TREE_TYPE (decl
);
4139 tree tinfo
= get_template_info (decl
);
4140 tree maintmpl
= TI_TEMPLATE (tinfo
);
4141 tree specargs
= TI_ARGS (tinfo
);
4142 tree inner_args
= INNERMOST_TEMPLATE_ARGS (specargs
);
4143 tree main_inner_parms
= DECL_INNERMOST_TEMPLATE_PARMS (maintmpl
);
4146 int nargs
= TREE_VEC_LENGTH (inner_args
);
4149 bool did_error_intro
= false;
4150 struct template_parm_data tpd
;
4151 struct template_parm_data tpd2
;
4153 gcc_assert (current_template_parms
);
4155 inner_parms
= INNERMOST_TEMPLATE_PARMS (current_template_parms
);
4156 ntparms
= TREE_VEC_LENGTH (inner_parms
);
4158 /* We check that each of the template parameters given in the
4159 partial specialization is used in the argument list to the
4160 specialization. For example:
4162 template <class T> struct S;
4163 template <class T> struct S<T*>;
4165 The second declaration is OK because `T*' uses the template
4166 parameter T, whereas
4168 template <class T> struct S<int>;
4170 is no good. Even trickier is:
4181 The S2<T> declaration is actually invalid; it is a
4182 full-specialization. Of course,
4185 struct S2<T (*)(U)>;
4187 or some such would have been OK. */
4188 tpd
.level
= TMPL_PARMS_DEPTH (current_template_parms
);
4189 tpd
.parms
= XALLOCAVEC (int, ntparms
);
4190 memset (tpd
.parms
, 0, sizeof (int) * ntparms
);
4192 tpd
.arg_uses_template_parms
= XALLOCAVEC (int, nargs
);
4193 memset (tpd
.arg_uses_template_parms
, 0, sizeof (int) * nargs
);
4194 for (i
= 0; i
< nargs
; ++i
)
4196 tpd
.current_arg
= i
;
4197 for_each_template_parm (TREE_VEC_ELT (inner_args
, i
),
4198 &mark_template_parm
,
4201 /*include_nondeduced_p=*/false);
4203 for (i
= 0; i
< ntparms
; ++i
)
4204 if (tpd
.parms
[i
] == 0)
4206 /* One of the template parms was not used in a deduced context in the
4208 if (!did_error_intro
)
4210 error ("template parameters not deducible in "
4211 "partial specialization:");
4212 did_error_intro
= true;
4215 inform (input_location
, " %qD",
4216 TREE_VALUE (TREE_VEC_ELT (inner_parms
, i
)));
4219 if (did_error_intro
)
4220 return error_mark_node
;
4222 /* [temp.class.spec]
4224 The argument list of the specialization shall not be identical to
4225 the implicit argument list of the primary template. */
4227 = TI_ARGS (get_template_info (DECL_TEMPLATE_RESULT (maintmpl
)));
4228 if (comp_template_args (inner_args
, INNERMOST_TEMPLATE_ARGS (main_args
)))
4229 error ("partial specialization %qD does not specialize "
4230 "any template arguments", decl
);
4232 /* A partial specialization that replaces multiple parameters of the
4233 primary template with a pack expansion is less specialized for those
4235 if (nargs
< DECL_NTPARMS (maintmpl
))
4237 error ("partial specialization is not more specialized than the "
4238 "primary template because it replaces multiple parameters "
4239 "with a pack expansion");
4240 inform (DECL_SOURCE_LOCATION (maintmpl
), "primary template here");
4244 /* [temp.class.spec]
4246 A partially specialized non-type argument expression shall not
4247 involve template parameters of the partial specialization except
4248 when the argument expression is a simple identifier.
4250 The type of a template parameter corresponding to a specialized
4251 non-type argument shall not be dependent on a parameter of the
4254 Also, we verify that pack expansions only occur at the
4255 end of the argument list. */
4256 gcc_assert (nargs
== DECL_NTPARMS (maintmpl
));
4258 for (i
= 0; i
< nargs
; ++i
)
4260 tree parm
= TREE_VALUE (TREE_VEC_ELT (main_inner_parms
, i
));
4261 tree arg
= TREE_VEC_ELT (inner_args
, i
);
4262 tree packed_args
= NULL_TREE
;
4265 if (ARGUMENT_PACK_P (arg
))
4267 /* Extract the arguments from the argument pack. We'll be
4268 iterating over these in the following loop. */
4269 packed_args
= ARGUMENT_PACK_ARGS (arg
);
4270 len
= TREE_VEC_LENGTH (packed_args
);
4273 for (j
= 0; j
< len
; j
++)
4276 /* Get the Jth argument in the parameter pack. */
4277 arg
= TREE_VEC_ELT (packed_args
, j
);
4279 if (PACK_EXPANSION_P (arg
))
4281 /* Pack expansions must come at the end of the
4283 if ((packed_args
&& j
< len
- 1)
4284 || (!packed_args
&& i
< nargs
- 1))
4286 if (TREE_CODE (arg
) == EXPR_PACK_EXPANSION
)
4287 error ("parameter pack argument %qE must be at the "
4288 "end of the template argument list", arg
);
4290 error ("parameter pack argument %qT must be at the "
4291 "end of the template argument list", arg
);
4295 if (TREE_CODE (arg
) == EXPR_PACK_EXPANSION
)
4296 /* We only care about the pattern. */
4297 arg
= PACK_EXPANSION_PATTERN (arg
);
4299 if (/* These first two lines are the `non-type' bit. */
4301 && TREE_CODE (arg
) != TEMPLATE_DECL
4302 /* This next two lines are the `argument expression is not just a
4303 simple identifier' condition and also the `specialized
4304 non-type argument' bit. */
4305 && TREE_CODE (arg
) != TEMPLATE_PARM_INDEX
4306 && !(REFERENCE_REF_P (arg
)
4307 && TREE_CODE (TREE_OPERAND (arg
, 0)) == TEMPLATE_PARM_INDEX
))
4309 if ((!packed_args
&& tpd
.arg_uses_template_parms
[i
])
4310 || (packed_args
&& uses_template_parms (arg
)))
4311 error ("template argument %qE involves template parameter(s)",
4315 /* Look at the corresponding template parameter,
4316 marking which template parameters its type depends
4318 tree type
= TREE_TYPE (parm
);
4322 /* We haven't yet initialized TPD2. Do so now. */
4323 tpd2
.arg_uses_template_parms
= XALLOCAVEC (int, nargs
);
4324 /* The number of parameters here is the number in the
4325 main template, which, as checked in the assertion
4327 tpd2
.parms
= XALLOCAVEC (int, nargs
);
4329 TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (maintmpl
));
4332 /* Mark the template parameters. But this time, we're
4333 looking for the template parameters of the main
4334 template, not in the specialization. */
4335 tpd2
.current_arg
= i
;
4336 tpd2
.arg_uses_template_parms
[i
] = 0;
4337 memset (tpd2
.parms
, 0, sizeof (int) * nargs
);
4338 for_each_template_parm (type
,
4339 &mark_template_parm
,
4342 /*include_nondeduced_p=*/false);
4344 if (tpd2
.arg_uses_template_parms
[i
])
4346 /* The type depended on some template parameters.
4347 If they are fully specialized in the
4348 specialization, that's OK. */
4351 for (j
= 0; j
< nargs
; ++j
)
4352 if (tpd2
.parms
[j
] != 0
4353 && tpd
.arg_uses_template_parms
[j
])
4356 error_n (input_location
, count
,
4357 "type %qT of template argument %qE depends "
4358 "on a template parameter",
4359 "type %qT of template argument %qE depends "
4360 "on template parameters",
4369 /* We should only get here once. */
4370 if (TREE_CODE (decl
) == TYPE_DECL
)
4371 gcc_assert (!COMPLETE_TYPE_P (type
));
4373 tree tmpl
= build_template_decl (decl
, current_template_parms
,
4374 DECL_MEMBER_TEMPLATE_P (maintmpl
));
4375 TREE_TYPE (tmpl
) = type
;
4376 DECL_TEMPLATE_RESULT (tmpl
) = decl
;
4377 SET_DECL_TEMPLATE_SPECIALIZATION (tmpl
);
4378 DECL_TEMPLATE_INFO (tmpl
) = build_template_info (maintmpl
, specargs
);
4379 DECL_PRIMARY_TEMPLATE (tmpl
) = maintmpl
;
4381 DECL_TEMPLATE_SPECIALIZATIONS (maintmpl
)
4382 = tree_cons (specargs
, tmpl
,
4383 DECL_TEMPLATE_SPECIALIZATIONS (maintmpl
));
4384 TREE_TYPE (DECL_TEMPLATE_SPECIALIZATIONS (maintmpl
)) = type
;
4386 for (inst
= DECL_TEMPLATE_INSTANTIATIONS (maintmpl
); inst
;
4387 inst
= TREE_CHAIN (inst
))
4389 tree instance
= TREE_VALUE (inst
);
4390 if (TYPE_P (instance
)
4391 ? (COMPLETE_TYPE_P (instance
)
4392 && CLASSTYPE_IMPLICIT_INSTANTIATION (instance
))
4393 : DECL_TEMPLATE_INSTANTIATION (instance
))
4395 tree spec
= most_specialized_partial_spec (instance
, tf_none
);
4396 if (spec
&& TREE_VALUE (spec
) == tmpl
)
4398 tree inst_decl
= (DECL_P (instance
)
4399 ? instance
: TYPE_NAME (instance
));
4400 permerror (input_location
,
4401 "partial specialization of %qD after instantiation "
4402 "of %qD", decl
, inst_decl
);
4410 /* PARM is a template parameter of some form; return the corresponding
4411 TEMPLATE_PARM_INDEX. */
4414 get_template_parm_index (tree parm
)
4416 if (TREE_CODE (parm
) == PARM_DECL
4417 || TREE_CODE (parm
) == CONST_DECL
)
4418 parm
= DECL_INITIAL (parm
);
4419 else if (TREE_CODE (parm
) == TYPE_DECL
4420 || TREE_CODE (parm
) == TEMPLATE_DECL
)
4421 parm
= TREE_TYPE (parm
);
4422 if (TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
4423 || TREE_CODE (parm
) == BOUND_TEMPLATE_TEMPLATE_PARM
4424 || TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
)
4425 parm
= TEMPLATE_TYPE_PARM_INDEX (parm
);
4426 gcc_assert (TREE_CODE (parm
) == TEMPLATE_PARM_INDEX
);
4430 /* Subroutine of fixed_parameter_pack_p below. Look for any template
4431 parameter packs used by the template parameter PARM. */
4434 fixed_parameter_pack_p_1 (tree parm
, struct find_parameter_pack_data
*ppd
)
4436 /* A type parm can't refer to another parm. */
4437 if (TREE_CODE (parm
) == TYPE_DECL
)
4439 else if (TREE_CODE (parm
) == PARM_DECL
)
4441 cp_walk_tree (&TREE_TYPE (parm
), &find_parameter_packs_r
,
4446 gcc_assert (TREE_CODE (parm
) == TEMPLATE_DECL
);
4448 tree vec
= INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (parm
));
4449 for (int i
= 0; i
< TREE_VEC_LENGTH (vec
); ++i
)
4450 fixed_parameter_pack_p_1 (TREE_VALUE (TREE_VEC_ELT (vec
, i
)), ppd
);
4453 /* PARM is a template parameter pack. Return any parameter packs used in
4454 its type or the type of any of its template parameters. If there are
4455 any such packs, it will be instantiated into a fixed template parameter
4456 list by partial instantiation rather than be fully deduced. */
4459 fixed_parameter_pack_p (tree parm
)
4461 /* This can only be true in a member template. */
4462 if (TEMPLATE_PARM_ORIG_LEVEL (get_template_parm_index (parm
)) < 2)
4464 /* This can only be true for a parameter pack. */
4465 if (!template_parameter_pack_p (parm
))
4467 /* A type parm can't refer to another parm. */
4468 if (TREE_CODE (parm
) == TYPE_DECL
)
4471 tree parameter_packs
= NULL_TREE
;
4472 struct find_parameter_pack_data ppd
;
4473 ppd
.parameter_packs
= ¶meter_packs
;
4474 ppd
.visited
= new hash_set
<tree
>;
4476 fixed_parameter_pack_p_1 (parm
, &ppd
);
4479 return parameter_packs
;
4482 /* Check that a template declaration's use of default arguments and
4483 parameter packs is not invalid. Here, PARMS are the template
4484 parameters. IS_PRIMARY is true if DECL is the thing declared by
4485 a primary template. IS_PARTIAL is true if DECL is a partial
4488 IS_FRIEND_DECL is nonzero if DECL is a friend function template
4489 declaration (but not a definition); 1 indicates a declaration, 2
4490 indicates a redeclaration. When IS_FRIEND_DECL=2, no errors are
4491 emitted for extraneous default arguments.
4493 Returns TRUE if there were no errors found, FALSE otherwise. */
4496 check_default_tmpl_args (tree decl
, tree parms
, bool is_primary
,
4497 bool is_partial
, int is_friend_decl
)
4500 int last_level_to_check
;
4502 bool no_errors
= true;
4506 A default template-argument shall not be specified in a
4507 function template declaration or a function template definition, nor
4508 in the template-parameter-list of the definition of a member of a
4511 if (TREE_CODE (CP_DECL_CONTEXT (decl
)) == FUNCTION_DECL
4512 || (TREE_CODE (decl
) == FUNCTION_DECL
&& DECL_LOCAL_FUNCTION_P (decl
)))
4513 /* You can't have a function template declaration in a local
4514 scope, nor you can you define a member of a class template in a
4518 if ((TREE_CODE (decl
) == TYPE_DECL
4520 && LAMBDA_TYPE_P (TREE_TYPE (decl
)))
4521 || (TREE_CODE (decl
) == FUNCTION_DECL
4522 && LAMBDA_FUNCTION_P (decl
)))
4523 /* A lambda doesn't have an explicit declaration; don't complain
4524 about the parms of the enclosing class. */
4527 if (current_class_type
4528 && !TYPE_BEING_DEFINED (current_class_type
)
4529 && DECL_LANG_SPECIFIC (decl
)
4530 && DECL_DECLARES_FUNCTION_P (decl
)
4531 /* If this is either a friend defined in the scope of the class
4532 or a member function. */
4533 && (DECL_FUNCTION_MEMBER_P (decl
)
4534 ? same_type_p (DECL_CONTEXT (decl
), current_class_type
)
4535 : DECL_FRIEND_CONTEXT (decl
)
4536 ? same_type_p (DECL_FRIEND_CONTEXT (decl
), current_class_type
)
4538 /* And, if it was a member function, it really was defined in
4539 the scope of the class. */
4540 && (!DECL_FUNCTION_MEMBER_P (decl
)
4541 || DECL_INITIALIZED_IN_CLASS_P (decl
)))
4542 /* We already checked these parameters when the template was
4543 declared, so there's no need to do it again now. This function
4544 was defined in class scope, but we're processing its body now
4545 that the class is complete. */
4548 /* Core issue 226 (C++0x only): the following only applies to class
4551 && ((cxx_dialect
== cxx98
) || TREE_CODE (decl
) != FUNCTION_DECL
))
4555 If a template-parameter has a default template-argument, all
4556 subsequent template-parameters shall have a default
4557 template-argument supplied. */
4558 for (parm_level
= parms
; parm_level
; parm_level
= TREE_CHAIN (parm_level
))
4560 tree inner_parms
= TREE_VALUE (parm_level
);
4561 int ntparms
= TREE_VEC_LENGTH (inner_parms
);
4562 int seen_def_arg_p
= 0;
4565 for (i
= 0; i
< ntparms
; ++i
)
4567 tree parm
= TREE_VEC_ELT (inner_parms
, i
);
4569 if (parm
== error_mark_node
)
4572 if (TREE_PURPOSE (parm
))
4574 else if (seen_def_arg_p
4575 && !template_parameter_pack_p (TREE_VALUE (parm
)))
4577 error ("no default argument for %qD", TREE_VALUE (parm
));
4578 /* For better subsequent error-recovery, we indicate that
4579 there should have been a default argument. */
4580 TREE_PURPOSE (parm
) = error_mark_node
;
4583 else if (!is_partial
4585 /* Don't complain about an enclosing partial
4587 && parm_level
== parms
4588 && TREE_CODE (decl
) == TYPE_DECL
4590 && template_parameter_pack_p (TREE_VALUE (parm
))
4591 /* A fixed parameter pack will be partially
4592 instantiated into a fixed length list. */
4593 && !fixed_parameter_pack_p (TREE_VALUE (parm
)))
4595 /* A primary class template can only have one
4596 parameter pack, at the end of the template
4599 error ("parameter pack %q+D must be at the end of the"
4600 " template parameter list", TREE_VALUE (parm
));
4602 TREE_VALUE (TREE_VEC_ELT (inner_parms
, i
))
4610 if (((cxx_dialect
== cxx98
) && TREE_CODE (decl
) != TYPE_DECL
)
4614 /* For an ordinary class template, default template arguments are
4615 allowed at the innermost level, e.g.:
4616 template <class T = int>
4618 but, in a partial specialization, they're not allowed even
4619 there, as we have in [temp.class.spec]:
4621 The template parameter list of a specialization shall not
4622 contain default template argument values.
4624 So, for a partial specialization, or for a function template
4625 (in C++98/C++03), we look at all of them. */
4628 /* But, for a primary class template that is not a partial
4629 specialization we look at all template parameters except the
4631 parms
= TREE_CHAIN (parms
);
4633 /* Figure out what error message to issue. */
4634 if (is_friend_decl
== 2)
4635 msg
= G_("default template arguments may not be used in function template "
4636 "friend re-declaration");
4637 else if (is_friend_decl
)
4638 msg
= G_("default template arguments may not be used in function template "
4639 "friend declarations");
4640 else if (TREE_CODE (decl
) == FUNCTION_DECL
&& (cxx_dialect
== cxx98
))
4641 msg
= G_("default template arguments may not be used in function templates "
4642 "without -std=c++11 or -std=gnu++11");
4643 else if (is_partial
)
4644 msg
= G_("default template arguments may not be used in "
4645 "partial specializations");
4647 msg
= G_("default argument for template parameter for class enclosing %qD");
4649 if (current_class_type
&& TYPE_BEING_DEFINED (current_class_type
))
4650 /* If we're inside a class definition, there's no need to
4651 examine the parameters to the class itself. On the one
4652 hand, they will be checked when the class is defined, and,
4653 on the other, default arguments are valid in things like:
4654 template <class T = double>
4655 struct S { template <class U> void f(U); };
4656 Here the default argument for `S' has no bearing on the
4657 declaration of `f'. */
4658 last_level_to_check
= template_class_depth (current_class_type
) + 1;
4660 /* Check everything. */
4661 last_level_to_check
= 0;
4663 for (parm_level
= parms
;
4664 parm_level
&& TMPL_PARMS_DEPTH (parm_level
) >= last_level_to_check
;
4665 parm_level
= TREE_CHAIN (parm_level
))
4667 tree inner_parms
= TREE_VALUE (parm_level
);
4671 ntparms
= TREE_VEC_LENGTH (inner_parms
);
4672 for (i
= 0; i
< ntparms
; ++i
)
4674 if (TREE_VEC_ELT (inner_parms
, i
) == error_mark_node
)
4677 if (TREE_PURPOSE (TREE_VEC_ELT (inner_parms
, i
)))
4682 if (is_friend_decl
== 2)
4689 /* Clear out the default argument so that we are not
4691 TREE_PURPOSE (TREE_VEC_ELT (inner_parms
, i
)) = NULL_TREE
;
4695 /* At this point, if we're still interested in issuing messages,
4696 they must apply to classes surrounding the object declared. */
4698 msg
= G_("default argument for template parameter for class "
4705 /* Worker for push_template_decl_real, called via
4706 for_each_template_parm. DATA is really an int, indicating the
4707 level of the parameters we are interested in. If T is a template
4708 parameter of that level, return nonzero. */
4711 template_parm_this_level_p (tree t
, void* data
)
4713 int this_level
= *(int *)data
;
4716 if (TREE_CODE (t
) == TEMPLATE_PARM_INDEX
)
4717 level
= TEMPLATE_PARM_LEVEL (t
);
4719 level
= TEMPLATE_TYPE_LEVEL (t
);
4720 return level
== this_level
;
4723 /* Creates a TEMPLATE_DECL for the indicated DECL using the template
4724 parameters given by current_template_args, or reuses a
4725 previously existing one, if appropriate. Returns the DECL, or an
4726 equivalent one, if it is replaced via a call to duplicate_decls.
4728 If IS_FRIEND is true, DECL is a friend declaration. */
4731 push_template_decl_real (tree decl
, bool is_friend
)
4739 int new_template_p
= 0;
4740 /* True if the template is a member template, in the sense of
4742 bool member_template_p
= false;
4744 if (decl
== error_mark_node
|| !current_template_parms
)
4745 return error_mark_node
;
4747 /* See if this is a partial specialization. */
4748 is_partial
= ((DECL_IMPLICIT_TYPEDEF_P (decl
)
4749 && TREE_CODE (TREE_TYPE (decl
)) != ENUMERAL_TYPE
4750 && CLASSTYPE_TEMPLATE_SPECIALIZATION (TREE_TYPE (decl
)))
4751 || (TREE_CODE (decl
) == VAR_DECL
4752 && DECL_LANG_SPECIFIC (decl
)
4753 && DECL_TEMPLATE_SPECIALIZATION (decl
)
4754 && TINFO_USED_TEMPLATE_ID (DECL_TEMPLATE_INFO (decl
))));
4756 if (TREE_CODE (decl
) == FUNCTION_DECL
&& DECL_FRIEND_P (decl
))
4760 /* For a friend, we want the context of the friend function, not
4761 the type of which it is a friend. */
4762 ctx
= CP_DECL_CONTEXT (decl
);
4763 else if (CP_DECL_CONTEXT (decl
)
4764 && TREE_CODE (CP_DECL_CONTEXT (decl
)) != NAMESPACE_DECL
)
4765 /* In the case of a virtual function, we want the class in which
4767 ctx
= CP_DECL_CONTEXT (decl
);
4769 /* Otherwise, if we're currently defining some class, the DECL
4770 is assumed to be a member of the class. */
4771 ctx
= current_scope ();
4773 if (ctx
&& TREE_CODE (ctx
) == NAMESPACE_DECL
)
4776 if (!DECL_CONTEXT (decl
))
4777 DECL_CONTEXT (decl
) = FROB_CONTEXT (current_namespace
);
4779 /* See if this is a primary template. */
4780 if (is_friend
&& ctx
4781 && uses_template_parms_level (ctx
, processing_template_decl
))
4782 /* A friend template that specifies a class context, i.e.
4783 template <typename T> friend void A<T>::f();
4786 else if (TREE_CODE (decl
) == TYPE_DECL
4787 && LAMBDA_TYPE_P (TREE_TYPE (decl
)))
4790 is_primary
= template_parm_scope_p ();
4794 if (DECL_CLASS_SCOPE_P (decl
))
4795 member_template_p
= true;
4796 if (TREE_CODE (decl
) == TYPE_DECL
4797 && anon_aggrname_p (DECL_NAME (decl
)))
4799 error ("template class without a name");
4800 return error_mark_node
;
4802 else if (TREE_CODE (decl
) == FUNCTION_DECL
)
4804 if (member_template_p
)
4806 if (DECL_OVERRIDE_P (decl
) || DECL_FINAL_P (decl
))
4807 error ("member template %qD may not have virt-specifiers", decl
);
4809 if (DECL_DESTRUCTOR_P (decl
))
4813 A destructor shall not be a member template. */
4814 error ("destructor %qD declared as member template", decl
);
4815 return error_mark_node
;
4817 if (NEW_DELETE_OPNAME_P (DECL_NAME (decl
))
4818 && (!prototype_p (TREE_TYPE (decl
))
4819 || TYPE_ARG_TYPES (TREE_TYPE (decl
)) == void_list_node
4820 || !TREE_CHAIN (TYPE_ARG_TYPES (TREE_TYPE (decl
)))
4821 || (TREE_CHAIN (TYPE_ARG_TYPES ((TREE_TYPE (decl
))))
4822 == void_list_node
)))
4824 /* [basic.stc.dynamic.allocation]
4826 An allocation function can be a function
4827 template. ... Template allocation functions shall
4828 have two or more parameters. */
4829 error ("invalid template declaration of %qD", decl
);
4830 return error_mark_node
;
4833 else if (DECL_IMPLICIT_TYPEDEF_P (decl
)
4834 && CLASS_TYPE_P (TREE_TYPE (decl
)))
4836 else if (TREE_CODE (decl
) == TYPE_DECL
4837 && TYPE_DECL_ALIAS_P (decl
))
4838 /* alias-declaration */
4839 gcc_assert (!DECL_ARTIFICIAL (decl
));
4840 else if (VAR_P (decl
))
4841 /* C++14 variable template. */;
4844 error ("template declaration of %q#D", decl
);
4845 return error_mark_node
;
4849 /* Check to see that the rules regarding the use of default
4850 arguments are not being violated. */
4851 check_default_tmpl_args (decl
, current_template_parms
,
4852 is_primary
, is_partial
, /*is_friend_decl=*/0);
4854 /* Ensure that there are no parameter packs in the type of this
4855 declaration that have not been expanded. */
4856 if (TREE_CODE (decl
) == FUNCTION_DECL
)
4858 /* Check each of the arguments individually to see if there are
4859 any bare parameter packs. */
4860 tree type
= TREE_TYPE (decl
);
4861 tree arg
= DECL_ARGUMENTS (decl
);
4862 tree argtype
= TYPE_ARG_TYPES (type
);
4864 while (arg
&& argtype
)
4866 if (!DECL_PACK_P (arg
)
4867 && check_for_bare_parameter_packs (TREE_TYPE (arg
)))
4869 /* This is a PARM_DECL that contains unexpanded parameter
4870 packs. We have already complained about this in the
4871 check_for_bare_parameter_packs call, so just replace
4872 these types with ERROR_MARK_NODE. */
4873 TREE_TYPE (arg
) = error_mark_node
;
4874 TREE_VALUE (argtype
) = error_mark_node
;
4877 arg
= DECL_CHAIN (arg
);
4878 argtype
= TREE_CHAIN (argtype
);
4881 /* Check for bare parameter packs in the return type and the
4882 exception specifiers. */
4883 if (check_for_bare_parameter_packs (TREE_TYPE (type
)))
4884 /* Errors were already issued, set return type to int
4885 as the frontend doesn't expect error_mark_node as
4887 TREE_TYPE (type
) = integer_type_node
;
4888 if (check_for_bare_parameter_packs (TYPE_RAISES_EXCEPTIONS (type
)))
4889 TYPE_RAISES_EXCEPTIONS (type
) = NULL_TREE
;
4891 else if (check_for_bare_parameter_packs ((TREE_CODE (decl
) == TYPE_DECL
4892 && TYPE_DECL_ALIAS_P (decl
))
4893 ? DECL_ORIGINAL_TYPE (decl
)
4894 : TREE_TYPE (decl
)))
4896 TREE_TYPE (decl
) = error_mark_node
;
4897 return error_mark_node
;
4901 return process_partial_specialization (decl
);
4903 args
= current_template_args ();
4906 || TREE_CODE (ctx
) == FUNCTION_DECL
4907 || (CLASS_TYPE_P (ctx
) && TYPE_BEING_DEFINED (ctx
))
4908 || (TREE_CODE (decl
) == TYPE_DECL
4909 && LAMBDA_TYPE_P (TREE_TYPE (decl
)))
4910 || (is_friend
&& !DECL_TEMPLATE_INFO (decl
)))
4912 if (DECL_LANG_SPECIFIC (decl
)
4913 && DECL_TEMPLATE_INFO (decl
)
4914 && DECL_TI_TEMPLATE (decl
))
4915 tmpl
= DECL_TI_TEMPLATE (decl
);
4916 /* If DECL is a TYPE_DECL for a class-template, then there won't
4917 be DECL_LANG_SPECIFIC. The information equivalent to
4918 DECL_TEMPLATE_INFO is found in TYPE_TEMPLATE_INFO instead. */
4919 else if (DECL_IMPLICIT_TYPEDEF_P (decl
)
4920 && TYPE_TEMPLATE_INFO (TREE_TYPE (decl
))
4921 && TYPE_TI_TEMPLATE (TREE_TYPE (decl
)))
4923 /* Since a template declaration already existed for this
4924 class-type, we must be redeclaring it here. Make sure
4925 that the redeclaration is valid. */
4926 redeclare_class_template (TREE_TYPE (decl
),
4927 current_template_parms
);
4928 /* We don't need to create a new TEMPLATE_DECL; just use the
4929 one we already had. */
4930 tmpl
= TYPE_TI_TEMPLATE (TREE_TYPE (decl
));
4934 tmpl
= build_template_decl (decl
, current_template_parms
,
4938 if (DECL_LANG_SPECIFIC (decl
)
4939 && DECL_TEMPLATE_SPECIALIZATION (decl
))
4941 /* A specialization of a member template of a template
4943 SET_DECL_TEMPLATE_SPECIALIZATION (tmpl
);
4944 DECL_TEMPLATE_INFO (tmpl
) = DECL_TEMPLATE_INFO (decl
);
4945 DECL_TEMPLATE_INFO (decl
) = NULL_TREE
;
4951 tree a
, t
, current
, parms
;
4953 tree tinfo
= get_template_info (decl
);
4957 error ("template definition of non-template %q#D", decl
);
4958 return error_mark_node
;
4961 tmpl
= TI_TEMPLATE (tinfo
);
4963 if (DECL_FUNCTION_TEMPLATE_P (tmpl
)
4964 && DECL_TEMPLATE_INFO (decl
) && DECL_TI_ARGS (decl
)
4965 && DECL_TEMPLATE_SPECIALIZATION (decl
)
4966 && DECL_MEMBER_TEMPLATE_P (tmpl
))
4970 /* The declaration is a specialization of a member
4971 template, declared outside the class. Therefore, the
4972 innermost template arguments will be NULL, so we
4973 replace them with the arguments determined by the
4974 earlier call to check_explicit_specialization. */
4975 args
= DECL_TI_ARGS (decl
);
4978 = build_template_decl (decl
, current_template_parms
,
4980 DECL_TEMPLATE_RESULT (new_tmpl
) = decl
;
4981 TREE_TYPE (new_tmpl
) = TREE_TYPE (decl
);
4982 DECL_TI_TEMPLATE (decl
) = new_tmpl
;
4983 SET_DECL_TEMPLATE_SPECIALIZATION (new_tmpl
);
4984 DECL_TEMPLATE_INFO (new_tmpl
)
4985 = build_template_info (tmpl
, args
);
4987 register_specialization (new_tmpl
,
4988 most_general_template (tmpl
),
4994 /* Make sure the template headers we got make sense. */
4996 parms
= DECL_TEMPLATE_PARMS (tmpl
);
4997 i
= TMPL_PARMS_DEPTH (parms
);
4998 if (TMPL_ARGS_DEPTH (args
) != i
)
5000 error ("expected %d levels of template parms for %q#D, got %d",
5001 i
, decl
, TMPL_ARGS_DEPTH (args
));
5002 DECL_INTERFACE_KNOWN (decl
) = 1;
5003 return error_mark_node
;
5006 for (current
= decl
; i
> 0; --i
, parms
= TREE_CHAIN (parms
))
5008 a
= TMPL_ARGS_LEVEL (args
, i
);
5009 t
= INNERMOST_TEMPLATE_PARMS (parms
);
5011 if (TREE_VEC_LENGTH (t
) != TREE_VEC_LENGTH (a
))
5013 if (current
== decl
)
5014 error ("got %d template parameters for %q#D",
5015 TREE_VEC_LENGTH (a
), decl
);
5017 error ("got %d template parameters for %q#T",
5018 TREE_VEC_LENGTH (a
), current
);
5019 error (" but %d required", TREE_VEC_LENGTH (t
));
5020 /* Avoid crash in import_export_decl. */
5021 DECL_INTERFACE_KNOWN (decl
) = 1;
5022 return error_mark_node
;
5025 if (current
== decl
)
5027 else if (current
== NULL_TREE
)
5028 /* Can happen in erroneous input. */
5031 current
= get_containing_scope (current
);
5034 /* Check that the parms are used in the appropriate qualifying scopes
5035 in the declarator. */
5036 if (!comp_template_args
5038 TI_ARGS (get_template_info (DECL_TEMPLATE_RESULT (tmpl
)))))
5041 template arguments to %qD do not match original template %qD",
5042 decl
, DECL_TEMPLATE_RESULT (tmpl
));
5043 if (!uses_template_parms (TI_ARGS (tinfo
)))
5044 inform (input_location
, "use template<> for an explicit specialization");
5045 /* Avoid crash in import_export_decl. */
5046 DECL_INTERFACE_KNOWN (decl
) = 1;
5047 return error_mark_node
;
5051 DECL_TEMPLATE_RESULT (tmpl
) = decl
;
5052 TREE_TYPE (tmpl
) = TREE_TYPE (decl
);
5054 /* Push template declarations for global functions and types. Note
5055 that we do not try to push a global template friend declared in a
5056 template class; such a thing may well depend on the template
5057 parameters of the class. */
5058 if (new_template_p
&& !ctx
5059 && !(is_friend
&& template_class_depth (current_class_type
) > 0))
5061 tmpl
= pushdecl_namespace_level (tmpl
, is_friend
);
5062 if (tmpl
== error_mark_node
)
5063 return error_mark_node
;
5065 /* Hide template friend classes that haven't been declared yet. */
5066 if (is_friend
&& TREE_CODE (decl
) == TYPE_DECL
)
5068 DECL_ANTICIPATED (tmpl
) = 1;
5069 DECL_FRIEND_P (tmpl
) = 1;
5075 tree parms
= DECL_TEMPLATE_PARMS (tmpl
);
5078 DECL_PRIMARY_TEMPLATE (tmpl
) = tmpl
;
5079 if (DECL_CONV_FN_P (tmpl
))
5081 int depth
= TMPL_PARMS_DEPTH (parms
);
5083 /* It is a conversion operator. See if the type converted to
5084 depends on innermost template operands. */
5086 if (uses_template_parms_level (TREE_TYPE (TREE_TYPE (tmpl
)),
5088 DECL_TEMPLATE_CONV_FN_P (tmpl
) = 1;
5091 /* Give template template parms a DECL_CONTEXT of the template
5092 for which they are a parameter. */
5093 parms
= INNERMOST_TEMPLATE_PARMS (parms
);
5094 for (i
= TREE_VEC_LENGTH (parms
) - 1; i
>= 0; --i
)
5096 tree parm
= TREE_VALUE (TREE_VEC_ELT (parms
, i
));
5097 if (TREE_CODE (parm
) == TEMPLATE_DECL
)
5098 DECL_CONTEXT (parm
) = tmpl
;
5101 if (TREE_CODE (decl
) == TYPE_DECL
5102 && TYPE_DECL_ALIAS_P (decl
)
5103 && complex_alias_template_p (tmpl
))
5104 TEMPLATE_DECL_COMPLEX_ALIAS_P (tmpl
) = true;
5107 /* The DECL_TI_ARGS of DECL contains full set of arguments referring
5108 back to its most general template. If TMPL is a specialization,
5109 ARGS may only have the innermost set of arguments. Add the missing
5110 argument levels if necessary. */
5111 if (DECL_TEMPLATE_INFO (tmpl
))
5112 args
= add_outermost_template_args (DECL_TI_ARGS (tmpl
), args
);
5114 info
= build_template_info (tmpl
, args
);
5116 if (DECL_IMPLICIT_TYPEDEF_P (decl
))
5117 SET_TYPE_TEMPLATE_INFO (TREE_TYPE (tmpl
), info
);
5120 if (is_primary
&& !DECL_LANG_SPECIFIC (decl
))
5121 retrofit_lang_decl (decl
);
5122 if (DECL_LANG_SPECIFIC (decl
))
5123 DECL_TEMPLATE_INFO (decl
) = info
;
5126 if (flag_implicit_templates
5128 && TREE_PUBLIC (decl
)
5129 && VAR_OR_FUNCTION_DECL_P (decl
))
5130 /* Set DECL_COMDAT on template instantiations; if we force
5131 them to be emitted by explicit instantiation or -frepo,
5132 mark_needed will tell cgraph to do the right thing. */
5133 DECL_COMDAT (decl
) = true;
5135 return DECL_TEMPLATE_RESULT (tmpl
);
5139 push_template_decl (tree decl
)
5141 return push_template_decl_real (decl
, false);
5144 /* FN is an inheriting constructor that inherits from the constructor
5145 template INHERITED; turn FN into a constructor template with a matching
5149 add_inherited_template_parms (tree fn
, tree inherited
)
5152 = INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (inherited
));
5153 inner_parms
= copy_node (inner_parms
);
5155 = tree_cons (size_int (processing_template_decl
+ 1),
5156 inner_parms
, current_template_parms
);
5157 tree tmpl
= build_template_decl (fn
, parms
, /*member*/true);
5158 tree args
= template_parms_to_args (parms
);
5159 DECL_TEMPLATE_INFO (fn
) = build_template_info (tmpl
, args
);
5160 TREE_TYPE (tmpl
) = TREE_TYPE (fn
);
5161 DECL_TEMPLATE_RESULT (tmpl
) = fn
;
5162 DECL_ARTIFICIAL (tmpl
) = true;
5163 DECL_PRIMARY_TEMPLATE (tmpl
) = tmpl
;
5167 /* Called when a class template TYPE is redeclared with the indicated
5168 template PARMS, e.g.:
5170 template <class T> struct S;
5171 template <class T> struct S {}; */
5174 redeclare_class_template (tree type
, tree parms
)
5180 if (!TYPE_TEMPLATE_INFO (type
))
5182 error ("%qT is not a template type", type
);
5186 tmpl
= TYPE_TI_TEMPLATE (type
);
5187 if (!PRIMARY_TEMPLATE_P (tmpl
))
5188 /* The type is nested in some template class. Nothing to worry
5189 about here; there are no new template parameters for the nested
5195 error ("template specifiers not specified in declaration of %qD",
5200 parms
= INNERMOST_TEMPLATE_PARMS (parms
);
5201 tmpl_parms
= DECL_INNERMOST_TEMPLATE_PARMS (tmpl
);
5203 if (TREE_VEC_LENGTH (parms
) != TREE_VEC_LENGTH (tmpl_parms
))
5205 error_n (input_location
, TREE_VEC_LENGTH (parms
),
5206 "redeclared with %d template parameter",
5207 "redeclared with %d template parameters",
5208 TREE_VEC_LENGTH (parms
));
5209 inform_n (input_location
, TREE_VEC_LENGTH (tmpl_parms
),
5210 "previous declaration %q+D used %d template parameter",
5211 "previous declaration %q+D used %d template parameters",
5212 tmpl
, TREE_VEC_LENGTH (tmpl_parms
));
5216 for (i
= 0; i
< TREE_VEC_LENGTH (tmpl_parms
); ++i
)
5223 if (TREE_VEC_ELT (tmpl_parms
, i
) == error_mark_node
5224 || TREE_VEC_ELT (parms
, i
) == error_mark_node
)
5227 tmpl_parm
= TREE_VALUE (TREE_VEC_ELT (tmpl_parms
, i
));
5228 if (error_operand_p (tmpl_parm
))
5231 parm
= TREE_VALUE (TREE_VEC_ELT (parms
, i
));
5232 tmpl_default
= TREE_PURPOSE (TREE_VEC_ELT (tmpl_parms
, i
));
5233 parm_default
= TREE_PURPOSE (TREE_VEC_ELT (parms
, i
));
5235 /* TMPL_PARM and PARM can be either TYPE_DECL, PARM_DECL, or
5237 if (TREE_CODE (tmpl_parm
) != TREE_CODE (parm
)
5238 || (TREE_CODE (tmpl_parm
) != TYPE_DECL
5239 && !same_type_p (TREE_TYPE (tmpl_parm
), TREE_TYPE (parm
)))
5240 || (TREE_CODE (tmpl_parm
) != PARM_DECL
5241 && (TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (tmpl_parm
))
5242 != TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (parm
))))
5243 || (TREE_CODE (tmpl_parm
) == PARM_DECL
5244 && (TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (tmpl_parm
))
5245 != TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
)))))
5247 error ("template parameter %q+#D", tmpl_parm
);
5248 error ("redeclared here as %q#D", parm
);
5252 if (tmpl_default
!= NULL_TREE
&& parm_default
!= NULL_TREE
)
5254 /* We have in [temp.param]:
5256 A template-parameter may not be given default arguments
5257 by two different declarations in the same scope. */
5258 error_at (input_location
, "redefinition of default argument for %q#D", parm
);
5259 inform (DECL_SOURCE_LOCATION (tmpl_parm
),
5260 "original definition appeared here");
5264 if (parm_default
!= NULL_TREE
)
5265 /* Update the previous template parameters (which are the ones
5266 that will really count) with the new default value. */
5267 TREE_PURPOSE (TREE_VEC_ELT (tmpl_parms
, i
)) = parm_default
;
5268 else if (tmpl_default
!= NULL_TREE
)
5269 /* Update the new parameters, too; they'll be used as the
5270 parameters for any members. */
5271 TREE_PURPOSE (TREE_VEC_ELT (parms
, i
)) = tmpl_default
;
5277 /* The actual substitution part of instantiate_non_dependent_expr_sfinae,
5278 to be used when the caller has already checked
5279 (processing_template_decl
5280 && !instantiation_dependent_expression_p (expr)
5281 && potential_constant_expression (expr))
5282 and cleared processing_template_decl. */
5285 instantiate_non_dependent_expr_internal (tree expr
, tsubst_flags_t complain
)
5287 return tsubst_copy_and_build (expr
,
5290 /*in_decl=*/NULL_TREE
,
5291 /*function_p=*/false,
5292 /*integral_constant_expression_p=*/true);
5295 /* Simplify EXPR if it is a non-dependent expression. Returns the
5296 (possibly simplified) expression. */
5299 instantiate_non_dependent_expr_sfinae (tree expr
, tsubst_flags_t complain
)
5301 if (expr
== NULL_TREE
)
5304 /* If we're in a template, but EXPR isn't value dependent, simplify
5305 it. We're supposed to treat:
5307 template <typename T> void f(T[1 + 1]);
5308 template <typename T> void f(T[2]);
5310 as two declarations of the same function, for example. */
5311 if (processing_template_decl
5312 && !instantiation_dependent_expression_p (expr
)
5313 && potential_constant_expression (expr
))
5315 processing_template_decl_sentinel s
;
5316 expr
= instantiate_non_dependent_expr_internal (expr
, complain
);
5322 instantiate_non_dependent_expr (tree expr
)
5324 return instantiate_non_dependent_expr_sfinae (expr
, tf_error
);
5327 /* Return TRUE iff T is a type alias, a TEMPLATE_DECL for an alias
5328 template declaration, or a TYPE_DECL for an alias declaration. */
5331 alias_type_or_template_p (tree t
)
5335 return ((TREE_CODE (t
) == TYPE_DECL
&& TYPE_DECL_ALIAS_P (t
))
5338 && TYPE_DECL_ALIAS_P (TYPE_NAME (t
)))
5339 || DECL_ALIAS_TEMPLATE_P (t
));
5342 /* Return TRUE iff T is a specialization of an alias template. */
5345 alias_template_specialization_p (const_tree t
)
5347 /* It's an alias template specialization if it's an alias and its
5348 TYPE_NAME is a specialization of a primary template. */
5349 if (TYPE_ALIAS_P (t
))
5351 tree name
= TYPE_NAME (t
);
5352 if (DECL_LANG_SPECIFIC (name
))
5353 if (tree ti
= DECL_TEMPLATE_INFO (name
))
5355 tree tmpl
= TI_TEMPLATE (ti
);
5356 return PRIMARY_TEMPLATE_P (tmpl
);
5362 /* An alias template is complex from a SFINAE perspective if a template-id
5363 using that alias can be ill-formed when the expansion is not, as with
5364 the void_t template. We determine this by checking whether the
5365 expansion for the alias template uses all its template parameters. */
5367 struct uses_all_template_parms_data
5374 uses_all_template_parms_r (tree t
, void *data_
)
5376 struct uses_all_template_parms_data
&data
5377 = *(struct uses_all_template_parms_data
*)data_
;
5378 tree idx
= get_template_parm_index (t
);
5380 if (TEMPLATE_PARM_LEVEL (idx
) == data
.level
)
5381 data
.seen
[TEMPLATE_PARM_IDX (idx
)] = true;
5386 complex_alias_template_p (const_tree tmpl
)
5388 struct uses_all_template_parms_data data
;
5389 tree pat
= DECL_ORIGINAL_TYPE (DECL_TEMPLATE_RESULT (tmpl
));
5390 tree parms
= DECL_TEMPLATE_PARMS (tmpl
);
5391 data
.level
= TMPL_PARMS_DEPTH (parms
);
5392 int len
= TREE_VEC_LENGTH (INNERMOST_TEMPLATE_PARMS (parms
));
5393 data
.seen
= XALLOCAVEC (bool, len
);
5394 for (int i
= 0; i
< len
; ++i
)
5395 data
.seen
[i
] = false;
5397 for_each_template_parm (pat
, uses_all_template_parms_r
, &data
, NULL
, true);
5398 for (int i
= 0; i
< len
; ++i
)
5404 /* Return TRUE iff T is a specialization of a complex alias template with
5405 dependent template-arguments. */
5408 dependent_alias_template_spec_p (const_tree t
)
5410 return (alias_template_specialization_p (t
)
5411 && TEMPLATE_DECL_COMPLEX_ALIAS_P (DECL_TI_TEMPLATE (TYPE_NAME (t
)))
5412 && (any_dependent_template_arguments_p
5413 (INNERMOST_TEMPLATE_ARGS (TYPE_TI_ARGS (t
)))));
5416 /* Return the number of innermost template parameters in TMPL. */
5419 num_innermost_template_parms (tree tmpl
)
5421 tree parms
= INNERMOST_TEMPLATE_PARMS (DECL_TEMPLATE_PARMS (tmpl
));
5422 return TREE_VEC_LENGTH (parms
);
5425 /* Return either TMPL or another template that it is equivalent to under DR
5426 1286: An alias that just changes the name of a template is equivalent to
5427 the other template. */
5430 get_underlying_template (tree tmpl
)
5432 gcc_assert (TREE_CODE (tmpl
) == TEMPLATE_DECL
);
5433 while (DECL_ALIAS_TEMPLATE_P (tmpl
))
5435 tree result
= DECL_ORIGINAL_TYPE (DECL_TEMPLATE_RESULT (tmpl
));
5436 if (TYPE_TEMPLATE_INFO (result
))
5438 tree sub
= TYPE_TI_TEMPLATE (result
);
5439 if (PRIMARY_TEMPLATE_P (sub
)
5440 && (num_innermost_template_parms (tmpl
)
5441 == num_innermost_template_parms (sub
)))
5443 tree alias_args
= INNERMOST_TEMPLATE_ARGS
5444 (template_parms_to_args (DECL_TEMPLATE_PARMS (tmpl
)));
5445 if (!comp_template_args (TYPE_TI_ARGS (result
), alias_args
))
5447 /* The alias type is equivalent to the pattern of the
5448 underlying template, so strip the alias. */
5458 /* Subroutine of convert_nontype_argument. Converts EXPR to TYPE, which
5459 must be a function or a pointer-to-function type, as specified
5460 in [temp.arg.nontype]: disambiguate EXPR if it is an overload set,
5461 and check that the resulting function has external linkage. */
5464 convert_nontype_argument_function (tree type
, tree expr
,
5465 tsubst_flags_t complain
)
5469 linkage_kind linkage
;
5471 fn
= instantiate_type (type
, fns
, tf_none
);
5472 if (fn
== error_mark_node
)
5473 return error_mark_node
;
5476 if (TREE_CODE (fn_no_ptr
) == ADDR_EXPR
)
5477 fn_no_ptr
= TREE_OPERAND (fn_no_ptr
, 0);
5478 if (BASELINK_P (fn_no_ptr
))
5479 fn_no_ptr
= BASELINK_FUNCTIONS (fn_no_ptr
);
5481 /* [temp.arg.nontype]/1
5483 A template-argument for a non-type, non-template template-parameter
5486 -- the address of an object or function with external [C++11: or
5487 internal] linkage. */
5489 if (TREE_CODE (fn_no_ptr
) != FUNCTION_DECL
)
5491 if (complain
& tf_error
)
5493 error ("%qE is not a valid template argument for type %qT",
5495 if (TYPE_PTR_P (type
))
5496 error ("it must be the address of a function with "
5497 "external linkage");
5499 error ("it must be the name of a function with "
5500 "external linkage");
5505 linkage
= decl_linkage (fn_no_ptr
);
5506 if (cxx_dialect
>= cxx11
? linkage
== lk_none
: linkage
!= lk_external
)
5508 if (complain
& tf_error
)
5510 if (cxx_dialect
>= cxx11
)
5511 error ("%qE is not a valid template argument for type %qT "
5512 "because %qD has no linkage",
5513 expr
, type
, fn_no_ptr
);
5515 error ("%qE is not a valid template argument for type %qT "
5516 "because %qD does not have external linkage",
5517 expr
, type
, fn_no_ptr
);
5525 /* Subroutine of convert_nontype_argument.
5526 Check if EXPR of type TYPE is a valid pointer-to-member constant.
5527 Emit an error otherwise. */
5530 check_valid_ptrmem_cst_expr (tree type
, tree expr
,
5531 tsubst_flags_t complain
)
5534 if (expr
&& (null_ptr_cst_p (expr
) || TREE_CODE (expr
) == PTRMEM_CST
))
5536 if (cxx_dialect
>= cxx11
&& null_member_pointer_value_p (expr
))
5538 if (processing_template_decl
5539 && TREE_CODE (expr
) == ADDR_EXPR
5540 && TREE_CODE (TREE_OPERAND (expr
, 0)) == OFFSET_REF
)
5542 if (complain
& tf_error
)
5544 error ("%qE is not a valid template argument for type %qT",
5546 error ("it must be a pointer-to-member of the form %<&X::Y%>");
5551 /* Returns TRUE iff the address of OP is value-dependent.
5553 14.6.2.4 [temp.dep.temp]:
5554 A non-integral non-type template-argument is dependent if its type is
5555 dependent or it has either of the following forms
5558 and contains a nested-name-specifier which specifies a class-name that
5559 names a dependent type.
5561 We generalize this to just say that the address of a member of a
5562 dependent class is value-dependent; the above doesn't cover the
5563 address of a static data member named with an unqualified-id. */
5566 has_value_dependent_address (tree op
)
5568 /* We could use get_inner_reference here, but there's no need;
5569 this is only relevant for template non-type arguments, which
5570 can only be expressed as &id-expression. */
5573 tree ctx
= CP_DECL_CONTEXT (op
);
5574 if (TYPE_P (ctx
) && dependent_type_p (ctx
))
5581 /* The next set of functions are used for providing helpful explanatory
5582 diagnostics for failed overload resolution. Their messages should be
5583 indented by two spaces for consistency with the messages in
5587 unify_success (bool /*explain_p*/)
5593 unify_parameter_deduction_failure (bool explain_p
, tree parm
)
5596 inform (input_location
,
5597 " couldn't deduce template parameter %qD", parm
);
5602 unify_invalid (bool /*explain_p*/)
5608 unify_cv_qual_mismatch (bool explain_p
, tree parm
, tree arg
)
5611 inform (input_location
,
5612 " types %qT and %qT have incompatible cv-qualifiers",
5618 unify_type_mismatch (bool explain_p
, tree parm
, tree arg
)
5621 inform (input_location
, " mismatched types %qT and %qT", parm
, arg
);
5626 unify_parameter_pack_mismatch (bool explain_p
, tree parm
, tree arg
)
5629 inform (input_location
,
5630 " template parameter %qD is not a parameter pack, but "
5637 unify_ptrmem_cst_mismatch (bool explain_p
, tree parm
, tree arg
)
5640 inform (input_location
,
5641 " template argument %qE does not match "
5642 "pointer-to-member constant %qE",
5648 unify_expression_unequal (bool explain_p
, tree parm
, tree arg
)
5651 inform (input_location
, " %qE is not equivalent to %qE", parm
, arg
);
5656 unify_parameter_pack_inconsistent (bool explain_p
, tree old_arg
, tree new_arg
)
5659 inform (input_location
,
5660 " inconsistent parameter pack deduction with %qT and %qT",
5666 unify_inconsistency (bool explain_p
, tree parm
, tree first
, tree second
)
5671 inform (input_location
,
5672 " deduced conflicting types for parameter %qT (%qT and %qT)",
5673 parm
, first
, second
);
5675 inform (input_location
,
5676 " deduced conflicting values for non-type parameter "
5677 "%qE (%qE and %qE)", parm
, first
, second
);
5683 unify_vla_arg (bool explain_p
, tree arg
)
5686 inform (input_location
,
5687 " variable-sized array type %qT is not "
5688 "a valid template argument",
5694 unify_method_type_error (bool explain_p
, tree arg
)
5697 inform (input_location
,
5698 " member function type %qT is not a valid template argument",
5704 unify_arity (bool explain_p
, int have
, int wanted
, bool least_p
= false)
5709 inform_n (input_location
, wanted
,
5710 " candidate expects at least %d argument, %d provided",
5711 " candidate expects at least %d arguments, %d provided",
5714 inform_n (input_location
, wanted
,
5715 " candidate expects %d argument, %d provided",
5716 " candidate expects %d arguments, %d provided",
5723 unify_too_many_arguments (bool explain_p
, int have
, int wanted
)
5725 return unify_arity (explain_p
, have
, wanted
);
5729 unify_too_few_arguments (bool explain_p
, int have
, int wanted
,
5730 bool least_p
= false)
5732 return unify_arity (explain_p
, have
, wanted
, least_p
);
5736 unify_arg_conversion (bool explain_p
, tree to_type
,
5737 tree from_type
, tree arg
)
5740 inform (EXPR_LOC_OR_LOC (arg
, input_location
),
5741 " cannot convert %qE (type %qT) to type %qT",
5742 arg
, from_type
, to_type
);
5747 unify_no_common_base (bool explain_p
, enum template_base_result r
,
5748 tree parm
, tree arg
)
5753 case tbr_ambiguous_baseclass
:
5754 inform (input_location
, " %qT is an ambiguous base class of %qT",
5758 inform (input_location
, " %qT is not derived from %qT", arg
, parm
);
5765 unify_inconsistent_template_template_parameters (bool explain_p
)
5768 inform (input_location
,
5769 " template parameters of a template template argument are "
5770 "inconsistent with other deduced template arguments");
5775 unify_template_deduction_failure (bool explain_p
, tree parm
, tree arg
)
5778 inform (input_location
,
5779 " can't deduce a template for %qT from non-template type %qT",
5785 unify_template_argument_mismatch (bool explain_p
, tree parm
, tree arg
)
5788 inform (input_location
,
5789 " template argument %qE does not match %qD", arg
, parm
);
5794 unify_overload_resolution_failure (bool explain_p
, tree arg
)
5797 inform (input_location
,
5798 " could not resolve address from overloaded function %qE",
5803 /* Attempt to convert the non-type template parameter EXPR to the
5804 indicated TYPE. If the conversion is successful, return the
5805 converted value. If the conversion is unsuccessful, return
5806 NULL_TREE if we issued an error message, or error_mark_node if we
5807 did not. We issue error messages for out-and-out bad template
5808 parameters, but not simply because the conversion failed, since we
5809 might be just trying to do argument deduction. Both TYPE and EXPR
5810 must be non-dependent.
5812 The conversion follows the special rules described in
5813 [temp.arg.nontype], and it is much more strict than an implicit
5816 This function is called twice for each template argument (see
5817 lookup_template_class for a more accurate description of this
5818 problem). This means that we need to handle expressions which
5819 are not valid in a C++ source, but can be created from the
5820 first call (for instance, casts to perform conversions). These
5821 hacks can go away after we fix the double coercion problem. */
5824 convert_nontype_argument (tree type
, tree expr
, tsubst_flags_t complain
)
5828 /* Detect immediately string literals as invalid non-type argument.
5829 This special-case is not needed for correctness (we would easily
5830 catch this later), but only to provide better diagnostic for this
5831 common user mistake. As suggested by DR 100, we do not mention
5832 linkage issues in the diagnostic as this is not the point. */
5833 /* FIXME we're making this OK. */
5834 if (TREE_CODE (expr
) == STRING_CST
)
5836 if (complain
& tf_error
)
5837 error ("%qE is not a valid template argument for type %qT "
5838 "because string literals can never be used in this context",
5843 /* Add the ADDR_EXPR now for the benefit of
5844 value_dependent_expression_p. */
5845 if (TYPE_PTROBV_P (type
)
5846 && TREE_CODE (TREE_TYPE (expr
)) == ARRAY_TYPE
)
5848 expr
= decay_conversion (expr
, complain
);
5849 if (expr
== error_mark_node
)
5850 return error_mark_node
;
5853 /* If we are in a template, EXPR may be non-dependent, but still
5854 have a syntactic, rather than semantic, form. For example, EXPR
5855 might be a SCOPE_REF, rather than the VAR_DECL to which the
5856 SCOPE_REF refers. Preserving the qualifying scope is necessary
5857 so that access checking can be performed when the template is
5858 instantiated -- but here we need the resolved form so that we can
5859 convert the argument. */
5860 bool non_dep
= false;
5861 if (TYPE_REF_OBJ_P (type
)
5862 && has_value_dependent_address (expr
))
5863 /* If we want the address and it's value-dependent, don't fold. */;
5864 else if (!type_unknown_p (expr
)
5865 && processing_template_decl
5866 && !instantiation_dependent_expression_p (expr
)
5867 && potential_constant_expression (expr
))
5869 if (error_operand_p (expr
))
5870 return error_mark_node
;
5871 expr_type
= TREE_TYPE (expr
);
5872 if (TREE_CODE (type
) == REFERENCE_TYPE
)
5873 expr
= mark_lvalue_use (expr
);
5875 expr
= mark_rvalue_use (expr
);
5877 /* If the argument is non-dependent, perform any conversions in
5878 non-dependent context as well. */
5879 processing_template_decl_sentinel
s (non_dep
);
5881 expr
= instantiate_non_dependent_expr_internal (expr
, complain
);
5883 /* 14.3.2/5: The null pointer{,-to-member} conversion is applied
5884 to a non-type argument of "nullptr". */
5885 if (expr
== nullptr_node
&& TYPE_PTR_OR_PTRMEM_P (type
))
5886 expr
= convert (type
, expr
);
5888 /* In C++11, integral or enumeration non-type template arguments can be
5889 arbitrary constant expressions. Pointer and pointer to
5890 member arguments can be general constant expressions that evaluate
5891 to a null value, but otherwise still need to be of a specific form. */
5892 if (cxx_dialect
>= cxx11
)
5894 if (TREE_CODE (expr
) == PTRMEM_CST
)
5895 /* A PTRMEM_CST is already constant, and a valid template
5896 argument for a parameter of pointer to member type, we just want
5897 to leave it in that form rather than lower it to a
5899 else if (INTEGRAL_OR_ENUMERATION_TYPE_P (type
))
5900 expr
= maybe_constant_value (expr
);
5901 else if (TYPE_PTR_OR_PTRMEM_P (type
))
5903 tree folded
= maybe_constant_value (expr
);
5904 if (TYPE_PTR_P (type
) ? integer_zerop (folded
)
5905 : null_member_pointer_value_p (folded
))
5910 /* HACK: Due to double coercion, we can get a
5911 NOP_EXPR<REFERENCE_TYPE>(ADDR_EXPR<POINTER_TYPE> (arg)) here,
5912 which is the tree that we built on the first call (see
5913 below when coercing to reference to object or to reference to
5914 function). We just strip everything and get to the arg.
5915 See g++.old-deja/g++.oliva/template4.C and g++.dg/template/nontype9.C
5917 if (TYPE_REF_OBJ_P (type
) || TYPE_REFFN_P (type
))
5919 tree probe_type
, probe
= expr
;
5920 if (REFERENCE_REF_P (probe
))
5921 probe
= TREE_OPERAND (probe
, 0);
5922 probe_type
= TREE_TYPE (probe
);
5923 if (TREE_CODE (probe
) == NOP_EXPR
)
5925 /* ??? Maybe we could use convert_from_reference here, but we
5926 would need to relax its constraints because the NOP_EXPR
5927 could actually change the type to something more cv-qualified,
5928 and this is not folded by convert_from_reference. */
5929 tree addr
= TREE_OPERAND (probe
, 0);
5930 if (TREE_CODE (probe_type
) == REFERENCE_TYPE
5931 && TREE_CODE (addr
) == ADDR_EXPR
5932 && TYPE_PTR_P (TREE_TYPE (addr
))
5933 && (same_type_ignoring_top_level_qualifiers_p
5934 (TREE_TYPE (probe_type
),
5935 TREE_TYPE (TREE_TYPE (addr
)))))
5937 expr
= TREE_OPERAND (addr
, 0);
5938 expr_type
= TREE_TYPE (probe_type
);
5943 /* We could also generate a NOP_EXPR(ADDR_EXPR()) when the
5944 parameter is a pointer to object, through decay and
5945 qualification conversion. Let's strip everything. */
5946 else if (TREE_CODE (expr
) == NOP_EXPR
&& TYPE_PTROBV_P (type
))
5950 if (TREE_CODE (probe
) == ADDR_EXPR
5951 && TYPE_PTR_P (TREE_TYPE (probe
)))
5953 /* Skip the ADDR_EXPR only if it is part of the decay for
5954 an array. Otherwise, it is part of the original argument
5955 in the source code. */
5956 if (TREE_CODE (TREE_TYPE (TREE_OPERAND (probe
, 0))) == ARRAY_TYPE
)
5957 probe
= TREE_OPERAND (probe
, 0);
5959 expr_type
= TREE_TYPE (expr
);
5963 /* [temp.arg.nontype]/5, bullet 1
5965 For a non-type template-parameter of integral or enumeration type,
5966 integral promotions (_conv.prom_) and integral conversions
5967 (_conv.integral_) are applied. */
5968 if (INTEGRAL_OR_ENUMERATION_TYPE_P (type
))
5970 tree t
= build_integral_nontype_arg_conv (type
, expr
, complain
);
5971 t
= maybe_constant_value (t
);
5972 if (t
!= error_mark_node
)
5975 if (!same_type_ignoring_top_level_qualifiers_p (type
, TREE_TYPE (expr
)))
5976 return error_mark_node
;
5978 /* Notice that there are constant expressions like '4 % 0' which
5979 do not fold into integer constants. */
5980 if (TREE_CODE (expr
) != INTEGER_CST
)
5982 if (complain
& tf_error
)
5984 int errs
= errorcount
, warns
= warningcount
+ werrorcount
;
5985 if (processing_template_decl
5986 && !require_potential_constant_expression (expr
))
5988 expr
= cxx_constant_value (expr
);
5989 if (errorcount
> errs
|| warningcount
+ werrorcount
> warns
)
5990 inform (EXPR_LOC_OR_LOC (expr
, input_location
),
5991 "in template argument for type %qT ", type
);
5992 if (expr
== error_mark_node
)
5994 /* else cxx_constant_value complained but gave us
5995 a real constant, so go ahead. */
5996 gcc_assert (TREE_CODE (expr
) == INTEGER_CST
);
6002 /* Avoid typedef problems. */
6003 if (TREE_TYPE (expr
) != type
)
6004 expr
= fold_convert (type
, expr
);
6006 /* [temp.arg.nontype]/5, bullet 2
6008 For a non-type template-parameter of type pointer to object,
6009 qualification conversions (_conv.qual_) and the array-to-pointer
6010 conversion (_conv.array_) are applied. */
6011 else if (TYPE_PTROBV_P (type
))
6013 /* [temp.arg.nontype]/1 (TC1 version, DR 49):
6015 A template-argument for a non-type, non-template template-parameter
6016 shall be one of: [...]
6018 -- the name of a non-type template-parameter;
6019 -- the address of an object or function with external linkage, [...]
6020 expressed as "& id-expression" where the & is optional if the name
6021 refers to a function or array, or if the corresponding
6022 template-parameter is a reference.
6024 Here, we do not care about functions, as they are invalid anyway
6025 for a parameter of type pointer-to-object. */
6027 if (DECL_P (expr
) && DECL_TEMPLATE_PARM_P (expr
))
6028 /* Non-type template parameters are OK. */
6030 else if (cxx_dialect
>= cxx11
&& integer_zerop (expr
))
6031 /* Null pointer values are OK in C++11. */;
6032 else if (TREE_CODE (expr
) != ADDR_EXPR
6033 && TREE_CODE (expr_type
) != ARRAY_TYPE
)
6037 if (complain
& tf_error
)
6038 error ("%qD is not a valid template argument "
6039 "because %qD is a variable, not the address of "
6040 "a variable", expr
, expr
);
6043 if (POINTER_TYPE_P (expr_type
))
6045 if (complain
& tf_error
)
6046 error ("%qE is not a valid template argument for %qT "
6047 "because it is not the address of a variable",
6051 /* Other values, like integer constants, might be valid
6052 non-type arguments of some other type. */
6053 return error_mark_node
;
6059 decl
= ((TREE_CODE (expr
) == ADDR_EXPR
)
6060 ? TREE_OPERAND (expr
, 0) : expr
);
6063 if (complain
& tf_error
)
6064 error ("%qE is not a valid template argument of type %qT "
6065 "because %qE is not a variable", expr
, type
, decl
);
6068 else if (cxx_dialect
< cxx11
&& !DECL_EXTERNAL_LINKAGE_P (decl
))
6070 if (complain
& tf_error
)
6071 error ("%qE is not a valid template argument of type %qT "
6072 "because %qD does not have external linkage",
6076 else if (cxx_dialect
>= cxx11
&& decl_linkage (decl
) == lk_none
)
6078 if (complain
& tf_error
)
6079 error ("%qE is not a valid template argument of type %qT "
6080 "because %qD has no linkage", expr
, type
, decl
);
6085 expr
= decay_conversion (expr
, complain
);
6086 if (expr
== error_mark_node
)
6087 return error_mark_node
;
6089 expr
= perform_qualification_conversions (type
, expr
);
6090 if (expr
== error_mark_node
)
6091 return error_mark_node
;
6093 /* [temp.arg.nontype]/5, bullet 3
6095 For a non-type template-parameter of type reference to object, no
6096 conversions apply. The type referred to by the reference may be more
6097 cv-qualified than the (otherwise identical) type of the
6098 template-argument. The template-parameter is bound directly to the
6099 template-argument, which must be an lvalue. */
6100 else if (TYPE_REF_OBJ_P (type
))
6102 if (!same_type_ignoring_top_level_qualifiers_p (TREE_TYPE (type
),
6104 return error_mark_node
;
6106 if (!at_least_as_qualified_p (TREE_TYPE (type
), expr_type
))
6108 if (complain
& tf_error
)
6109 error ("%qE is not a valid template argument for type %qT "
6110 "because of conflicts in cv-qualification", expr
, type
);
6114 if (!real_lvalue_p (expr
))
6116 if (complain
& tf_error
)
6117 error ("%qE is not a valid template argument for type %qT "
6118 "because it is not an lvalue", expr
, type
);
6122 /* [temp.arg.nontype]/1
6124 A template-argument for a non-type, non-template template-parameter
6125 shall be one of: [...]
6127 -- the address of an object or function with external linkage. */
6128 if (INDIRECT_REF_P (expr
)
6129 && TYPE_REF_OBJ_P (TREE_TYPE (TREE_OPERAND (expr
, 0))))
6131 expr
= TREE_OPERAND (expr
, 0);
6134 if (complain
& tf_error
)
6135 error ("%q#D is not a valid template argument for type %qT "
6136 "because a reference variable does not have a constant "
6137 "address", expr
, type
);
6144 if (complain
& tf_error
)
6145 error ("%qE is not a valid template argument for type %qT "
6146 "because it is not an object with external linkage",
6151 if (!DECL_EXTERNAL_LINKAGE_P (expr
))
6153 if (complain
& tf_error
)
6154 error ("%qE is not a valid template argument for type %qT "
6155 "because object %qD has not external linkage",
6160 expr
= build_nop (type
, build_address (expr
));
6162 /* [temp.arg.nontype]/5, bullet 4
6164 For a non-type template-parameter of type pointer to function, only
6165 the function-to-pointer conversion (_conv.func_) is applied. If the
6166 template-argument represents a set of overloaded functions (or a
6167 pointer to such), the matching function is selected from the set
6169 else if (TYPE_PTRFN_P (type
))
6171 /* If the argument is a template-id, we might not have enough
6172 context information to decay the pointer. */
6173 if (!type_unknown_p (expr_type
))
6175 expr
= decay_conversion (expr
, complain
);
6176 if (expr
== error_mark_node
)
6177 return error_mark_node
;
6180 if (cxx_dialect
>= cxx11
&& integer_zerop (expr
))
6181 /* Null pointer values are OK in C++11. */
6182 return perform_qualification_conversions (type
, expr
);
6184 expr
= convert_nontype_argument_function (type
, expr
, complain
);
6185 if (!expr
|| expr
== error_mark_node
)
6188 /* [temp.arg.nontype]/5, bullet 5
6190 For a non-type template-parameter of type reference to function, no
6191 conversions apply. If the template-argument represents a set of
6192 overloaded functions, the matching function is selected from the set
6194 else if (TYPE_REFFN_P (type
))
6196 if (TREE_CODE (expr
) == ADDR_EXPR
)
6198 if (complain
& tf_error
)
6200 error ("%qE is not a valid template argument for type %qT "
6201 "because it is a pointer", expr
, type
);
6202 inform (input_location
, "try using %qE instead",
6203 TREE_OPERAND (expr
, 0));
6208 expr
= convert_nontype_argument_function (type
, expr
, complain
);
6209 if (!expr
|| expr
== error_mark_node
)
6212 expr
= build_nop (type
, build_address (expr
));
6214 /* [temp.arg.nontype]/5, bullet 6
6216 For a non-type template-parameter of type pointer to member function,
6217 no conversions apply. If the template-argument represents a set of
6218 overloaded member functions, the matching member function is selected
6219 from the set (_over.over_). */
6220 else if (TYPE_PTRMEMFUNC_P (type
))
6222 expr
= instantiate_type (type
, expr
, tf_none
);
6223 if (expr
== error_mark_node
)
6224 return error_mark_node
;
6226 /* [temp.arg.nontype] bullet 1 says the pointer to member
6227 expression must be a pointer-to-member constant. */
6228 if (!check_valid_ptrmem_cst_expr (type
, expr
, complain
))
6229 return error_mark_node
;
6231 /* There is no way to disable standard conversions in
6232 resolve_address_of_overloaded_function (called by
6233 instantiate_type). It is possible that the call succeeded by
6234 converting &B::I to &D::I (where B is a base of D), so we need
6235 to reject this conversion here.
6237 Actually, even if there was a way to disable standard conversions,
6238 it would still be better to reject them here so that we can
6239 provide a superior diagnostic. */
6240 if (!same_type_p (TREE_TYPE (expr
), type
))
6242 if (complain
& tf_error
)
6244 error ("%qE is not a valid template argument for type %qT "
6245 "because it is of type %qT", expr
, type
,
6247 /* If we are just one standard conversion off, explain. */
6248 if (can_convert_standard (type
, TREE_TYPE (expr
), complain
))
6249 inform (input_location
,
6250 "standard conversions are not allowed in this context");
6255 /* [temp.arg.nontype]/5, bullet 7
6257 For a non-type template-parameter of type pointer to data member,
6258 qualification conversions (_conv.qual_) are applied. */
6259 else if (TYPE_PTRDATAMEM_P (type
))
6261 /* [temp.arg.nontype] bullet 1 says the pointer to member
6262 expression must be a pointer-to-member constant. */
6263 if (!check_valid_ptrmem_cst_expr (type
, expr
, complain
))
6264 return error_mark_node
;
6266 expr
= perform_qualification_conversions (type
, expr
);
6267 if (expr
== error_mark_node
)
6270 else if (NULLPTR_TYPE_P (type
))
6272 if (expr
!= nullptr_node
)
6274 if (complain
& tf_error
)
6275 error ("%qE is not a valid template argument for type %qT "
6276 "because it is of type %qT", expr
, type
, TREE_TYPE (expr
));
6281 /* A template non-type parameter must be one of the above. */
6285 /* Sanity check: did we actually convert the argument to the
6287 gcc_assert (same_type_ignoring_top_level_qualifiers_p
6288 (type
, TREE_TYPE (expr
)));
6289 return convert_from_reference (expr
);
6292 /* Subroutine of coerce_template_template_parms, which returns 1 if
6293 PARM_PARM and ARG_PARM match using the rule for the template
6294 parameters of template template parameters. Both PARM and ARG are
6295 template parameters; the rest of the arguments are the same as for
6296 coerce_template_template_parms.
6299 coerce_template_template_parm (tree parm
,
6301 tsubst_flags_t complain
,
6305 if (arg
== NULL_TREE
|| error_operand_p (arg
)
6306 || parm
== NULL_TREE
|| error_operand_p (parm
))
6309 if (TREE_CODE (arg
) != TREE_CODE (parm
))
6312 switch (TREE_CODE (parm
))
6315 /* We encounter instantiations of templates like
6316 template <template <template <class> class> class TT>
6319 tree parmparm
= DECL_INNERMOST_TEMPLATE_PARMS (parm
);
6320 tree argparm
= DECL_INNERMOST_TEMPLATE_PARMS (arg
);
6322 if (!coerce_template_template_parms
6323 (parmparm
, argparm
, complain
, in_decl
, outer_args
))
6329 if (TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (arg
))
6330 && !TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (parm
)))
6331 /* Argument is a parameter pack but parameter is not. */
6336 /* The tsubst call is used to handle cases such as
6338 template <int> class C {};
6339 template <class T, template <T> class TT> class D {};
6342 i.e. the parameter list of TT depends on earlier parameters. */
6343 if (!uses_template_parms (TREE_TYPE (arg
))
6345 (tsubst (TREE_TYPE (parm
), outer_args
, complain
, in_decl
),
6349 if (TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (arg
))
6350 && !TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
)))
6351 /* Argument is a parameter pack but parameter is not. */
6364 /* Return 1 if PARM_PARMS and ARG_PARMS matches using rule for
6365 template template parameters. Both PARM_PARMS and ARG_PARMS are
6366 vectors of TREE_LIST nodes containing TYPE_DECL, TEMPLATE_DECL
6369 Consider the example:
6370 template <class T> class A;
6371 template<template <class U> class TT> class B;
6373 For B<A>, PARM_PARMS are the parameters to TT, while ARG_PARMS are
6374 the parameters to A, and OUTER_ARGS contains A. */
6377 coerce_template_template_parms (tree parm_parms
,
6379 tsubst_flags_t complain
,
6383 int nparms
, nargs
, i
;
6387 gcc_assert (TREE_CODE (parm_parms
) == TREE_VEC
);
6388 gcc_assert (TREE_CODE (arg_parms
) == TREE_VEC
);
6390 nparms
= TREE_VEC_LENGTH (parm_parms
);
6391 nargs
= TREE_VEC_LENGTH (arg_parms
);
6393 /* Determine whether we have a parameter pack at the end of the
6394 template template parameter's template parameter list. */
6395 if (TREE_VEC_ELT (parm_parms
, nparms
- 1) != error_mark_node
)
6397 parm
= TREE_VALUE (TREE_VEC_ELT (parm_parms
, nparms
- 1));
6399 if (error_operand_p (parm
))
6402 switch (TREE_CODE (parm
))
6406 if (TEMPLATE_TYPE_PARAMETER_PACK (TREE_TYPE (parm
)))
6411 if (TEMPLATE_PARM_PARAMETER_PACK (DECL_INITIAL (parm
)))
6421 && !(variadic_p
&& nargs
>= nparms
- 1))
6424 /* Check all of the template parameters except the parameter pack at
6425 the end (if any). */
6426 for (i
= 0; i
< nparms
- variadic_p
; ++i
)
6428 if (TREE_VEC_ELT (parm_parms
, i
) == error_mark_node
6429 || TREE_VEC_ELT (arg_parms
, i
) == error_mark_node
)
6432 parm
= TREE_VALUE (TREE_VEC_ELT (parm_parms
, i
));
6433 arg
= TREE_VALUE (TREE_VEC_ELT (arg_parms
, i
));
6435 if (!coerce_template_template_parm (parm
, arg
, complain
, in_decl
,
6443 /* Check each of the template parameters in the template
6444 argument against the template parameter pack at the end of
6445 the template template parameter. */
6446 if (TREE_VEC_ELT (parm_parms
, i
) == error_mark_node
)
6449 parm
= TREE_VALUE (TREE_VEC_ELT (parm_parms
, i
));
6451 for (; i
< nargs
; ++i
)
6453 if (TREE_VEC_ELT (arg_parms
, i
) == error_mark_node
)
6456 arg
= TREE_VALUE (TREE_VEC_ELT (arg_parms
, i
));
6458 if (!coerce_template_template_parm (parm
, arg
, complain
, in_decl
,
6467 /* Verifies that the deduced template arguments (in TARGS) for the
6468 template template parameters (in TPARMS) represent valid bindings,
6469 by comparing the template parameter list of each template argument
6470 to the template parameter list of its corresponding template
6471 template parameter, in accordance with DR150. This
6472 routine can only be called after all template arguments have been
6473 deduced. It will return TRUE if all of the template template
6474 parameter bindings are okay, FALSE otherwise. */
6476 template_template_parm_bindings_ok_p (tree tparms
, tree targs
)
6478 int i
, ntparms
= TREE_VEC_LENGTH (tparms
);
6481 /* We're dealing with template parms in this process. */
6482 ++processing_template_decl
;
6484 targs
= INNERMOST_TEMPLATE_ARGS (targs
);
6486 for (i
= 0; i
< ntparms
; ++i
)
6488 tree tparm
= TREE_VALUE (TREE_VEC_ELT (tparms
, i
));
6489 tree targ
= TREE_VEC_ELT (targs
, i
);
6491 if (TREE_CODE (tparm
) == TEMPLATE_DECL
&& targ
)
6493 tree packed_args
= NULL_TREE
;
6496 if (ARGUMENT_PACK_P (targ
))
6498 /* Look inside the argument pack. */
6499 packed_args
= ARGUMENT_PACK_ARGS (targ
);
6500 len
= TREE_VEC_LENGTH (packed_args
);
6503 for (idx
= 0; idx
< len
; ++idx
)
6505 tree targ_parms
= NULL_TREE
;
6508 /* Extract the next argument from the argument
6510 targ
= TREE_VEC_ELT (packed_args
, idx
);
6512 if (PACK_EXPANSION_P (targ
))
6513 /* Look at the pattern of the pack expansion. */
6514 targ
= PACK_EXPANSION_PATTERN (targ
);
6516 /* Extract the template parameters from the template
6518 if (TREE_CODE (targ
) == TEMPLATE_DECL
)
6519 targ_parms
= DECL_INNERMOST_TEMPLATE_PARMS (targ
);
6520 else if (TREE_CODE (targ
) == TEMPLATE_TEMPLATE_PARM
)
6521 targ_parms
= DECL_INNERMOST_TEMPLATE_PARMS (TYPE_NAME (targ
));
6523 /* Verify that we can coerce the template template
6524 parameters from the template argument to the template
6525 parameter. This requires an exact match. */
6527 && !coerce_template_template_parms
6528 (DECL_INNERMOST_TEMPLATE_PARMS (tparm
),
6543 --processing_template_decl
;
6547 /* Since type attributes aren't mangled, we need to strip them from
6548 template type arguments. */
6551 canonicalize_type_argument (tree arg
, tsubst_flags_t complain
)
6553 if (!arg
|| arg
== error_mark_node
|| arg
== TYPE_CANONICAL (arg
))
6555 bool removed_attributes
= false;
6556 tree canon
= strip_typedefs (arg
, &removed_attributes
);
6557 if (removed_attributes
6558 && (complain
& tf_warning
))
6559 warning (0, "ignoring attributes on template argument %qT", arg
);
6563 /* Convert the indicated template ARG as necessary to match the
6564 indicated template PARM. Returns the converted ARG, or
6565 error_mark_node if the conversion was unsuccessful. Error and
6566 warning messages are issued under control of COMPLAIN. This
6567 conversion is for the Ith parameter in the parameter list. ARGS is
6568 the full set of template arguments deduced so far. */
6571 convert_template_argument (tree parm
,
6574 tsubst_flags_t complain
,
6580 int is_type
, requires_type
, is_tmpl_type
, requires_tmpl_type
;
6582 if (parm
== error_mark_node
)
6583 return error_mark_node
;
6585 if (TREE_CODE (arg
) == TREE_LIST
6586 && TREE_CODE (TREE_VALUE (arg
)) == OFFSET_REF
)
6588 /* The template argument was the name of some
6589 member function. That's usually
6590 invalid, but static members are OK. In any
6591 case, grab the underlying fields/functions
6592 and issue an error later if required. */
6593 orig_arg
= TREE_VALUE (arg
);
6594 TREE_TYPE (arg
) = unknown_type_node
;
6599 requires_tmpl_type
= TREE_CODE (parm
) == TEMPLATE_DECL
;
6600 requires_type
= (TREE_CODE (parm
) == TYPE_DECL
6601 || requires_tmpl_type
);
6603 /* When determining whether an argument pack expansion is a template,
6604 look at the pattern. */
6605 if (TREE_CODE (arg
) == TYPE_PACK_EXPANSION
)
6606 arg
= PACK_EXPANSION_PATTERN (arg
);
6608 /* Deal with an injected-class-name used as a template template arg. */
6609 if (requires_tmpl_type
&& CLASS_TYPE_P (arg
))
6611 tree t
= maybe_get_template_decl_from_type_decl (TYPE_NAME (arg
));
6612 if (TREE_CODE (t
) == TEMPLATE_DECL
)
6614 if (cxx_dialect
>= cxx11
)
6615 /* OK under DR 1004. */;
6616 else if (complain
& tf_warning_or_error
)
6617 pedwarn (input_location
, OPT_Wpedantic
, "injected-class-name %qD"
6618 " used as template template argument", TYPE_NAME (arg
));
6619 else if (flag_pedantic_errors
)
6627 ((TREE_CODE (arg
) == TEMPLATE_DECL
6628 && TREE_CODE (DECL_TEMPLATE_RESULT (arg
)) == TYPE_DECL
)
6629 || (requires_tmpl_type
&& TREE_CODE (arg
) == TYPE_ARGUMENT_PACK
)
6630 || TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
6631 || TREE_CODE (arg
) == UNBOUND_CLASS_TEMPLATE
);
6634 && (TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
6635 || TREE_CODE (arg
) == UNBOUND_CLASS_TEMPLATE
))
6636 arg
= TYPE_STUB_DECL (arg
);
6638 is_type
= TYPE_P (arg
) || is_tmpl_type
;
6640 if (requires_type
&& ! is_type
&& TREE_CODE (arg
) == SCOPE_REF
6641 && TREE_CODE (TREE_OPERAND (arg
, 0)) == TEMPLATE_TYPE_PARM
)
6643 if (TREE_CODE (TREE_OPERAND (arg
, 1)) == BIT_NOT_EXPR
)
6645 if (complain
& tf_error
)
6646 error ("invalid use of destructor %qE as a type", orig_arg
);
6647 return error_mark_node
;
6650 permerror (input_location
,
6651 "to refer to a type member of a template parameter, "
6652 "use %<typename %E%>", orig_arg
);
6654 orig_arg
= make_typename_type (TREE_OPERAND (arg
, 0),
6655 TREE_OPERAND (arg
, 1),
6661 if (is_type
!= requires_type
)
6665 if (complain
& tf_error
)
6667 error ("type/value mismatch at argument %d in template "
6668 "parameter list for %qD",
6671 inform (input_location
,
6672 " expected a constant of type %qT, got %qT",
6674 (DECL_P (arg
) ? DECL_NAME (arg
) : orig_arg
));
6675 else if (requires_tmpl_type
)
6676 inform (input_location
,
6677 " expected a class template, got %qE", orig_arg
);
6679 inform (input_location
,
6680 " expected a type, got %qE", orig_arg
);
6683 return error_mark_node
;
6685 if (is_tmpl_type
^ requires_tmpl_type
)
6687 if (in_decl
&& (complain
& tf_error
))
6689 error ("type/value mismatch at argument %d in template "
6690 "parameter list for %qD",
6693 inform (input_location
,
6694 " expected a type, got %qT", DECL_NAME (arg
));
6696 inform (input_location
,
6697 " expected a class template, got %qT", orig_arg
);
6699 return error_mark_node
;
6704 if (requires_tmpl_type
)
6706 if (template_parameter_pack_p (parm
) && ARGUMENT_PACK_P (orig_arg
))
6708 else if (TREE_CODE (TREE_TYPE (arg
)) == UNBOUND_CLASS_TEMPLATE
)
6709 /* The number of argument required is not known yet.
6710 Just accept it for now. */
6711 val
= TREE_TYPE (arg
);
6714 tree parmparm
= DECL_INNERMOST_TEMPLATE_PARMS (parm
);
6717 /* Strip alias templates that are equivalent to another
6719 arg
= get_underlying_template (arg
);
6720 argparm
= DECL_INNERMOST_TEMPLATE_PARMS (arg
);
6722 if (coerce_template_template_parms (parmparm
, argparm
,
6728 /* TEMPLATE_TEMPLATE_PARM node is preferred over
6730 if (val
!= error_mark_node
)
6732 if (DECL_TEMPLATE_TEMPLATE_PARM_P (val
))
6733 val
= TREE_TYPE (val
);
6734 if (TREE_CODE (orig_arg
) == TYPE_PACK_EXPANSION
)
6735 val
= make_pack_expansion (val
);
6740 if (in_decl
&& (complain
& tf_error
))
6742 error ("type/value mismatch at argument %d in "
6743 "template parameter list for %qD",
6745 inform (input_location
,
6746 " expected a template of type %qD, got %qT",
6750 val
= error_mark_node
;
6756 /* We only form one instance of each template specialization.
6757 Therefore, if we use a non-canonical variant (i.e., a
6758 typedef), any future messages referring to the type will use
6759 the typedef, which is confusing if those future uses do not
6760 themselves also use the typedef. */
6762 val
= canonicalize_type_argument (val
, complain
);
6766 tree t
= tsubst (TREE_TYPE (parm
), args
, complain
, in_decl
);
6768 if (invalid_nontype_parm_type_p (t
, complain
))
6769 return error_mark_node
;
6771 if (template_parameter_pack_p (parm
) && ARGUMENT_PACK_P (orig_arg
))
6773 if (same_type_p (t
, TREE_TYPE (orig_arg
)))
6777 /* Not sure if this is reachable, but it doesn't hurt
6779 error ("type mismatch in nontype parameter pack");
6780 val
= error_mark_node
;
6783 else if (!dependent_template_arg_p (orig_arg
)
6784 && !uses_template_parms (t
))
6785 /* We used to call digest_init here. However, digest_init
6786 will report errors, which we don't want when complain
6787 is zero. More importantly, digest_init will try too
6788 hard to convert things: for example, `0' should not be
6789 converted to pointer type at this point according to
6790 the standard. Accepting this is not merely an
6791 extension, since deciding whether or not these
6792 conversions can occur is part of determining which
6793 function template to call, or whether a given explicit
6794 argument specification is valid. */
6795 val
= convert_nontype_argument (t
, orig_arg
, complain
);
6798 bool removed_attr
= false;
6799 val
= strip_typedefs_expr (orig_arg
, &removed_attr
);
6802 if (val
== NULL_TREE
)
6803 val
= error_mark_node
;
6804 else if (val
== error_mark_node
&& (complain
& tf_error
))
6805 error ("could not convert template argument %qE to %qT", orig_arg
, t
);
6807 if (TREE_CODE (val
) == SCOPE_REF
)
6809 /* Strip typedefs from the SCOPE_REF. */
6810 tree type
= canonicalize_type_argument (TREE_TYPE (val
), complain
);
6811 tree scope
= canonicalize_type_argument (TREE_OPERAND (val
, 0),
6813 val
= build_qualified_name (type
, scope
, TREE_OPERAND (val
, 1),
6814 QUALIFIED_NAME_IS_TEMPLATE (val
));
6821 /* Coerces the remaining template arguments in INNER_ARGS (from
6822 ARG_IDX to the end) into the parameter pack at PARM_IDX in PARMS.
6823 Returns the coerced argument pack. PARM_IDX is the position of this
6824 parameter in the template parameter list. ARGS is the original
6825 template argument list. */
6827 coerce_template_parameter_pack (tree parms
,
6835 tsubst_flags_t complain
)
6837 tree parm
= TREE_VEC_ELT (parms
, parm_idx
);
6838 int nargs
= inner_args
? NUM_TMPL_ARGS (inner_args
) : 0;
6841 tree packed_parms
= NULL_TREE
;
6843 if (arg_idx
> nargs
)
6846 if (tree packs
= fixed_parameter_pack_p (TREE_VALUE (parm
)))
6848 /* When the template parameter is a non-type template parameter pack
6849 or template template parameter pack whose type or template
6850 parameters use parameter packs, we know exactly how many arguments
6851 we are looking for. Build a vector of the instantiated decls for
6852 these template parameters in PACKED_PARMS. */
6853 /* We can't use make_pack_expansion here because it would interpret a
6854 _DECL as a use rather than a declaration. */
6855 tree decl
= TREE_VALUE (parm
);
6856 tree exp
= cxx_make_type (TYPE_PACK_EXPANSION
);
6857 SET_PACK_EXPANSION_PATTERN (exp
, decl
);
6858 PACK_EXPANSION_PARAMETER_PACKS (exp
) = packs
;
6859 SET_TYPE_STRUCTURAL_EQUALITY (exp
);
6861 TREE_VEC_LENGTH (args
)--;
6862 packed_parms
= tsubst_pack_expansion (exp
, args
, complain
, decl
);
6863 TREE_VEC_LENGTH (args
)++;
6865 if (packed_parms
== error_mark_node
)
6866 return error_mark_node
;
6868 /* If we're doing a partial instantiation of a member template,
6869 verify that all of the types used for the non-type
6870 template parameter pack are, in fact, valid for non-type
6871 template parameters. */
6873 && PACK_EXPANSION_P (TREE_VEC_ELT (inner_args
, arg_idx
)))
6875 int j
, len
= TREE_VEC_LENGTH (packed_parms
);
6876 for (j
= 0; j
< len
; ++j
)
6878 tree t
= TREE_TYPE (TREE_VEC_ELT (packed_parms
, j
));
6879 if (invalid_nontype_parm_type_p (t
, complain
))
6880 return error_mark_node
;
6882 /* We don't know how many args we have yet, just
6883 use the unconverted ones for now. */
6887 packed_args
= make_tree_vec (TREE_VEC_LENGTH (packed_parms
));
6890 packed_args
= make_tree_vec (nargs
- arg_idx
);
6892 /* Convert the remaining arguments, which will be a part of the
6893 parameter pack "parm". */
6894 for (; arg_idx
< nargs
; ++arg_idx
)
6896 tree arg
= TREE_VEC_ELT (inner_args
, arg_idx
);
6897 tree actual_parm
= TREE_VALUE (parm
);
6898 int pack_idx
= arg_idx
- parm_idx
;
6902 /* Once we've packed as many args as we have types, stop. */
6903 if (pack_idx
>= TREE_VEC_LENGTH (packed_parms
))
6905 else if (PACK_EXPANSION_P (arg
))
6906 /* We don't know how many args we have yet, just
6907 use the unconverted ones for now. */
6910 actual_parm
= TREE_VEC_ELT (packed_parms
, pack_idx
);
6913 if (arg
== error_mark_node
)
6915 if (complain
& tf_error
)
6916 error ("template argument %d is invalid", arg_idx
+ 1);
6919 arg
= convert_template_argument (actual_parm
,
6920 arg
, new_args
, complain
, parm_idx
,
6922 if (arg
== error_mark_node
)
6924 TREE_VEC_ELT (packed_args
, pack_idx
) = arg
;
6927 if (arg_idx
- parm_idx
< TREE_VEC_LENGTH (packed_args
)
6928 && TREE_VEC_LENGTH (packed_args
) > 0)
6930 if (complain
& tf_error
)
6931 error ("wrong number of template arguments (%d, should be %d)",
6932 arg_idx
- parm_idx
, TREE_VEC_LENGTH (packed_args
));
6933 return error_mark_node
;
6936 if (TREE_CODE (TREE_VALUE (parm
)) == TYPE_DECL
6937 || TREE_CODE (TREE_VALUE (parm
)) == TEMPLATE_DECL
)
6938 argument_pack
= cxx_make_type (TYPE_ARGUMENT_PACK
);
6941 argument_pack
= make_node (NONTYPE_ARGUMENT_PACK
);
6942 TREE_TYPE (argument_pack
)
6943 = tsubst (TREE_TYPE (TREE_VALUE (parm
)), new_args
, complain
, in_decl
);
6944 TREE_CONSTANT (argument_pack
) = 1;
6947 SET_ARGUMENT_PACK_ARGS (argument_pack
, packed_args
);
6948 #ifdef ENABLE_CHECKING
6949 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (packed_args
,
6950 TREE_VEC_LENGTH (packed_args
));
6952 return argument_pack
;
6955 /* Returns the number of pack expansions in the template argument vector
6959 pack_expansion_args_count (tree args
)
6964 for (i
= 0; i
< TREE_VEC_LENGTH (args
); ++i
)
6966 tree elt
= TREE_VEC_ELT (args
, i
);
6967 if (elt
&& PACK_EXPANSION_P (elt
))
6973 /* Convert all template arguments to their appropriate types, and
6974 return a vector containing the innermost resulting template
6975 arguments. If any error occurs, return error_mark_node. Error and
6976 warning messages are issued under control of COMPLAIN.
6978 If REQUIRE_ALL_ARGS is false, argument deduction will be performed
6979 for arguments not specified in ARGS. Otherwise, if
6980 USE_DEFAULT_ARGS is true, default arguments will be used to fill in
6981 unspecified arguments. If REQUIRE_ALL_ARGS is true, but
6982 USE_DEFAULT_ARGS is false, then all arguments must be specified in
6986 coerce_template_parms (tree parms
,
6989 tsubst_flags_t complain
,
6990 bool require_all_args
,
6991 bool use_default_args
)
6993 int nparms
, nargs
, parm_idx
, arg_idx
, lost
= 0;
6994 tree orig_inner_args
;
6997 tree new_inner_args
;
6998 int saved_unevaluated_operand
;
6999 int saved_inhibit_evaluation_warnings
;
7001 /* When used as a boolean value, indicates whether this is a
7002 variadic template parameter list. Since it's an int, we can also
7003 subtract it from nparms to get the number of non-variadic
7006 int variadic_args_p
= 0;
7007 int post_variadic_parms
= 0;
7009 /* Likewise for parameters with default arguments. */
7012 if (args
== error_mark_node
)
7013 return error_mark_node
;
7015 nparms
= TREE_VEC_LENGTH (parms
);
7017 /* Determine if there are any parameter packs or default arguments. */
7018 for (parm_idx
= 0; parm_idx
< nparms
; ++parm_idx
)
7020 tree parm
= TREE_VEC_ELT (parms
, parm_idx
);
7022 ++post_variadic_parms
;
7023 if (template_parameter_pack_p (TREE_VALUE (parm
)))
7025 if (TREE_PURPOSE (parm
))
7029 inner_args
= orig_inner_args
= INNERMOST_TEMPLATE_ARGS (args
);
7030 /* If there are no parameters that follow a parameter pack, we need to
7031 expand any argument packs so that we can deduce a parameter pack from
7032 some non-packed args followed by an argument pack, as in variadic85.C.
7033 If there are such parameters, we need to leave argument packs intact
7034 so the arguments are assigned properly. This can happen when dealing
7035 with a nested class inside a partial specialization of a class
7036 template, as in variadic92.C, or when deducing a template parameter pack
7037 from a sub-declarator, as in variadic114.C. */
7038 if (!post_variadic_parms
)
7039 inner_args
= expand_template_argument_pack (inner_args
);
7041 /* Count any pack expansion args. */
7042 variadic_args_p
= pack_expansion_args_count (inner_args
);
7044 nargs
= inner_args
? NUM_TMPL_ARGS (inner_args
) : 0;
7045 if ((nargs
> nparms
&& !variadic_p
)
7046 || (nargs
< nparms
- variadic_p
7049 && (!use_default_args
7050 || (TREE_VEC_ELT (parms
, nargs
) != error_mark_node
7051 && !TREE_PURPOSE (TREE_VEC_ELT (parms
, nargs
))))))
7053 if (complain
& tf_error
)
7055 if (variadic_p
|| default_p
)
7057 nparms
-= variadic_p
+ default_p
;
7058 error ("wrong number of template arguments "
7059 "(%d, should be at least %d)", nargs
, nparms
);
7062 error ("wrong number of template arguments "
7063 "(%d, should be %d)", nargs
, nparms
);
7066 inform (input_location
, "provided for %q+D", in_decl
);
7069 return error_mark_node
;
7071 /* We can't pass a pack expansion to a non-pack parameter of an alias
7072 template (DR 1430). */
7073 else if (in_decl
&& DECL_ALIAS_TEMPLATE_P (in_decl
)
7075 && nargs
- variadic_args_p
< nparms
- variadic_p
)
7077 if (complain
& tf_error
)
7079 for (int i
= 0; i
< TREE_VEC_LENGTH (inner_args
); ++i
)
7081 tree arg
= TREE_VEC_ELT (inner_args
, i
);
7082 tree parm
= TREE_VALUE (TREE_VEC_ELT (parms
, i
));
7084 if (PACK_EXPANSION_P (arg
)
7085 && !template_parameter_pack_p (parm
))
7087 error ("pack expansion argument for non-pack parameter "
7088 "%qD of alias template %qD", parm
, in_decl
);
7089 inform (DECL_SOURCE_LOCATION (parm
), "declared here");
7096 return error_mark_node
;
7099 /* We need to evaluate the template arguments, even though this
7100 template-id may be nested within a "sizeof". */
7101 saved_unevaluated_operand
= cp_unevaluated_operand
;
7102 cp_unevaluated_operand
= 0;
7103 saved_inhibit_evaluation_warnings
= c_inhibit_evaluation_warnings
;
7104 c_inhibit_evaluation_warnings
= 0;
7105 new_inner_args
= make_tree_vec (nparms
);
7106 new_args
= add_outermost_template_args (args
, new_inner_args
);
7107 int pack_adjust
= 0;
7108 for (parm_idx
= 0, arg_idx
= 0; parm_idx
< nparms
; parm_idx
++, arg_idx
++)
7113 /* Get the Ith template parameter. */
7114 parm
= TREE_VEC_ELT (parms
, parm_idx
);
7116 if (parm
== error_mark_node
)
7118 TREE_VEC_ELT (new_inner_args
, arg_idx
) = error_mark_node
;
7122 /* Calculate the next argument. */
7123 if (arg_idx
< nargs
)
7124 arg
= TREE_VEC_ELT (inner_args
, arg_idx
);
7128 if (template_parameter_pack_p (TREE_VALUE (parm
))
7129 && !(arg
&& ARGUMENT_PACK_P (arg
)))
7131 /* Some arguments will be placed in the
7132 template parameter pack PARM. */
7133 arg
= coerce_template_parameter_pack (parms
, parm_idx
, args
,
7134 inner_args
, arg_idx
,
7138 if (arg
== NULL_TREE
)
7140 /* We don't know how many args we have yet, just use the
7141 unconverted (and still packed) ones for now. */
7142 new_inner_args
= orig_inner_args
;
7147 TREE_VEC_ELT (new_inner_args
, parm_idx
) = arg
;
7149 /* Store this argument. */
7150 if (arg
== error_mark_node
)
7153 /* We are done with all of the arguments. */
7158 pack_adjust
= TREE_VEC_LENGTH (ARGUMENT_PACK_ARGS (arg
)) - 1;
7159 arg_idx
+= pack_adjust
;
7166 if (PACK_EXPANSION_P (arg
))
7168 /* "If every valid specialization of a variadic template
7169 requires an empty template parameter pack, the template is
7170 ill-formed, no diagnostic required." So check that the
7171 pattern works with this parameter. */
7172 tree pattern
= PACK_EXPANSION_PATTERN (arg
);
7173 tree conv
= convert_template_argument (TREE_VALUE (parm
),
7177 if (conv
== error_mark_node
)
7179 inform (input_location
, "so any instantiation with a "
7180 "non-empty parameter pack would be ill-formed");
7183 else if (TYPE_P (conv
) && !TYPE_P (pattern
))
7184 /* Recover from missing typename. */
7185 TREE_VEC_ELT (inner_args
, arg_idx
)
7186 = make_pack_expansion (conv
);
7188 /* We don't know how many args we have yet, just
7189 use the unconverted ones for now. */
7190 new_inner_args
= inner_args
;
7195 else if (require_all_args
)
7197 /* There must be a default arg in this case. */
7198 arg
= tsubst_template_arg (TREE_PURPOSE (parm
), new_args
,
7200 /* The position of the first default template argument,
7201 is also the number of non-defaulted arguments in NEW_INNER_ARGS.
7203 if (!NON_DEFAULT_TEMPLATE_ARGS_COUNT (new_inner_args
))
7204 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (new_inner_args
,
7205 arg_idx
- pack_adjust
);
7210 if (arg
== error_mark_node
)
7212 if (complain
& tf_error
)
7213 error ("template argument %d is invalid", arg_idx
+ 1);
7216 /* This only occurs if there was an error in the template
7217 parameter list itself (which we would already have
7218 reported) that we are trying to recover from, e.g., a class
7219 template with a parameter list such as
7220 template<typename..., typename>. */
7223 arg
= convert_template_argument (TREE_VALUE (parm
),
7224 arg
, new_args
, complain
,
7227 if (arg
== error_mark_node
)
7229 TREE_VEC_ELT (new_inner_args
, arg_idx
- pack_adjust
) = arg
;
7231 cp_unevaluated_operand
= saved_unevaluated_operand
;
7232 c_inhibit_evaluation_warnings
= saved_inhibit_evaluation_warnings
;
7234 if (variadic_p
&& arg_idx
< nargs
)
7236 if (complain
& tf_error
)
7238 error ("wrong number of template arguments "
7239 "(%d, should be %d)", nargs
, arg_idx
);
7241 error ("provided for %q+D", in_decl
);
7243 return error_mark_node
;
7247 return error_mark_node
;
7249 #ifdef ENABLE_CHECKING
7250 if (!NON_DEFAULT_TEMPLATE_ARGS_COUNT (new_inner_args
))
7251 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (new_inner_args
,
7252 TREE_VEC_LENGTH (new_inner_args
));
7255 return new_inner_args
;
7258 /* Like coerce_template_parms. If PARMS represents all template
7259 parameters levels, this function returns a vector of vectors
7260 representing all the resulting argument levels. Note that in this
7261 case, only the innermost arguments are coerced because the
7262 outermost ones are supposed to have been coerced already.
7264 Otherwise, if PARMS represents only (the innermost) vector of
7265 parameters, this function returns a vector containing just the
7266 innermost resulting arguments. */
7269 coerce_innermost_template_parms (tree parms
,
7272 tsubst_flags_t complain
,
7273 bool require_all_args
,
7274 bool use_default_args
)
7276 int parms_depth
= TMPL_PARMS_DEPTH (parms
);
7277 int args_depth
= TMPL_ARGS_DEPTH (args
);
7280 if (parms_depth
> 1)
7282 coerced_args
= make_tree_vec (parms_depth
);
7286 for (level
= parms
, cur_depth
= parms_depth
;
7287 parms_depth
> 0 && level
!= NULL_TREE
;
7288 level
= TREE_CHAIN (level
), --cur_depth
)
7291 if (cur_depth
== args_depth
)
7292 l
= coerce_template_parms (TREE_VALUE (level
),
7293 args
, in_decl
, complain
,
7297 l
= TMPL_ARGS_LEVEL (args
, cur_depth
);
7299 if (l
== error_mark_node
)
7300 return error_mark_node
;
7302 SET_TMPL_ARGS_LEVEL (coerced_args
, cur_depth
, l
);
7306 coerced_args
= coerce_template_parms (INNERMOST_TEMPLATE_PARMS (parms
),
7307 args
, in_decl
, complain
,
7310 return coerced_args
;
7313 /* Returns 1 if template args OT and NT are equivalent. */
7316 template_args_equal (tree ot
, tree nt
)
7320 if (nt
== NULL_TREE
|| ot
== NULL_TREE
)
7323 if (TREE_CODE (nt
) == TREE_VEC
)
7324 /* For member templates */
7325 return TREE_CODE (ot
) == TREE_VEC
&& comp_template_args (ot
, nt
);
7326 else if (PACK_EXPANSION_P (ot
))
7327 return (PACK_EXPANSION_P (nt
)
7328 && template_args_equal (PACK_EXPANSION_PATTERN (ot
),
7329 PACK_EXPANSION_PATTERN (nt
))
7330 && template_args_equal (PACK_EXPANSION_EXTRA_ARGS (ot
),
7331 PACK_EXPANSION_EXTRA_ARGS (nt
)));
7332 else if (ARGUMENT_PACK_P (ot
))
7337 if (!ARGUMENT_PACK_P (nt
))
7340 opack
= ARGUMENT_PACK_ARGS (ot
);
7341 npack
= ARGUMENT_PACK_ARGS (nt
);
7342 len
= TREE_VEC_LENGTH (opack
);
7343 if (TREE_VEC_LENGTH (npack
) != len
)
7345 for (i
= 0; i
< len
; ++i
)
7346 if (!template_args_equal (TREE_VEC_ELT (opack
, i
),
7347 TREE_VEC_ELT (npack
, i
)))
7351 else if (ot
&& TREE_CODE (ot
) == ARGUMENT_PACK_SELECT
)
7353 /* We get here probably because we are in the middle of substituting
7354 into the pattern of a pack expansion. In that case the
7355 ARGUMENT_PACK_SELECT temporarily replaces the pack argument we are
7356 interested in. So we want to use the initial pack argument for
7358 ot
= ARGUMENT_PACK_SELECT_FROM_PACK (ot
);
7359 if (nt
&& TREE_CODE (nt
) == ARGUMENT_PACK_SELECT
)
7360 nt
= ARGUMENT_PACK_SELECT_FROM_PACK (nt
);
7361 return template_args_equal (ot
, nt
);
7363 else if (TYPE_P (nt
))
7367 /* Don't treat an alias template specialization with dependent
7368 arguments as equivalent to its underlying type when used as a
7369 template argument; we need them to be distinct so that we
7370 substitute into the specialization arguments at instantiation
7371 time. And aliases can't be equivalent without being ==, so
7372 we don't need to look any deeper. */
7373 if (TYPE_ALIAS_P (nt
) || TYPE_ALIAS_P (ot
))
7376 return same_type_p (ot
, nt
);
7378 else if (TREE_CODE (ot
) == TREE_VEC
|| TYPE_P (ot
))
7382 /* Try to treat a template non-type argument that has been converted
7383 to the parameter type as equivalent to one that hasn't yet. */
7384 for (enum tree_code code1
= TREE_CODE (ot
);
7385 CONVERT_EXPR_CODE_P (code1
)
7386 || code1
== NON_LVALUE_EXPR
;
7387 code1
= TREE_CODE (ot
))
7388 ot
= TREE_OPERAND (ot
, 0);
7389 for (enum tree_code code2
= TREE_CODE (nt
);
7390 CONVERT_EXPR_CODE_P (code2
)
7391 || code2
== NON_LVALUE_EXPR
;
7392 code2
= TREE_CODE (nt
))
7393 nt
= TREE_OPERAND (nt
, 0);
7395 return cp_tree_equal (ot
, nt
);
7399 /* Returns 1 iff the OLDARGS and NEWARGS are in fact identical sets of
7400 template arguments. Returns 0 otherwise, and updates OLDARG_PTR and
7401 NEWARG_PTR with the offending arguments if they are non-NULL. */
7404 comp_template_args_with_info (tree oldargs
, tree newargs
,
7405 tree
*oldarg_ptr
, tree
*newarg_ptr
)
7409 if (oldargs
== newargs
)
7412 if (!oldargs
|| !newargs
)
7415 if (TREE_VEC_LENGTH (oldargs
) != TREE_VEC_LENGTH (newargs
))
7418 for (i
= 0; i
< TREE_VEC_LENGTH (oldargs
); ++i
)
7420 tree nt
= TREE_VEC_ELT (newargs
, i
);
7421 tree ot
= TREE_VEC_ELT (oldargs
, i
);
7423 if (! template_args_equal (ot
, nt
))
7425 if (oldarg_ptr
!= NULL
)
7427 if (newarg_ptr
!= NULL
)
7435 /* Returns 1 iff the OLDARGS and NEWARGS are in fact identical sets
7436 of template arguments. Returns 0 otherwise. */
7439 comp_template_args (tree oldargs
, tree newargs
)
7441 return comp_template_args_with_info (oldargs
, newargs
, NULL
, NULL
);
7445 add_pending_template (tree d
)
7447 tree ti
= (TYPE_P (d
)
7448 ? CLASSTYPE_TEMPLATE_INFO (d
)
7449 : DECL_TEMPLATE_INFO (d
));
7450 struct pending_template
*pt
;
7453 if (TI_PENDING_TEMPLATE_FLAG (ti
))
7456 /* We are called both from instantiate_decl, where we've already had a
7457 tinst_level pushed, and instantiate_template, where we haven't.
7459 level
= !current_tinst_level
|| current_tinst_level
->decl
!= d
;
7462 push_tinst_level (d
);
7464 pt
= ggc_alloc
<pending_template
> ();
7466 pt
->tinst
= current_tinst_level
;
7467 if (last_pending_template
)
7468 last_pending_template
->next
= pt
;
7470 pending_templates
= pt
;
7472 last_pending_template
= pt
;
7474 TI_PENDING_TEMPLATE_FLAG (ti
) = 1;
7481 /* Return a TEMPLATE_ID_EXPR corresponding to the indicated FNS and
7482 ARGLIST. Valid choices for FNS are given in the cp-tree.def
7483 documentation for TEMPLATE_ID_EXPR. */
7486 lookup_template_function (tree fns
, tree arglist
)
7490 if (fns
== error_mark_node
|| arglist
== error_mark_node
)
7491 return error_mark_node
;
7493 gcc_assert (!arglist
|| TREE_CODE (arglist
) == TREE_VEC
);
7495 if (!is_overloaded_fn (fns
) && !identifier_p (fns
))
7497 error ("%q#D is not a function template", fns
);
7498 return error_mark_node
;
7501 if (BASELINK_P (fns
))
7503 BASELINK_FUNCTIONS (fns
) = build2 (TEMPLATE_ID_EXPR
,
7505 BASELINK_FUNCTIONS (fns
),
7510 type
= TREE_TYPE (fns
);
7511 if (TREE_CODE (fns
) == OVERLOAD
|| !type
)
7512 type
= unknown_type_node
;
7514 return build2 (TEMPLATE_ID_EXPR
, type
, fns
, arglist
);
7517 /* Within the scope of a template class S<T>, the name S gets bound
7518 (in build_self_reference) to a TYPE_DECL for the class, not a
7519 TEMPLATE_DECL. If DECL is a TYPE_DECL for current_class_type,
7520 or one of its enclosing classes, and that type is a template,
7521 return the associated TEMPLATE_DECL. Otherwise, the original
7524 Also handle the case when DECL is a TREE_LIST of ambiguous
7525 injected-class-names from different bases. */
7528 maybe_get_template_decl_from_type_decl (tree decl
)
7530 if (decl
== NULL_TREE
)
7533 /* DR 176: A lookup that finds an injected-class-name (10.2
7534 [class.member.lookup]) can result in an ambiguity in certain cases
7535 (for example, if it is found in more than one base class). If all of
7536 the injected-class-names that are found refer to specializations of
7537 the same class template, and if the name is followed by a
7538 template-argument-list, the reference refers to the class template
7539 itself and not a specialization thereof, and is not ambiguous. */
7540 if (TREE_CODE (decl
) == TREE_LIST
)
7542 tree t
, tmpl
= NULL_TREE
;
7543 for (t
= decl
; t
; t
= TREE_CHAIN (t
))
7545 tree elt
= maybe_get_template_decl_from_type_decl (TREE_VALUE (t
));
7548 else if (tmpl
!= elt
)
7551 if (tmpl
&& t
== NULL_TREE
)
7557 return (decl
!= NULL_TREE
7558 && DECL_SELF_REFERENCE_P (decl
)
7559 && CLASSTYPE_TEMPLATE_INFO (TREE_TYPE (decl
)))
7560 ? CLASSTYPE_TI_TEMPLATE (TREE_TYPE (decl
)) : decl
;
7563 /* Given an IDENTIFIER_NODE (or type TEMPLATE_DECL) and a chain of
7564 parameters, find the desired type.
7566 D1 is the PTYPENAME terminal, and ARGLIST is the list of arguments.
7568 IN_DECL, if non-NULL, is the template declaration we are trying to
7571 If ENTERING_SCOPE is nonzero, we are about to enter the scope of
7572 the class we are looking up.
7574 Issue error and warning messages under control of COMPLAIN.
7576 If the template class is really a local class in a template
7577 function, then the FUNCTION_CONTEXT is the function in which it is
7580 ??? Note that this function is currently called *twice* for each
7581 template-id: the first time from the parser, while creating the
7582 incomplete type (finish_template_type), and the second type during the
7583 real instantiation (instantiate_template_class). This is surely something
7584 that we want to avoid. It also causes some problems with argument
7585 coercion (see convert_nontype_argument for more information on this). */
7588 lookup_template_class_1 (tree d1
, tree arglist
, tree in_decl
, tree context
,
7589 int entering_scope
, tsubst_flags_t complain
)
7591 tree templ
= NULL_TREE
, parmlist
;
7598 if (identifier_p (d1
))
7600 tree value
= innermost_non_namespace_value (d1
);
7601 if (value
&& DECL_TEMPLATE_TEMPLATE_PARM_P (value
))
7606 push_decl_namespace (context
);
7607 templ
= lookup_name (d1
);
7608 templ
= maybe_get_template_decl_from_type_decl (templ
);
7610 pop_decl_namespace ();
7613 context
= DECL_CONTEXT (templ
);
7615 else if (TREE_CODE (d1
) == TYPE_DECL
&& MAYBE_CLASS_TYPE_P (TREE_TYPE (d1
)))
7617 tree type
= TREE_TYPE (d1
);
7619 /* If we are declaring a constructor, say A<T>::A<T>, we will get
7620 an implicit typename for the second A. Deal with it. */
7621 if (TREE_CODE (type
) == TYPENAME_TYPE
&& TREE_TYPE (type
))
7622 type
= TREE_TYPE (type
);
7624 if (CLASSTYPE_TEMPLATE_INFO (type
))
7626 templ
= CLASSTYPE_TI_TEMPLATE (type
);
7627 d1
= DECL_NAME (templ
);
7630 else if (TREE_CODE (d1
) == ENUMERAL_TYPE
7631 || (TYPE_P (d1
) && MAYBE_CLASS_TYPE_P (d1
)))
7633 templ
= TYPE_TI_TEMPLATE (d1
);
7634 d1
= DECL_NAME (templ
);
7636 else if (DECL_TYPE_TEMPLATE_P (d1
))
7639 d1
= DECL_NAME (templ
);
7640 context
= DECL_CONTEXT (templ
);
7642 else if (DECL_TEMPLATE_TEMPLATE_PARM_P (d1
))
7645 d1
= DECL_NAME (templ
);
7648 /* Issue an error message if we didn't find a template. */
7651 if (complain
& tf_error
)
7652 error ("%qT is not a template", d1
);
7653 return error_mark_node
;
7656 if (TREE_CODE (templ
) != TEMPLATE_DECL
7657 /* Make sure it's a user visible template, if it was named by
7659 || ((complain
& tf_user
) && !DECL_TEMPLATE_PARM_P (templ
)
7660 && !PRIMARY_TEMPLATE_P (templ
)))
7662 if (complain
& tf_error
)
7664 error ("non-template type %qT used as a template", d1
);
7666 error ("for template declaration %q+D", in_decl
);
7668 return error_mark_node
;
7671 complain
&= ~tf_user
;
7673 /* An alias that just changes the name of a template is equivalent to the
7674 other template, so if any of the arguments are pack expansions, strip
7675 the alias to avoid problems with a pack expansion passed to a non-pack
7676 alias template parameter (DR 1430). */
7677 if (pack_expansion_args_count (INNERMOST_TEMPLATE_ARGS (arglist
)))
7678 templ
= get_underlying_template (templ
);
7680 if (DECL_TEMPLATE_TEMPLATE_PARM_P (templ
))
7682 /* Create a new TEMPLATE_DECL and TEMPLATE_TEMPLATE_PARM node to store
7683 template arguments */
7689 parmlist
= DECL_INNERMOST_TEMPLATE_PARMS (templ
);
7691 /* Consider an example where a template template parameter declared as
7693 template <class T, class U = std::allocator<T> > class TT
7695 The template parameter level of T and U are one level larger than
7696 of TT. To proper process the default argument of U, say when an
7697 instantiation `TT<int>' is seen, we need to build the full
7698 arguments containing {int} as the innermost level. Outer levels,
7699 available when not appearing as default template argument, can be
7700 obtained from the arguments of the enclosing template.
7702 Suppose that TT is later substituted with std::vector. The above
7703 instantiation is `TT<int, std::allocator<T> >' with TT at
7704 level 1, and T at level 2, while the template arguments at level 1
7705 becomes {std::vector} and the inner level 2 is {int}. */
7707 outer
= DECL_CONTEXT (templ
);
7709 outer
= TI_ARGS (get_template_info (DECL_TEMPLATE_RESULT (outer
)));
7710 else if (current_template_parms
)
7711 /* This is an argument of the current template, so we haven't set
7712 DECL_CONTEXT yet. */
7713 outer
= current_template_args ();
7716 arglist
= add_to_template_args (outer
, arglist
);
7718 arglist2
= coerce_template_parms (parmlist
, arglist
, templ
,
7720 /*require_all_args=*/true,
7721 /*use_default_args=*/true);
7722 if (arglist2
== error_mark_node
7723 || (!uses_template_parms (arglist2
)
7724 && check_instantiated_args (templ
, arglist2
, complain
)))
7725 return error_mark_node
;
7727 parm
= bind_template_template_parm (TREE_TYPE (templ
), arglist2
);
7732 tree template_type
= TREE_TYPE (templ
);
7735 tree found
= NULL_TREE
;
7738 int is_dependent_type
;
7739 int use_partial_inst_tmpl
= false;
7741 if (template_type
== error_mark_node
)
7742 /* An error occurred while building the template TEMPL, and a
7743 diagnostic has most certainly been emitted for that
7744 already. Let's propagate that error. */
7745 return error_mark_node
;
7747 gen_tmpl
= most_general_template (templ
);
7748 parmlist
= DECL_TEMPLATE_PARMS (gen_tmpl
);
7749 parm_depth
= TMPL_PARMS_DEPTH (parmlist
);
7750 arg_depth
= TMPL_ARGS_DEPTH (arglist
);
7752 if (arg_depth
== 1 && parm_depth
> 1)
7754 /* We've been given an incomplete set of template arguments.
7757 template <class T> struct S1 {
7758 template <class U> struct S2 {};
7759 template <class U> struct S2<U*> {};
7762 we will be called with an ARGLIST of `U*', but the
7763 TEMPLATE will be `template <class T> template
7764 <class U> struct S1<T>::S2'. We must fill in the missing
7767 = add_outermost_template_args (TYPE_TI_ARGS (TREE_TYPE (templ
)),
7769 arg_depth
= TMPL_ARGS_DEPTH (arglist
);
7772 /* Now we should have enough arguments. */
7773 gcc_assert (parm_depth
== arg_depth
);
7775 /* From here on, we're only interested in the most general
7778 /* Calculate the BOUND_ARGS. These will be the args that are
7779 actually tsubst'd into the definition to create the
7781 arglist
= coerce_innermost_template_parms (parmlist
, arglist
, gen_tmpl
,
7783 /*require_all_args=*/true,
7784 /*use_default_args=*/true);
7786 if (arglist
== error_mark_node
)
7787 /* We were unable to bind the arguments. */
7788 return error_mark_node
;
7790 /* In the scope of a template class, explicit references to the
7791 template class refer to the type of the template, not any
7792 instantiation of it. For example, in:
7794 template <class T> class C { void f(C<T>); }
7796 the `C<T>' is just the same as `C'. Outside of the
7797 class, however, such a reference is an instantiation. */
7799 || !PRIMARY_TEMPLATE_P (gen_tmpl
)
7800 || currently_open_class (template_type
))
7801 /* comp_template_args is expensive, check it last. */
7802 && comp_template_args (TYPE_TI_ARGS (template_type
),
7804 return template_type
;
7806 /* If we already have this specialization, return it. */
7807 elt
.tmpl
= gen_tmpl
;
7809 hash
= spec_hasher::hash (&elt
);
7810 entry
= type_specializations
->find_with_hash (&elt
, hash
);
7815 is_dependent_type
= uses_template_parms (arglist
);
7817 /* If the deduced arguments are invalid, then the binding
7819 if (!is_dependent_type
7820 && check_instantiated_args (gen_tmpl
,
7821 INNERMOST_TEMPLATE_ARGS (arglist
),
7823 return error_mark_node
;
7825 if (!is_dependent_type
7826 && !PRIMARY_TEMPLATE_P (gen_tmpl
)
7827 && !LAMBDA_TYPE_P (TREE_TYPE (gen_tmpl
))
7828 && TREE_CODE (CP_DECL_CONTEXT (gen_tmpl
)) == NAMESPACE_DECL
)
7830 found
= xref_tag_from_type (TREE_TYPE (gen_tmpl
),
7831 DECL_NAME (gen_tmpl
),
7832 /*tag_scope=*/ts_global
);
7836 context
= tsubst (DECL_CONTEXT (gen_tmpl
), arglist
,
7838 if (context
== error_mark_node
)
7839 return error_mark_node
;
7842 context
= global_namespace
;
7844 /* Create the type. */
7845 if (DECL_ALIAS_TEMPLATE_P (gen_tmpl
))
7847 /* The user referred to a specialization of an alias
7848 template represented by GEN_TMPL.
7850 [temp.alias]/2 says:
7852 When a template-id refers to the specialization of an
7853 alias template, it is equivalent to the associated
7854 type obtained by substitution of its
7855 template-arguments for the template-parameters in the
7856 type-id of the alias template. */
7858 t
= tsubst (TREE_TYPE (gen_tmpl
), arglist
, complain
, in_decl
);
7859 /* Note that the call above (by indirectly calling
7860 register_specialization in tsubst_decl) registers the
7861 TYPE_DECL representing the specialization of the alias
7862 template. So next time someone substitutes ARGLIST for
7863 the template parms into the alias template (GEN_TMPL),
7864 she'll get that TYPE_DECL back. */
7866 if (t
== error_mark_node
)
7869 else if (TREE_CODE (template_type
) == ENUMERAL_TYPE
)
7871 if (!is_dependent_type
)
7873 set_current_access_from_decl (TYPE_NAME (template_type
));
7874 t
= start_enum (TYPE_IDENTIFIER (template_type
), NULL_TREE
,
7875 tsubst (ENUM_UNDERLYING_TYPE (template_type
),
7876 arglist
, complain
, in_decl
),
7877 SCOPED_ENUM_P (template_type
), NULL
);
7879 if (t
== error_mark_node
)
7884 /* We don't want to call start_enum for this type, since
7885 the values for the enumeration constants may involve
7886 template parameters. And, no one should be interested
7887 in the enumeration constants for such a type. */
7888 t
= cxx_make_type (ENUMERAL_TYPE
);
7889 SET_SCOPED_ENUM_P (t
, SCOPED_ENUM_P (template_type
));
7891 SET_OPAQUE_ENUM_P (t
, OPAQUE_ENUM_P (template_type
));
7892 ENUM_FIXED_UNDERLYING_TYPE_P (t
)
7893 = ENUM_FIXED_UNDERLYING_TYPE_P (template_type
);
7895 else if (CLASS_TYPE_P (template_type
))
7897 t
= make_class_type (TREE_CODE (template_type
));
7898 CLASSTYPE_DECLARED_CLASS (t
)
7899 = CLASSTYPE_DECLARED_CLASS (template_type
);
7900 SET_CLASSTYPE_IMPLICIT_INSTANTIATION (t
);
7901 TYPE_FOR_JAVA (t
) = TYPE_FOR_JAVA (template_type
);
7903 /* A local class. Make sure the decl gets registered properly. */
7904 if (context
== current_function_decl
)
7905 pushtag (DECL_NAME (gen_tmpl
), t
, /*tag_scope=*/ts_current
);
7907 if (comp_template_args (CLASSTYPE_TI_ARGS (template_type
), arglist
))
7908 /* This instantiation is another name for the primary
7909 template type. Set the TYPE_CANONICAL field
7911 TYPE_CANONICAL (t
) = template_type
;
7912 else if (any_template_arguments_need_structural_equality_p (arglist
))
7913 /* Some of the template arguments require structural
7914 equality testing, so this template class requires
7915 structural equality testing. */
7916 SET_TYPE_STRUCTURAL_EQUALITY (t
);
7921 /* If we called start_enum or pushtag above, this information
7922 will already be set up. */
7925 TYPE_CONTEXT (t
) = FROB_CONTEXT (context
);
7927 type_decl
= create_implicit_typedef (DECL_NAME (gen_tmpl
), t
);
7928 DECL_CONTEXT (type_decl
) = TYPE_CONTEXT (t
);
7929 DECL_SOURCE_LOCATION (type_decl
)
7930 = DECL_SOURCE_LOCATION (TYPE_STUB_DECL (template_type
));
7933 type_decl
= TYPE_NAME (t
);
7935 if (CLASS_TYPE_P (template_type
))
7937 TREE_PRIVATE (type_decl
)
7938 = TREE_PRIVATE (TYPE_MAIN_DECL (template_type
));
7939 TREE_PROTECTED (type_decl
)
7940 = TREE_PROTECTED (TYPE_MAIN_DECL (template_type
));
7941 if (CLASSTYPE_VISIBILITY_SPECIFIED (template_type
))
7943 DECL_VISIBILITY_SPECIFIED (type_decl
) = 1;
7944 DECL_VISIBILITY (type_decl
) = CLASSTYPE_VISIBILITY (template_type
);
7948 if (OVERLOAD_TYPE_P (t
)
7949 && !DECL_ALIAS_TEMPLATE_P (gen_tmpl
))
7951 static const char *tags
[] = {"abi_tag", "may_alias"};
7953 for (unsigned ix
= 0; ix
!= 2; ix
++)
7956 = lookup_attribute (tags
[ix
], TYPE_ATTRIBUTES (template_type
));
7960 else if (!TREE_CHAIN (attributes
) && !TYPE_ATTRIBUTES (t
))
7961 TYPE_ATTRIBUTES (t
) = attributes
;
7964 = tree_cons (TREE_PURPOSE (attributes
),
7965 TREE_VALUE (attributes
),
7966 TYPE_ATTRIBUTES (t
));
7970 /* Let's consider the explicit specialization of a member
7971 of a class template specialization that is implicitly instantiated,
7976 template<class U> struct M {}; //#0
7981 struct S<int>::M<char> //#1
7985 [temp.expl.spec]/4 says this is valid.
7987 In this case, when we write:
7990 M is instantiated from the CLASSTYPE_TI_TEMPLATE of #1, not from
7993 When we encounter #1, we want to store the partial instantiation
7994 of M (template<class T> S<int>::M<T>) in its CLASSTYPE_TI_TEMPLATE.
7996 For all cases other than this "explicit specialization of member of a
7997 class template", we just want to store the most general template into
7998 the CLASSTYPE_TI_TEMPLATE of M.
8000 This case of "explicit specialization of member of a class template"
8002 1/ the enclosing class is an instantiation of, and therefore not
8003 the same as, the context of the most general template, and
8004 2/ we aren't looking at the partial instantiation itself, i.e.
8005 the innermost arguments are not the same as the innermost parms of
8006 the most general template.
8008 So it's only when 1/ and 2/ happens that we want to use the partial
8009 instantiation of the member template in lieu of its most general
8012 if (PRIMARY_TEMPLATE_P (gen_tmpl
)
8013 && TMPL_ARGS_HAVE_MULTIPLE_LEVELS (arglist
)
8014 /* the enclosing class must be an instantiation... */
8015 && CLASS_TYPE_P (context
)
8016 && !same_type_p (context
, DECL_CONTEXT (gen_tmpl
)))
8018 tree partial_inst_args
;
8019 TREE_VEC_LENGTH (arglist
)--;
8020 ++processing_template_decl
;
8022 tsubst (INNERMOST_TEMPLATE_ARGS
8023 (TYPE_TI_ARGS (TREE_TYPE (gen_tmpl
))),
8024 arglist
, complain
, NULL_TREE
);
8025 --processing_template_decl
;
8026 TREE_VEC_LENGTH (arglist
)++;
8027 use_partial_inst_tmpl
=
8028 /*...and we must not be looking at the partial instantiation
8030 !comp_template_args (INNERMOST_TEMPLATE_ARGS (arglist
),
8034 if (!use_partial_inst_tmpl
)
8035 /* This case is easy; there are no member templates involved. */
8039 /* This is a full instantiation of a member template. Find
8040 the partial instantiation of which this is an instance. */
8042 /* Temporarily reduce by one the number of levels in the ARGLIST
8043 so as to avoid comparing the last set of arguments. */
8044 TREE_VEC_LENGTH (arglist
)--;
8045 found
= tsubst (gen_tmpl
, arglist
, complain
, NULL_TREE
);
8046 TREE_VEC_LENGTH (arglist
)++;
8047 /* FOUND is either a proper class type, or an alias
8048 template specialization. In the later case, it's a
8049 TYPE_DECL, resulting from the substituting of arguments
8050 for parameters in the TYPE_DECL of the alias template
8051 done earlier. So be careful while getting the template
8053 found
= TREE_CODE (found
) == TYPE_DECL
8054 ? TYPE_TI_TEMPLATE (TREE_TYPE (found
))
8055 : CLASSTYPE_TI_TEMPLATE (found
);
8058 SET_TYPE_TEMPLATE_INFO (t
, build_template_info (found
, arglist
));
8061 slot
= type_specializations
->find_slot_with_hash (&elt
, hash
, INSERT
);
8062 entry
= ggc_alloc
<spec_entry
> ();
8066 /* Note this use of the partial instantiation so we can check it
8067 later in maybe_process_partial_specialization. */
8068 DECL_TEMPLATE_INSTANTIATIONS (found
)
8069 = tree_cons (arglist
, t
,
8070 DECL_TEMPLATE_INSTANTIATIONS (found
));
8072 if (TREE_CODE (template_type
) == ENUMERAL_TYPE
&& !is_dependent_type
8073 && !DECL_ALIAS_TEMPLATE_P (gen_tmpl
))
8074 /* Now that the type has been registered on the instantiations
8075 list, we set up the enumerators. Because the enumeration
8076 constants may involve the enumeration type itself, we make
8077 sure to register the type first, and then create the
8078 constants. That way, doing tsubst_expr for the enumeration
8079 constants won't result in recursive calls here; we'll find
8080 the instantiation and exit above. */
8081 tsubst_enum (template_type
, t
, arglist
);
8083 if (CLASS_TYPE_P (template_type
) && is_dependent_type
)
8084 /* If the type makes use of template parameters, the
8085 code that generates debugging information will crash. */
8086 DECL_IGNORED_P (TYPE_MAIN_DECL (t
)) = 1;
8088 /* Possibly limit visibility based on template args. */
8089 TREE_PUBLIC (type_decl
) = 1;
8090 determine_visibility (type_decl
);
8092 inherit_targ_abi_tags (t
);
8098 /* Wrapper for lookup_template_class_1. */
8101 lookup_template_class (tree d1
, tree arglist
, tree in_decl
, tree context
,
8102 int entering_scope
, tsubst_flags_t complain
)
8105 timevar_push (TV_TEMPLATE_INST
);
8106 ret
= lookup_template_class_1 (d1
, arglist
, in_decl
, context
,
8107 entering_scope
, complain
);
8108 timevar_pop (TV_TEMPLATE_INST
);
8112 /* Return a TEMPLATE_ID_EXPR for the given variable template and ARGLIST.
8113 The type of the expression is the unknown_type_node since the
8114 template-id could refer to an explicit or partial specialization. */
8117 lookup_template_variable (tree templ
, tree arglist
)
8119 tree type
= unknown_type_node
;
8120 return build2 (TEMPLATE_ID_EXPR
, type
, templ
, arglist
);
8123 /* Instantiate a variable declaration from a TEMPLATE_ID_EXPR for use. */
8126 finish_template_variable (tree var
)
8128 tree templ
= TREE_OPERAND (var
, 0);
8130 tree arglist
= TREE_OPERAND (var
, 1);
8131 tree tmpl_args
= DECL_TI_ARGS (DECL_TEMPLATE_RESULT (templ
));
8132 arglist
= add_outermost_template_args (tmpl_args
, arglist
);
8134 tree parms
= DECL_TEMPLATE_PARMS (templ
);
8135 tsubst_flags_t complain
= tf_warning_or_error
;
8136 arglist
= coerce_innermost_template_parms (parms
, arglist
, templ
, complain
,
8138 /*use_default*/true);
8140 return instantiate_template (templ
, arglist
, complain
);
8147 /* True when we should also visit template parameters that occur in
8148 non-deduced contexts. */
8149 bool include_nondeduced_p
;
8150 hash_set
<tree
> *visited
;
8153 /* Called from for_each_template_parm via walk_tree. */
8156 for_each_template_parm_r (tree
*tp
, int *walk_subtrees
, void *d
)
8159 struct pair_fn_data
*pfd
= (struct pair_fn_data
*) d
;
8160 tree_fn_t fn
= pfd
->fn
;
8161 void *data
= pfd
->data
;
8164 && (pfd
->include_nondeduced_p
|| TREE_CODE (t
) != TYPENAME_TYPE
)
8165 && for_each_template_parm (TYPE_CONTEXT (t
), fn
, data
, pfd
->visited
,
8166 pfd
->include_nondeduced_p
))
8167 return error_mark_node
;
8169 switch (TREE_CODE (t
))
8172 if (TYPE_PTRMEMFUNC_P (t
))
8178 if (!TYPE_TEMPLATE_INFO (t
))
8180 else if (for_each_template_parm (TYPE_TI_ARGS (t
),
8181 fn
, data
, pfd
->visited
,
8182 pfd
->include_nondeduced_p
))
8183 return error_mark_node
;
8187 if (for_each_template_parm (TYPE_MIN_VALUE (t
),
8188 fn
, data
, pfd
->visited
,
8189 pfd
->include_nondeduced_p
)
8190 || for_each_template_parm (TYPE_MAX_VALUE (t
),
8191 fn
, data
, pfd
->visited
,
8192 pfd
->include_nondeduced_p
))
8193 return error_mark_node
;
8197 /* Since we're not going to walk subtrees, we have to do this
8199 if (for_each_template_parm (TYPE_METHOD_BASETYPE (t
), fn
, data
,
8200 pfd
->visited
, pfd
->include_nondeduced_p
))
8201 return error_mark_node
;
8205 /* Check the return type. */
8206 if (for_each_template_parm (TREE_TYPE (t
), fn
, data
, pfd
->visited
,
8207 pfd
->include_nondeduced_p
))
8208 return error_mark_node
;
8210 /* Check the parameter types. Since default arguments are not
8211 instantiated until they are needed, the TYPE_ARG_TYPES may
8212 contain expressions that involve template parameters. But,
8213 no-one should be looking at them yet. And, once they're
8214 instantiated, they don't contain template parameters, so
8215 there's no point in looking at them then, either. */
8219 for (parm
= TYPE_ARG_TYPES (t
); parm
; parm
= TREE_CHAIN (parm
))
8220 if (for_each_template_parm (TREE_VALUE (parm
), fn
, data
,
8221 pfd
->visited
, pfd
->include_nondeduced_p
))
8222 return error_mark_node
;
8224 /* Since we've already handled the TYPE_ARG_TYPES, we don't
8225 want walk_tree walking into them itself. */
8231 case UNDERLYING_TYPE
:
8232 if (pfd
->include_nondeduced_p
8233 && for_each_template_parm (TYPE_FIELDS (t
), fn
, data
,
8235 pfd
->include_nondeduced_p
))
8236 return error_mark_node
;
8241 if (DECL_LANG_SPECIFIC (t
) && DECL_TEMPLATE_INFO (t
)
8242 && for_each_template_parm (DECL_TI_ARGS (t
), fn
, data
,
8243 pfd
->visited
, pfd
->include_nondeduced_p
))
8244 return error_mark_node
;
8249 if (TREE_CODE (t
) == CONST_DECL
&& DECL_TEMPLATE_PARM_P (t
)
8250 && for_each_template_parm (DECL_INITIAL (t
), fn
, data
,
8251 pfd
->visited
, pfd
->include_nondeduced_p
))
8252 return error_mark_node
;
8253 if (DECL_CONTEXT (t
)
8254 && pfd
->include_nondeduced_p
8255 && for_each_template_parm (DECL_CONTEXT (t
), fn
, data
,
8256 pfd
->visited
, pfd
->include_nondeduced_p
))
8257 return error_mark_node
;
8260 case BOUND_TEMPLATE_TEMPLATE_PARM
:
8261 /* Record template parameters such as `T' inside `TT<T>'. */
8262 if (for_each_template_parm (TYPE_TI_ARGS (t
), fn
, data
, pfd
->visited
,
8263 pfd
->include_nondeduced_p
))
8264 return error_mark_node
;
8267 case TEMPLATE_TEMPLATE_PARM
:
8268 case TEMPLATE_TYPE_PARM
:
8269 case TEMPLATE_PARM_INDEX
:
8270 if (fn
&& (*fn
)(t
, data
))
8271 return error_mark_node
;
8273 return error_mark_node
;
8277 /* A template template parameter is encountered. */
8278 if (DECL_TEMPLATE_TEMPLATE_PARM_P (t
)
8279 && for_each_template_parm (TREE_TYPE (t
), fn
, data
, pfd
->visited
,
8280 pfd
->include_nondeduced_p
))
8281 return error_mark_node
;
8283 /* Already substituted template template parameter */
8289 || for_each_template_parm (TYPENAME_TYPE_FULLNAME (t
), fn
,
8291 pfd
->include_nondeduced_p
))
8292 return error_mark_node
;
8296 if (TREE_TYPE (t
) && TYPE_PTRMEMFUNC_P (TREE_TYPE (t
))
8297 && pfd
->include_nondeduced_p
8298 && for_each_template_parm (TYPE_PTRMEMFUNC_FN_TYPE
8299 (TREE_TYPE (t
)), fn
, data
,
8300 pfd
->visited
, pfd
->include_nondeduced_p
))
8301 return error_mark_node
;
8306 /* If there's no type, then this thing must be some expression
8307 involving template parameters. */
8308 if (!fn
&& !TREE_TYPE (t
))
8309 return error_mark_node
;
8314 case IMPLICIT_CONV_EXPR
:
8315 case REINTERPRET_CAST_EXPR
:
8316 case CONST_CAST_EXPR
:
8317 case STATIC_CAST_EXPR
:
8318 case DYNAMIC_CAST_EXPR
:
8322 case PSEUDO_DTOR_EXPR
:
8324 return error_mark_node
;
8331 /* We didn't find any template parameters we liked. */
8335 /* For each TEMPLATE_TYPE_PARM, TEMPLATE_TEMPLATE_PARM,
8336 BOUND_TEMPLATE_TEMPLATE_PARM or TEMPLATE_PARM_INDEX in T,
8337 call FN with the parameter and the DATA.
8338 If FN returns nonzero, the iteration is terminated, and
8339 for_each_template_parm returns 1. Otherwise, the iteration
8340 continues. If FN never returns a nonzero value, the value
8341 returned by for_each_template_parm is 0. If FN is NULL, it is
8342 considered to be the function which always returns 1.
8344 If INCLUDE_NONDEDUCED_P, then this routine will also visit template
8345 parameters that occur in non-deduced contexts. When false, only
8346 visits those template parameters that can be deduced. */
8349 for_each_template_parm (tree t
, tree_fn_t fn
, void* data
,
8350 hash_set
<tree
> *visited
,
8351 bool include_nondeduced_p
)
8353 struct pair_fn_data pfd
;
8359 pfd
.include_nondeduced_p
= include_nondeduced_p
;
8361 /* Walk the tree. (Conceptually, we would like to walk without
8362 duplicates, but for_each_template_parm_r recursively calls
8363 for_each_template_parm, so we would need to reorganize a fair
8364 bit to use walk_tree_without_duplicates, so we keep our own
8367 pfd
.visited
= visited
;
8369 pfd
.visited
= new hash_set
<tree
>;
8370 result
= cp_walk_tree (&t
,
8371 for_each_template_parm_r
,
8373 pfd
.visited
) != NULL_TREE
;
8385 /* Returns true if T depends on any template parameter. */
8388 uses_template_parms (tree t
)
8394 int saved_processing_template_decl
;
8396 saved_processing_template_decl
= processing_template_decl
;
8397 if (!saved_processing_template_decl
)
8398 processing_template_decl
= 1;
8400 dependent_p
= dependent_type_p (t
);
8401 else if (TREE_CODE (t
) == TREE_VEC
)
8402 dependent_p
= any_dependent_template_arguments_p (t
);
8403 else if (TREE_CODE (t
) == TREE_LIST
)
8404 dependent_p
= (uses_template_parms (TREE_VALUE (t
))
8405 || uses_template_parms (TREE_CHAIN (t
)));
8406 else if (TREE_CODE (t
) == TYPE_DECL
)
8407 dependent_p
= dependent_type_p (TREE_TYPE (t
));
8410 || TREE_CODE (t
) == TEMPLATE_PARM_INDEX
8411 || TREE_CODE (t
) == OVERLOAD
8414 || TREE_CODE (t
) == TRAIT_EXPR
8415 || TREE_CODE (t
) == CONSTRUCTOR
8416 || CONSTANT_CLASS_P (t
))
8417 dependent_p
= (type_dependent_expression_p (t
)
8418 || value_dependent_expression_p (t
));
8421 gcc_assert (t
== error_mark_node
);
8422 dependent_p
= false;
8425 processing_template_decl
= saved_processing_template_decl
;
8430 /* Returns true iff current_function_decl is an incompletely instantiated
8431 template. Useful instead of processing_template_decl because the latter
8432 is set to 0 during instantiate_non_dependent_expr. */
8435 in_template_function (void)
8437 tree fn
= current_function_decl
;
8439 ++processing_template_decl
;
8440 ret
= (fn
&& DECL_LANG_SPECIFIC (fn
)
8441 && DECL_TEMPLATE_INFO (fn
)
8442 && any_dependent_template_arguments_p (DECL_TI_ARGS (fn
)));
8443 --processing_template_decl
;
8447 /* Returns true if T depends on any template parameter with level LEVEL. */
8450 uses_template_parms_level (tree t
, int level
)
8452 return for_each_template_parm (t
, template_parm_this_level_p
, &level
, NULL
,
8453 /*include_nondeduced_p=*/true);
8456 /* Returns TRUE iff INST is an instantiation we don't need to do in an
8457 ill-formed translation unit, i.e. a variable or function that isn't
8458 usable in a constant expression. */
8461 neglectable_inst_p (tree d
)
8464 && !(TREE_CODE (d
) == FUNCTION_DECL
? DECL_DECLARED_CONSTEXPR_P (d
)
8465 : decl_maybe_constant_var_p (d
)));
8468 /* Returns TRUE iff we should refuse to instantiate DECL because it's
8469 neglectable and instantiated from within an erroneous instantiation. */
8472 limit_bad_template_recursion (tree decl
)
8474 struct tinst_level
*lev
= current_tinst_level
;
8475 int errs
= errorcount
+ sorrycount
;
8476 if (lev
== NULL
|| errs
== 0 || !neglectable_inst_p (decl
))
8479 for (; lev
; lev
= lev
->next
)
8480 if (neglectable_inst_p (lev
->decl
))
8483 return (lev
&& errs
> lev
->errors
);
8486 static int tinst_depth
;
8487 extern int max_tinst_depth
;
8490 static GTY(()) struct tinst_level
*last_error_tinst_level
;
8492 /* We're starting to instantiate D; record the template instantiation context
8493 for diagnostics and to restore it later. */
8496 push_tinst_level (tree d
)
8498 return push_tinst_level_loc (d
, input_location
);
8501 /* We're starting to instantiate D; record the template instantiation context
8502 at LOC for diagnostics and to restore it later. */
8505 push_tinst_level_loc (tree d
, location_t loc
)
8507 struct tinst_level
*new_level
;
8509 if (tinst_depth
>= max_tinst_depth
)
8511 fatal_error (input_location
,
8512 "template instantiation depth exceeds maximum of %d"
8513 " (use -ftemplate-depth= to increase the maximum)",
8518 /* If the current instantiation caused problems, don't let it instantiate
8519 anything else. Do allow deduction substitution and decls usable in
8520 constant expressions. */
8521 if (limit_bad_template_recursion (d
))
8524 new_level
= ggc_alloc
<tinst_level
> ();
8525 new_level
->decl
= d
;
8526 new_level
->locus
= loc
;
8527 new_level
->errors
= errorcount
+sorrycount
;
8528 new_level
->in_system_header_p
= in_system_header_at (input_location
);
8529 new_level
->next
= current_tinst_level
;
8530 current_tinst_level
= new_level
;
8533 if (GATHER_STATISTICS
&& (tinst_depth
> depth_reached
))
8534 depth_reached
= tinst_depth
;
8539 /* We're done instantiating this template; return to the instantiation
8543 pop_tinst_level (void)
8545 /* Restore the filename and line number stashed away when we started
8546 this instantiation. */
8547 input_location
= current_tinst_level
->locus
;
8548 current_tinst_level
= current_tinst_level
->next
;
8552 /* We're instantiating a deferred template; restore the template
8553 instantiation context in which the instantiation was requested, which
8554 is one step out from LEVEL. Return the corresponding DECL or TYPE. */
8557 reopen_tinst_level (struct tinst_level
*level
)
8559 struct tinst_level
*t
;
8562 for (t
= level
; t
; t
= t
->next
)
8565 current_tinst_level
= level
;
8567 if (current_tinst_level
)
8568 current_tinst_level
->errors
= errorcount
+sorrycount
;
8572 /* Returns the TINST_LEVEL which gives the original instantiation
8575 struct tinst_level
*
8576 outermost_tinst_level (void)
8578 struct tinst_level
*level
= current_tinst_level
;
8581 level
= level
->next
;
8585 /* DECL is a friend FUNCTION_DECL or TEMPLATE_DECL. ARGS is the
8586 vector of template arguments, as for tsubst.
8588 Returns an appropriate tsubst'd friend declaration. */
8591 tsubst_friend_function (tree decl
, tree args
)
8595 if (TREE_CODE (decl
) == FUNCTION_DECL
8596 && DECL_TEMPLATE_INSTANTIATION (decl
)
8597 && TREE_CODE (DECL_TI_TEMPLATE (decl
)) != TEMPLATE_DECL
)
8598 /* This was a friend declared with an explicit template
8599 argument list, e.g.:
8603 to indicate that f was a template instantiation, not a new
8604 function declaration. Now, we have to figure out what
8605 instantiation of what template. */
8607 tree template_id
, arglist
, fns
;
8610 tree ns
= decl_namespace_context (TYPE_MAIN_DECL (current_class_type
));
8612 /* Friend functions are looked up in the containing namespace scope.
8613 We must enter that scope, to avoid finding member functions of the
8614 current class with same name. */
8615 push_nested_namespace (ns
);
8616 fns
= tsubst_expr (DECL_TI_TEMPLATE (decl
), args
,
8617 tf_warning_or_error
, NULL_TREE
,
8618 /*integral_constant_expression_p=*/false);
8619 pop_nested_namespace (ns
);
8620 arglist
= tsubst (DECL_TI_ARGS (decl
), args
,
8621 tf_warning_or_error
, NULL_TREE
);
8622 template_id
= lookup_template_function (fns
, arglist
);
8624 new_friend
= tsubst (decl
, args
, tf_warning_or_error
, NULL_TREE
);
8625 tmpl
= determine_specialization (template_id
, new_friend
,
8627 /*need_member_template=*/0,
8628 TREE_VEC_LENGTH (args
),
8630 return instantiate_template (tmpl
, new_args
, tf_error
);
8633 new_friend
= tsubst (decl
, args
, tf_warning_or_error
, NULL_TREE
);
8635 /* The NEW_FRIEND will look like an instantiation, to the
8636 compiler, but is not an instantiation from the point of view of
8637 the language. For example, we might have had:
8639 template <class T> struct S {
8640 template <class U> friend void f(T, U);
8643 Then, in S<int>, template <class U> void f(int, U) is not an
8644 instantiation of anything. */
8645 if (new_friend
== error_mark_node
)
8646 return error_mark_node
;
8648 DECL_USE_TEMPLATE (new_friend
) = 0;
8649 if (TREE_CODE (decl
) == TEMPLATE_DECL
)
8651 DECL_USE_TEMPLATE (DECL_TEMPLATE_RESULT (new_friend
)) = 0;
8652 DECL_SAVED_TREE (DECL_TEMPLATE_RESULT (new_friend
))
8653 = DECL_SAVED_TREE (DECL_TEMPLATE_RESULT (decl
));
8656 /* The mangled name for the NEW_FRIEND is incorrect. The function
8657 is not a template instantiation and should not be mangled like
8658 one. Therefore, we forget the mangling here; we'll recompute it
8659 later if we need it. */
8660 if (TREE_CODE (new_friend
) != TEMPLATE_DECL
)
8662 SET_DECL_RTL (new_friend
, NULL
);
8663 SET_DECL_ASSEMBLER_NAME (new_friend
, NULL_TREE
);
8666 if (DECL_NAMESPACE_SCOPE_P (new_friend
))
8669 tree new_friend_template_info
;
8670 tree new_friend_result_template_info
;
8672 int new_friend_is_defn
;
8674 /* We must save some information from NEW_FRIEND before calling
8675 duplicate decls since that function will free NEW_FRIEND if
8677 new_friend_template_info
= DECL_TEMPLATE_INFO (new_friend
);
8678 new_friend_is_defn
=
8679 (DECL_INITIAL (DECL_TEMPLATE_RESULT
8680 (template_for_substitution (new_friend
)))
8682 if (TREE_CODE (new_friend
) == TEMPLATE_DECL
)
8684 /* This declaration is a `primary' template. */
8685 DECL_PRIMARY_TEMPLATE (new_friend
) = new_friend
;
8687 new_friend_result_template_info
8688 = DECL_TEMPLATE_INFO (DECL_TEMPLATE_RESULT (new_friend
));
8691 new_friend_result_template_info
= NULL_TREE
;
8693 /* Make the init_value nonzero so pushdecl knows this is a defn. */
8694 if (new_friend_is_defn
)
8695 DECL_INITIAL (new_friend
) = error_mark_node
;
8697 /* Inside pushdecl_namespace_level, we will push into the
8698 current namespace. However, the friend function should go
8699 into the namespace of the template. */
8700 ns
= decl_namespace_context (new_friend
);
8701 push_nested_namespace (ns
);
8702 old_decl
= pushdecl_namespace_level (new_friend
, /*is_friend=*/true);
8703 pop_nested_namespace (ns
);
8705 if (old_decl
== error_mark_node
)
8706 return error_mark_node
;
8708 if (old_decl
!= new_friend
)
8710 /* This new friend declaration matched an existing
8711 declaration. For example, given:
8713 template <class T> void f(T);
8714 template <class U> class C {
8715 template <class T> friend void f(T) {}
8718 the friend declaration actually provides the definition
8719 of `f', once C has been instantiated for some type. So,
8720 old_decl will be the out-of-class template declaration,
8721 while new_friend is the in-class definition.
8723 But, if `f' was called before this point, the
8724 instantiation of `f' will have DECL_TI_ARGS corresponding
8725 to `T' but not to `U', references to which might appear
8726 in the definition of `f'. Previously, the most general
8727 template for an instantiation of `f' was the out-of-class
8728 version; now it is the in-class version. Therefore, we
8729 run through all specialization of `f', adding to their
8730 DECL_TI_ARGS appropriately. In particular, they need a
8731 new set of outer arguments, corresponding to the
8732 arguments for this class instantiation.
8734 The same situation can arise with something like this:
8737 template <class T> class C {
8741 when `C<int>' is instantiated. Now, `f(int)' is defined
8744 if (!new_friend_is_defn
)
8745 /* On the other hand, if the in-class declaration does
8746 *not* provide a definition, then we don't want to alter
8747 existing definitions. We can just leave everything
8752 tree new_template
= TI_TEMPLATE (new_friend_template_info
);
8753 tree new_args
= TI_ARGS (new_friend_template_info
);
8755 /* Overwrite whatever template info was there before, if
8756 any, with the new template information pertaining to
8758 DECL_TEMPLATE_INFO (old_decl
) = new_friend_template_info
;
8760 if (TREE_CODE (old_decl
) != TEMPLATE_DECL
)
8762 /* We should have called reregister_specialization in
8764 gcc_assert (retrieve_specialization (new_template
,
8768 /* Instantiate it if the global has already been used. */
8769 if (DECL_ODR_USED (old_decl
))
8770 instantiate_decl (old_decl
, /*defer_ok=*/true,
8771 /*expl_inst_class_mem_p=*/false);
8777 /* Indicate that the old function template is a partial
8779 DECL_TEMPLATE_INFO (DECL_TEMPLATE_RESULT (old_decl
))
8780 = new_friend_result_template_info
;
8782 gcc_assert (new_template
8783 == most_general_template (new_template
));
8784 gcc_assert (new_template
!= old_decl
);
8786 /* Reassign any specializations already in the hash table
8787 to the new more general template, and add the
8788 additional template args. */
8789 for (t
= DECL_TEMPLATE_INSTANTIATIONS (old_decl
);
8793 tree spec
= TREE_VALUE (t
);
8796 elt
.tmpl
= old_decl
;
8797 elt
.args
= DECL_TI_ARGS (spec
);
8798 elt
.spec
= NULL_TREE
;
8800 decl_specializations
->remove_elt (&elt
);
8803 = add_outermost_template_args (new_args
,
8804 DECL_TI_ARGS (spec
));
8806 register_specialization
8807 (spec
, new_template
, DECL_TI_ARGS (spec
), true, 0);
8810 DECL_TEMPLATE_INSTANTIATIONS (old_decl
) = NULL_TREE
;
8814 /* The information from NEW_FRIEND has been merged into OLD_DECL
8815 by duplicate_decls. */
8816 new_friend
= old_decl
;
8821 tree context
= DECL_CONTEXT (new_friend
);
8825 template <class T> class C {
8826 template <class U> friend void C1<U>::f (); // case 1
8827 friend void C2<T>::f (); // case 2
8829 we only need to make sure CONTEXT is a complete type for
8830 case 2. To distinguish between the two cases, we note that
8831 CONTEXT of case 1 remains dependent type after tsubst while
8832 this isn't true for case 2. */
8833 ++processing_template_decl
;
8834 dependent_p
= dependent_type_p (context
);
8835 --processing_template_decl
;
8838 && !complete_type_or_else (context
, NULL_TREE
))
8839 return error_mark_node
;
8841 if (COMPLETE_TYPE_P (context
))
8843 tree fn
= new_friend
;
8844 /* do_friend adds the TEMPLATE_DECL for any member friend
8845 template even if it isn't a member template, i.e.
8846 template <class T> friend A<T>::f();
8847 Look through it in that case. */
8848 if (TREE_CODE (fn
) == TEMPLATE_DECL
8849 && !PRIMARY_TEMPLATE_P (fn
))
8850 fn
= DECL_TEMPLATE_RESULT (fn
);
8851 /* Check to see that the declaration is really present, and,
8852 possibly obtain an improved declaration. */
8853 fn
= check_classfn (context
, fn
, NULL_TREE
);
8863 /* FRIEND_TMPL is a friend TEMPLATE_DECL. ARGS is the vector of
8864 template arguments, as for tsubst.
8866 Returns an appropriate tsubst'd friend type or error_mark_node on
8870 tsubst_friend_class (tree friend_tmpl
, tree args
)
8876 if (DECL_TEMPLATE_TEMPLATE_PARM_P (friend_tmpl
))
8878 tree t
= tsubst (TREE_TYPE (friend_tmpl
), args
, tf_none
, NULL_TREE
);
8879 return TREE_TYPE (t
);
8882 context
= CP_DECL_CONTEXT (friend_tmpl
);
8884 if (context
!= global_namespace
)
8886 if (TREE_CODE (context
) == NAMESPACE_DECL
)
8887 push_nested_namespace (context
);
8889 push_nested_class (tsubst (context
, args
, tf_none
, NULL_TREE
));
8892 /* Look for a class template declaration. We look for hidden names
8893 because two friend declarations of the same template are the
8894 same. For example, in:
8897 template <typename> friend class F;
8899 template <typename> struct B {
8900 template <typename> friend class F;
8903 both F templates are the same. */
8904 tmpl
= lookup_name_real (DECL_NAME (friend_tmpl
), 0, 0,
8905 /*block_p=*/true, 0, LOOKUP_HIDDEN
);
8907 /* But, if we don't find one, it might be because we're in a
8908 situation like this:
8916 Here, in the scope of (say) S<int>, `S' is bound to a TYPE_DECL
8917 for `S<int>', not the TEMPLATE_DECL. */
8918 if (!tmpl
|| !DECL_CLASS_TEMPLATE_P (tmpl
))
8920 tmpl
= lookup_name_prefer_type (DECL_NAME (friend_tmpl
), 1);
8921 tmpl
= maybe_get_template_decl_from_type_decl (tmpl
);
8924 if (tmpl
&& DECL_CLASS_TEMPLATE_P (tmpl
))
8926 /* The friend template has already been declared. Just
8927 check to see that the declarations match, and install any new
8928 default parameters. We must tsubst the default parameters,
8929 of course. We only need the innermost template parameters
8930 because that is all that redeclare_class_template will look
8932 if (TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (friend_tmpl
))
8933 > TMPL_ARGS_DEPTH (args
))
8936 location_t saved_input_location
;
8937 parms
= tsubst_template_parms (DECL_TEMPLATE_PARMS (friend_tmpl
),
8938 args
, tf_warning_or_error
);
8940 saved_input_location
= input_location
;
8941 input_location
= DECL_SOURCE_LOCATION (friend_tmpl
);
8942 redeclare_class_template (TREE_TYPE (tmpl
), parms
);
8943 input_location
= saved_input_location
;
8947 friend_type
= TREE_TYPE (tmpl
);
8951 /* The friend template has not already been declared. In this
8952 case, the instantiation of the template class will cause the
8953 injection of this template into the global scope. */
8954 tmpl
= tsubst (friend_tmpl
, args
, tf_warning_or_error
, NULL_TREE
);
8955 if (tmpl
== error_mark_node
)
8956 return error_mark_node
;
8958 /* The new TMPL is not an instantiation of anything, so we
8959 forget its origins. We don't reset CLASSTYPE_TI_TEMPLATE for
8960 the new type because that is supposed to be the corresponding
8961 template decl, i.e., TMPL. */
8962 DECL_USE_TEMPLATE (tmpl
) = 0;
8963 DECL_TEMPLATE_INFO (tmpl
) = NULL_TREE
;
8964 CLASSTYPE_USE_TEMPLATE (TREE_TYPE (tmpl
)) = 0;
8965 CLASSTYPE_TI_ARGS (TREE_TYPE (tmpl
))
8966 = INNERMOST_TEMPLATE_ARGS (CLASSTYPE_TI_ARGS (TREE_TYPE (tmpl
)));
8968 /* Inject this template into the global scope. */
8969 friend_type
= TREE_TYPE (pushdecl_top_level_maybe_friend (tmpl
, true));
8972 if (context
!= global_namespace
)
8974 if (TREE_CODE (context
) == NAMESPACE_DECL
)
8975 pop_nested_namespace (context
);
8977 pop_nested_class ();
8983 /* Returns zero if TYPE cannot be completed later due to circularity.
8984 Otherwise returns one. */
8987 can_complete_type_without_circularity (tree type
)
8989 if (type
== NULL_TREE
|| type
== error_mark_node
)
8991 else if (COMPLETE_TYPE_P (type
))
8993 else if (TREE_CODE (type
) == ARRAY_TYPE
&& TYPE_DOMAIN (type
))
8994 return can_complete_type_without_circularity (TREE_TYPE (type
));
8995 else if (CLASS_TYPE_P (type
)
8996 && TYPE_BEING_DEFINED (TYPE_MAIN_VARIANT (type
)))
9002 static tree
tsubst_omp_clauses (tree
, bool, tree
, tsubst_flags_t
, tree
);
9004 /* Apply any attributes which had to be deferred until instantiation
9005 time. DECL_P, ATTRIBUTES and ATTR_FLAGS are as cplus_decl_attributes;
9006 ARGS, COMPLAIN, IN_DECL are as tsubst. */
9009 apply_late_template_attributes (tree
*decl_p
, tree attributes
, int attr_flags
,
9010 tree args
, tsubst_flags_t complain
, tree in_decl
)
9012 tree last_dep
= NULL_TREE
;
9016 for (t
= attributes
; t
; t
= TREE_CHAIN (t
))
9017 if (ATTR_IS_DEPENDENT (t
))
9020 attributes
= copy_list (attributes
);
9024 if (DECL_P (*decl_p
))
9026 if (TREE_TYPE (*decl_p
) == error_mark_node
)
9028 p
= &DECL_ATTRIBUTES (*decl_p
);
9031 p
= &TYPE_ATTRIBUTES (*decl_p
);
9035 tree late_attrs
= NULL_TREE
;
9036 tree
*q
= &late_attrs
;
9038 for (*p
= attributes
; *p
; )
9041 if (ATTR_IS_DEPENDENT (t
))
9043 *p
= TREE_CHAIN (t
);
9044 TREE_CHAIN (t
) = NULL_TREE
;
9045 if ((flag_openmp
|| flag_cilkplus
)
9046 && is_attribute_p ("omp declare simd",
9047 get_attribute_name (t
))
9050 tree clauses
= TREE_VALUE (TREE_VALUE (t
));
9051 clauses
= tsubst_omp_clauses (clauses
, true, args
,
9053 c_omp_declare_simd_clauses_to_decls (*decl_p
, clauses
);
9054 clauses
= finish_omp_clauses (clauses
);
9055 tree parms
= DECL_ARGUMENTS (*decl_p
);
9057 = c_omp_declare_simd_clauses_to_numbers (parms
, clauses
);
9059 TREE_VALUE (TREE_VALUE (t
)) = clauses
;
9061 TREE_VALUE (t
) = NULL_TREE
;
9063 /* If the first attribute argument is an identifier, don't
9064 pass it through tsubst. Attributes like mode, format,
9065 cleanup and several target specific attributes expect it
9067 else if (attribute_takes_identifier_p (get_attribute_name (t
))
9071 = tsubst_expr (TREE_CHAIN (TREE_VALUE (t
)), args
, complain
,
9073 /*integral_constant_expression_p=*/false);
9074 if (chain
!= TREE_CHAIN (TREE_VALUE (t
)))
9076 = tree_cons (NULL_TREE
, TREE_VALUE (TREE_VALUE (t
)),
9079 else if (TREE_VALUE (t
) && PACK_EXPANSION_P (TREE_VALUE (t
)))
9081 /* An attribute pack expansion. */
9082 tree purp
= TREE_PURPOSE (t
);
9083 tree pack
= (tsubst_pack_expansion
9084 (TREE_VALUE (t
), args
, complain
, in_decl
));
9085 int len
= TREE_VEC_LENGTH (pack
);
9086 for (int i
= 0; i
< len
; ++i
)
9088 tree elt
= TREE_VEC_ELT (pack
, i
);
9089 *q
= build_tree_list (purp
, elt
);
9090 q
= &TREE_CHAIN (*q
);
9096 = tsubst_expr (TREE_VALUE (t
), args
, complain
, in_decl
,
9097 /*integral_constant_expression_p=*/false);
9099 q
= &TREE_CHAIN (t
);
9102 p
= &TREE_CHAIN (t
);
9105 cplus_decl_attributes (decl_p
, late_attrs
, attr_flags
);
9109 /* Perform (or defer) access check for typedefs that were referenced
9110 from within the template TMPL code.
9111 This is a subroutine of instantiate_decl and instantiate_class_template.
9112 TMPL is the template to consider and TARGS is the list of arguments of
9116 perform_typedefs_access_check (tree tmpl
, tree targs
)
9118 location_t saved_location
;
9120 qualified_typedef_usage_t
*iter
;
9123 || (!CLASS_TYPE_P (tmpl
)
9124 && TREE_CODE (tmpl
) != FUNCTION_DECL
))
9127 saved_location
= input_location
;
9128 FOR_EACH_VEC_SAFE_ELT (get_types_needing_access_check (tmpl
), i
, iter
)
9130 tree type_decl
= iter
->typedef_decl
;
9131 tree type_scope
= iter
->context
;
9133 if (!type_decl
|| !type_scope
|| !CLASS_TYPE_P (type_scope
))
9136 if (uses_template_parms (type_decl
))
9137 type_decl
= tsubst (type_decl
, targs
, tf_error
, NULL_TREE
);
9138 if (uses_template_parms (type_scope
))
9139 type_scope
= tsubst (type_scope
, targs
, tf_error
, NULL_TREE
);
9141 /* Make access check error messages point to the location
9142 of the use of the typedef. */
9143 input_location
= iter
->locus
;
9144 perform_or_defer_access_check (TYPE_BINFO (type_scope
),
9145 type_decl
, type_decl
,
9146 tf_warning_or_error
);
9148 input_location
= saved_location
;
9152 instantiate_class_template_1 (tree type
)
9154 tree templ
, args
, pattern
, t
, member
;
9158 unsigned int saved_maximum_field_alignment
;
9161 if (type
== error_mark_node
)
9162 return error_mark_node
;
9164 if (COMPLETE_OR_OPEN_TYPE_P (type
)
9165 || uses_template_parms (type
))
9168 /* Figure out which template is being instantiated. */
9169 templ
= most_general_template (CLASSTYPE_TI_TEMPLATE (type
));
9170 gcc_assert (TREE_CODE (templ
) == TEMPLATE_DECL
);
9172 /* Determine what specialization of the original template to
9174 t
= most_specialized_partial_spec (type
, tf_warning_or_error
);
9175 if (t
== error_mark_node
)
9177 TYPE_BEING_DEFINED (type
) = 1;
9178 return error_mark_node
;
9182 /* This TYPE is actually an instantiation of a partial
9183 specialization. We replace the innermost set of ARGS with
9184 the arguments appropriate for substitution. For example,
9187 template <class T> struct S {};
9188 template <class T> struct S<T*> {};
9190 and supposing that we are instantiating S<int*>, ARGS will
9191 presently be {int*} -- but we need {int}. */
9192 pattern
= TREE_TYPE (t
);
9193 args
= TREE_PURPOSE (t
);
9197 pattern
= TREE_TYPE (templ
);
9198 args
= CLASSTYPE_TI_ARGS (type
);
9201 /* If the template we're instantiating is incomplete, then clearly
9202 there's nothing we can do. */
9203 if (!COMPLETE_TYPE_P (pattern
))
9206 /* If we've recursively instantiated too many templates, stop. */
9207 if (! push_tinst_level (type
))
9210 /* Now we're really doing the instantiation. Mark the type as in
9211 the process of being defined. */
9212 TYPE_BEING_DEFINED (type
) = 1;
9214 /* We may be in the middle of deferred access check. Disable
9216 push_deferring_access_checks (dk_no_deferred
);
9218 int saved_unevaluated_operand
= cp_unevaluated_operand
;
9219 int saved_inhibit_evaluation_warnings
= c_inhibit_evaluation_warnings
;
9221 fn_context
= decl_function_context (TYPE_MAIN_DECL (type
));
9222 /* Also avoid push_to_top_level for a lambda in an NSDMI. */
9223 if (!fn_context
&& LAMBDA_TYPE_P (type
) && TYPE_CLASS_SCOPE_P (type
))
9224 fn_context
= error_mark_node
;
9226 push_to_top_level ();
9229 cp_unevaluated_operand
= 0;
9230 c_inhibit_evaluation_warnings
= 0;
9232 /* Use #pragma pack from the template context. */
9233 saved_maximum_field_alignment
= maximum_field_alignment
;
9234 maximum_field_alignment
= TYPE_PRECISION (pattern
);
9236 SET_CLASSTYPE_INTERFACE_UNKNOWN (type
);
9238 /* Set the input location to the most specialized template definition.
9239 This is needed if tsubsting causes an error. */
9240 typedecl
= TYPE_MAIN_DECL (pattern
);
9241 input_location
= DECL_SOURCE_LOCATION (TYPE_NAME (type
)) =
9242 DECL_SOURCE_LOCATION (typedecl
);
9244 TYPE_PACKED (type
) = TYPE_PACKED (pattern
);
9245 TYPE_ALIGN (type
) = TYPE_ALIGN (pattern
);
9246 TYPE_USER_ALIGN (type
) = TYPE_USER_ALIGN (pattern
);
9247 TYPE_FOR_JAVA (type
) = TYPE_FOR_JAVA (pattern
); /* For libjava's JArray<T> */
9248 if (ANON_AGGR_TYPE_P (pattern
))
9249 SET_ANON_AGGR_TYPE_P (type
);
9250 if (CLASSTYPE_VISIBILITY_SPECIFIED (pattern
))
9252 CLASSTYPE_VISIBILITY_SPECIFIED (type
) = 1;
9253 CLASSTYPE_VISIBILITY (type
) = CLASSTYPE_VISIBILITY (pattern
);
9254 /* Adjust visibility for template arguments. */
9255 determine_visibility (TYPE_MAIN_DECL (type
));
9257 if (CLASS_TYPE_P (type
))
9258 CLASSTYPE_FINAL (type
) = CLASSTYPE_FINAL (pattern
);
9260 pbinfo
= TYPE_BINFO (pattern
);
9262 /* We should never instantiate a nested class before its enclosing
9263 class; we need to look up the nested class by name before we can
9264 instantiate it, and that lookup should instantiate the enclosing
9266 gcc_assert (!DECL_CLASS_SCOPE_P (TYPE_MAIN_DECL (pattern
))
9267 || COMPLETE_OR_OPEN_TYPE_P (TYPE_CONTEXT (type
)));
9269 base_list
= NULL_TREE
;
9270 if (BINFO_N_BASE_BINFOS (pbinfo
))
9276 /* We must enter the scope containing the type, as that is where
9277 the accessibility of types named in dependent bases are
9279 pushed_scope
= push_scope (CP_TYPE_CONTEXT (type
));
9281 /* Substitute into each of the bases to determine the actual
9283 for (i
= 0; BINFO_BASE_ITERATE (pbinfo
, i
, pbase_binfo
); i
++)
9286 tree access
= BINFO_BASE_ACCESS (pbinfo
, i
);
9287 tree expanded_bases
= NULL_TREE
;
9290 if (PACK_EXPANSION_P (BINFO_TYPE (pbase_binfo
)))
9293 tsubst_pack_expansion (BINFO_TYPE (pbase_binfo
),
9294 args
, tf_error
, NULL_TREE
);
9295 if (expanded_bases
== error_mark_node
)
9298 len
= TREE_VEC_LENGTH (expanded_bases
);
9301 for (idx
= 0; idx
< len
; idx
++)
9304 /* Extract the already-expanded base class. */
9305 base
= TREE_VEC_ELT (expanded_bases
, idx
);
9307 /* Substitute to figure out the base class. */
9308 base
= tsubst (BINFO_TYPE (pbase_binfo
), args
, tf_error
,
9311 if (base
== error_mark_node
)
9314 base_list
= tree_cons (access
, base
, base_list
);
9315 if (BINFO_VIRTUAL_P (pbase_binfo
))
9316 TREE_TYPE (base_list
) = integer_type_node
;
9320 /* The list is now in reverse order; correct that. */
9321 base_list
= nreverse (base_list
);
9324 pop_scope (pushed_scope
);
9326 /* Now call xref_basetypes to set up all the base-class
9328 xref_basetypes (type
, base_list
);
9330 apply_late_template_attributes (&type
, TYPE_ATTRIBUTES (pattern
),
9331 (int) ATTR_FLAG_TYPE_IN_PLACE
,
9332 args
, tf_error
, NULL_TREE
);
9333 fixup_attribute_variants (type
);
9335 /* Now that our base classes are set up, enter the scope of the
9336 class, so that name lookups into base classes, etc. will work
9337 correctly. This is precisely analogous to what we do in
9338 begin_class_definition when defining an ordinary non-template
9339 class, except we also need to push the enclosing classes. */
9340 push_nested_class (type
);
9342 /* Now members are processed in the order of declaration. */
9343 for (member
= CLASSTYPE_DECL_LIST (pattern
);
9344 member
; member
= TREE_CHAIN (member
))
9346 tree t
= TREE_VALUE (member
);
9348 if (TREE_PURPOSE (member
))
9352 /* Build new CLASSTYPE_NESTED_UTDS. */
9355 bool class_template_p
;
9357 class_template_p
= (TREE_CODE (t
) != ENUMERAL_TYPE
9358 && TYPE_LANG_SPECIFIC (t
)
9359 && CLASSTYPE_IS_TEMPLATE (t
));
9360 /* If the member is a class template, then -- even after
9361 substitution -- there may be dependent types in the
9362 template argument list for the class. We increment
9363 PROCESSING_TEMPLATE_DECL so that dependent_type_p, as
9364 that function will assume that no types are dependent
9365 when outside of a template. */
9366 if (class_template_p
)
9367 ++processing_template_decl
;
9368 newtag
= tsubst (t
, args
, tf_error
, NULL_TREE
);
9369 if (class_template_p
)
9370 --processing_template_decl
;
9371 if (newtag
== error_mark_node
)
9374 if (TREE_CODE (newtag
) != ENUMERAL_TYPE
)
9376 tree name
= TYPE_IDENTIFIER (t
);
9378 if (class_template_p
)
9379 /* Unfortunately, lookup_template_class sets
9380 CLASSTYPE_IMPLICIT_INSTANTIATION for a partial
9381 instantiation (i.e., for the type of a member
9382 template class nested within a template class.)
9383 This behavior is required for
9384 maybe_process_partial_specialization to work
9385 correctly, but is not accurate in this case;
9386 the TAG is not an instantiation of anything.
9387 (The corresponding TEMPLATE_DECL is an
9388 instantiation, but the TYPE is not.) */
9389 CLASSTYPE_USE_TEMPLATE (newtag
) = 0;
9391 /* Now, we call pushtag to put this NEWTAG into the scope of
9392 TYPE. We first set up the IDENTIFIER_TYPE_VALUE to avoid
9393 pushtag calling push_template_decl. We don't have to do
9394 this for enums because it will already have been done in
9397 SET_IDENTIFIER_TYPE_VALUE (name
, newtag
);
9398 pushtag (name
, newtag
, /*tag_scope=*/ts_current
);
9401 else if (DECL_DECLARES_FUNCTION_P (t
))
9403 /* Build new TYPE_METHODS. */
9406 if (TREE_CODE (t
) == TEMPLATE_DECL
)
9407 ++processing_template_decl
;
9408 r
= tsubst (t
, args
, tf_error
, NULL_TREE
);
9409 if (TREE_CODE (t
) == TEMPLATE_DECL
)
9410 --processing_template_decl
;
9411 set_current_access_from_decl (r
);
9412 finish_member_declaration (r
);
9413 /* Instantiate members marked with attribute used. */
9414 if (r
!= error_mark_node
&& DECL_PRESERVE_P (r
))
9416 if (TREE_CODE (r
) == FUNCTION_DECL
9417 && DECL_OMP_DECLARE_REDUCTION_P (r
))
9418 cp_check_omp_declare_reduction (r
);
9420 else if (DECL_CLASS_TEMPLATE_P (t
)
9421 && LAMBDA_TYPE_P (TREE_TYPE (t
)))
9422 /* A closure type for a lambda in a default argument for a
9423 member template. Ignore it; it will be instantiated with
9424 the default argument. */;
9427 /* Build new TYPE_FIELDS. */
9428 if (TREE_CODE (t
) == STATIC_ASSERT
)
9432 ++c_inhibit_evaluation_warnings
;
9434 tsubst_expr (STATIC_ASSERT_CONDITION (t
), args
,
9435 tf_warning_or_error
, NULL_TREE
,
9436 /*integral_constant_expression_p=*/true);
9437 --c_inhibit_evaluation_warnings
;
9439 finish_static_assert (condition
,
9440 STATIC_ASSERT_MESSAGE (t
),
9441 STATIC_ASSERT_SOURCE_LOCATION (t
),
9444 else if (TREE_CODE (t
) != CONST_DECL
)
9447 tree vec
= NULL_TREE
;
9450 /* The file and line for this declaration, to
9451 assist in error message reporting. Since we
9452 called push_tinst_level above, we don't need to
9454 input_location
= DECL_SOURCE_LOCATION (t
);
9456 if (TREE_CODE (t
) == TEMPLATE_DECL
)
9457 ++processing_template_decl
;
9458 r
= tsubst (t
, args
, tf_warning_or_error
, NULL_TREE
);
9459 if (TREE_CODE (t
) == TEMPLATE_DECL
)
9460 --processing_template_decl
;
9462 if (TREE_CODE (r
) == TREE_VEC
)
9464 /* A capture pack became multiple fields. */
9466 len
= TREE_VEC_LENGTH (vec
);
9469 for (int i
= 0; i
< len
; ++i
)
9472 r
= TREE_VEC_ELT (vec
, i
);
9477 [t]he initialization (and any associated
9478 side-effects) of a static data member does
9479 not occur unless the static data member is
9480 itself used in a way that requires the
9481 definition of the static data member to
9484 Therefore, we do not substitute into the
9485 initialized for the static data member here. */
9486 finish_static_data_member_decl
9489 /*init_const_expr_p=*/false,
9490 /*asmspec_tree=*/NULL_TREE
,
9492 /* Instantiate members marked with attribute used. */
9493 if (r
!= error_mark_node
&& DECL_PRESERVE_P (r
))
9496 else if (TREE_CODE (r
) == FIELD_DECL
)
9498 /* Determine whether R has a valid type and can be
9499 completed later. If R is invalid, then its type
9500 is replaced by error_mark_node. */
9501 tree rtype
= TREE_TYPE (r
);
9502 if (can_complete_type_without_circularity (rtype
))
9503 complete_type (rtype
);
9505 if (!COMPLETE_TYPE_P (rtype
))
9507 cxx_incomplete_type_error (r
, rtype
);
9508 TREE_TYPE (r
) = error_mark_node
;
9512 /* If it is a TYPE_DECL for a class-scoped ENUMERAL_TYPE,
9513 such a thing will already have been added to the field
9514 list by tsubst_enum in finish_member_declaration in the
9515 CLASSTYPE_NESTED_UTDS case above. */
9516 if (!(TREE_CODE (r
) == TYPE_DECL
9517 && TREE_CODE (TREE_TYPE (r
)) == ENUMERAL_TYPE
9518 && DECL_ARTIFICIAL (r
)))
9520 set_current_access_from_decl (r
);
9521 finish_member_declaration (r
);
9529 if (TYPE_P (t
) || DECL_CLASS_TEMPLATE_P (t
)
9530 || DECL_TEMPLATE_TEMPLATE_PARM_P (t
))
9532 /* Build new CLASSTYPE_FRIEND_CLASSES. */
9534 tree friend_type
= t
;
9535 bool adjust_processing_template_decl
= false;
9537 if (TREE_CODE (friend_type
) == TEMPLATE_DECL
)
9539 /* template <class T> friend class C; */
9540 friend_type
= tsubst_friend_class (friend_type
, args
);
9541 adjust_processing_template_decl
= true;
9543 else if (TREE_CODE (friend_type
) == UNBOUND_CLASS_TEMPLATE
)
9545 /* template <class T> friend class C::D; */
9546 friend_type
= tsubst (friend_type
, args
,
9547 tf_warning_or_error
, NULL_TREE
);
9548 if (TREE_CODE (friend_type
) == TEMPLATE_DECL
)
9549 friend_type
= TREE_TYPE (friend_type
);
9550 adjust_processing_template_decl
= true;
9552 else if (TREE_CODE (friend_type
) == TYPENAME_TYPE
9553 || TREE_CODE (friend_type
) == TEMPLATE_TYPE_PARM
)
9555 /* This could be either
9559 when dependent_type_p is false or
9561 template <class U> friend class T::C;
9564 friend_type
= tsubst (friend_type
, args
,
9565 tf_warning_or_error
, NULL_TREE
);
9566 /* Bump processing_template_decl for correct
9567 dependent_type_p calculation. */
9568 ++processing_template_decl
;
9569 if (dependent_type_p (friend_type
))
9570 adjust_processing_template_decl
= true;
9571 --processing_template_decl
;
9573 else if (!CLASSTYPE_USE_TEMPLATE (friend_type
)
9574 && hidden_name_p (TYPE_NAME (friend_type
)))
9578 where C hasn't been declared yet. Let's lookup name
9579 from namespace scope directly, bypassing any name that
9580 come from dependent base class. */
9581 tree ns
= decl_namespace_context (TYPE_MAIN_DECL (friend_type
));
9583 /* The call to xref_tag_from_type does injection for friend
9585 push_nested_namespace (ns
);
9587 xref_tag_from_type (friend_type
, NULL_TREE
,
9588 /*tag_scope=*/ts_current
);
9589 pop_nested_namespace (ns
);
9591 else if (uses_template_parms (friend_type
))
9592 /* friend class C<T>; */
9593 friend_type
= tsubst (friend_type
, args
,
9594 tf_warning_or_error
, NULL_TREE
);
9599 where C is already declared or
9601 friend class C<int>;
9603 We don't have to do anything in these cases. */
9605 if (adjust_processing_template_decl
)
9606 /* Trick make_friend_class into realizing that the friend
9607 we're adding is a template, not an ordinary class. It's
9608 important that we use make_friend_class since it will
9609 perform some error-checking and output cross-reference
9611 ++processing_template_decl
;
9613 if (friend_type
!= error_mark_node
)
9614 make_friend_class (type
, friend_type
, /*complain=*/false);
9616 if (adjust_processing_template_decl
)
9617 --processing_template_decl
;
9621 /* Build new DECL_FRIENDLIST. */
9624 /* The file and line for this declaration, to
9625 assist in error message reporting. Since we
9626 called push_tinst_level above, we don't need to
9628 input_location
= DECL_SOURCE_LOCATION (t
);
9630 if (TREE_CODE (t
) == TEMPLATE_DECL
)
9632 ++processing_template_decl
;
9633 push_deferring_access_checks (dk_no_check
);
9636 r
= tsubst_friend_function (t
, args
);
9637 add_friend (type
, r
, /*complain=*/false);
9638 if (TREE_CODE (t
) == TEMPLATE_DECL
)
9640 pop_deferring_access_checks ();
9641 --processing_template_decl
;
9649 /* Restore these before substituting into the lambda capture
9651 cp_unevaluated_operand
= saved_unevaluated_operand
;
9652 c_inhibit_evaluation_warnings
= saved_inhibit_evaluation_warnings
;
9655 if (tree expr
= CLASSTYPE_LAMBDA_EXPR (type
))
9657 tree decl
= lambda_function (type
);
9660 if (!DECL_TEMPLATE_INFO (decl
)
9661 || DECL_TEMPLATE_RESULT (DECL_TI_TEMPLATE (decl
)) != decl
)
9662 instantiate_decl (decl
, false, false);
9664 /* We need to instantiate the capture list from the template
9665 after we've instantiated the closure members, but before we
9666 consider adding the conversion op. Also keep any captures
9667 that may have been added during instantiation of the op(). */
9668 tree tmpl_expr
= CLASSTYPE_LAMBDA_EXPR (pattern
);
9670 = tsubst_copy_and_build (LAMBDA_EXPR_CAPTURE_LIST (tmpl_expr
),
9671 args
, tf_warning_or_error
, NULL_TREE
,
9674 LAMBDA_EXPR_CAPTURE_LIST (expr
)
9675 = chainon (tmpl_cap
, nreverse (LAMBDA_EXPR_CAPTURE_LIST (expr
)));
9677 maybe_add_lambda_conv_op (type
);
9680 gcc_assert (errorcount
);
9683 /* Set the file and line number information to whatever is given for
9684 the class itself. This puts error messages involving generated
9685 implicit functions at a predictable point, and the same point
9686 that would be used for non-template classes. */
9687 input_location
= DECL_SOURCE_LOCATION (typedecl
);
9689 unreverse_member_declarations (type
);
9690 finish_struct_1 (type
);
9691 TYPE_BEING_DEFINED (type
) = 0;
9693 /* We don't instantiate default arguments for member functions. 14.7.1:
9695 The implicit instantiation of a class template specialization causes
9696 the implicit instantiation of the declarations, but not of the
9697 definitions or default arguments, of the class member functions,
9698 member classes, static data members and member templates.... */
9700 /* Some typedefs referenced from within the template code need to be access
9701 checked at template instantiation time, i.e now. These types were
9702 added to the template at parsing time. Let's get those and perform
9703 the access checks then. */
9704 perform_typedefs_access_check (pattern
, args
);
9705 perform_deferred_access_checks (tf_warning_or_error
);
9706 pop_nested_class ();
9707 maximum_field_alignment
= saved_maximum_field_alignment
;
9709 pop_from_top_level ();
9710 pop_deferring_access_checks ();
9713 /* The vtable for a template class can be emitted in any translation
9714 unit in which the class is instantiated. When there is no key
9715 method, however, finish_struct_1 will already have added TYPE to
9716 the keyed_classes list. */
9717 if (TYPE_CONTAINS_VPTR_P (type
) && CLASSTYPE_KEY_METHOD (type
))
9718 keyed_classes
= tree_cons (NULL_TREE
, type
, keyed_classes
);
9723 /* Wrapper for instantiate_class_template_1. */
9726 instantiate_class_template (tree type
)
9729 timevar_push (TV_TEMPLATE_INST
);
9730 ret
= instantiate_class_template_1 (type
);
9731 timevar_pop (TV_TEMPLATE_INST
);
9736 tsubst_template_arg (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
9742 else if (TYPE_P (t
))
9743 r
= tsubst (t
, args
, complain
, in_decl
);
9746 if (!(complain
& tf_warning
))
9747 ++c_inhibit_evaluation_warnings
;
9748 r
= tsubst_expr (t
, args
, complain
, in_decl
,
9749 /*integral_constant_expression_p=*/true);
9750 if (!(complain
& tf_warning
))
9751 --c_inhibit_evaluation_warnings
;
9756 /* Given a function parameter pack TMPL_PARM and some function parameters
9757 instantiated from it at *SPEC_P, return a NONTYPE_ARGUMENT_PACK of them
9758 and set *SPEC_P to point at the next point in the list. */
9761 extract_fnparm_pack (tree tmpl_parm
, tree
*spec_p
)
9763 /* Collect all of the extra "packed" parameters into an
9767 tree argpack
= make_node (NONTYPE_ARGUMENT_PACK
);
9768 tree argtypepack
= cxx_make_type (TYPE_ARGUMENT_PACK
);
9769 tree spec_parm
= *spec_p
;
9772 for (len
= 0; spec_parm
; ++len
, spec_parm
= TREE_CHAIN (spec_parm
))
9774 && !function_parameter_expanded_from_pack_p (spec_parm
, tmpl_parm
))
9777 /* Fill in PARMVEC and PARMTYPEVEC with all of the parameters. */
9778 parmvec
= make_tree_vec (len
);
9779 parmtypevec
= make_tree_vec (len
);
9780 spec_parm
= *spec_p
;
9781 for (i
= 0; i
< len
; i
++, spec_parm
= DECL_CHAIN (spec_parm
))
9783 TREE_VEC_ELT (parmvec
, i
) = spec_parm
;
9784 TREE_VEC_ELT (parmtypevec
, i
) = TREE_TYPE (spec_parm
);
9787 /* Build the argument packs. */
9788 SET_ARGUMENT_PACK_ARGS (argpack
, parmvec
);
9789 SET_ARGUMENT_PACK_ARGS (argtypepack
, parmtypevec
);
9790 TREE_TYPE (argpack
) = argtypepack
;
9791 *spec_p
= spec_parm
;
9796 /* Give a chain SPEC_PARM of PARM_DECLs, pack them into a
9797 NONTYPE_ARGUMENT_PACK. */
9800 make_fnparm_pack (tree spec_parm
)
9802 return extract_fnparm_pack (NULL_TREE
, &spec_parm
);
9805 /* Return 1 if the Ith element of the argument pack ARG_PACK is a
9806 pack expansion with no extra args, 2 if it has extra args, or 0
9807 if it is not a pack expansion. */
9810 argument_pack_element_is_expansion_p (tree arg_pack
, int i
)
9812 tree vec
= ARGUMENT_PACK_ARGS (arg_pack
);
9813 if (i
>= TREE_VEC_LENGTH (vec
))
9815 tree elt
= TREE_VEC_ELT (vec
, i
);
9816 if (!PACK_EXPANSION_P (elt
))
9818 if (PACK_EXPANSION_EXTRA_ARGS (elt
))
9824 /* Creates and return an ARGUMENT_PACK_SELECT tree node. */
9827 make_argument_pack_select (tree arg_pack
, unsigned index
)
9829 tree aps
= make_node (ARGUMENT_PACK_SELECT
);
9831 ARGUMENT_PACK_SELECT_FROM_PACK (aps
) = arg_pack
;
9832 ARGUMENT_PACK_SELECT_INDEX (aps
) = index
;
9837 /* This is a subroutine of tsubst_pack_expansion.
9839 It returns TRUE if we need to use the PACK_EXPANSION_EXTRA_ARGS
9840 mechanism to store the (non complete list of) arguments of the
9841 substitution and return a non substituted pack expansion, in order
9842 to wait for when we have enough arguments to really perform the
9846 use_pack_expansion_extra_args_p (tree parm_packs
,
9850 /* If one pack has an expansion and another pack has a normal
9851 argument or if one pack has an empty argument and an another
9852 one hasn't then tsubst_pack_expansion cannot perform the
9853 substitution and need to fall back on the
9854 PACK_EXPANSION_EXTRA mechanism. */
9855 if (parm_packs
== NULL_TREE
)
9857 else if (has_empty_arg
)
9860 bool has_expansion_arg
= false;
9861 for (int i
= 0 ; i
< arg_pack_len
; ++i
)
9863 bool has_non_expansion_arg
= false;
9864 for (tree parm_pack
= parm_packs
;
9866 parm_pack
= TREE_CHAIN (parm_pack
))
9868 tree arg
= TREE_VALUE (parm_pack
);
9870 int exp
= argument_pack_element_is_expansion_p (arg
, i
);
9872 /* We can't substitute a pack expansion with extra args into
9876 has_expansion_arg
= true;
9878 has_non_expansion_arg
= true;
9881 if (has_expansion_arg
&& has_non_expansion_arg
)
9887 /* [temp.variadic]/6 says that:
9889 The instantiation of a pack expansion [...]
9890 produces a list E1,E2, ..., En, where N is the number of elements
9891 in the pack expansion parameters.
9893 This subroutine of tsubst_pack_expansion produces one of these Ei.
9895 PATTERN is the pattern of the pack expansion. PARM_PACKS is a
9896 TREE_LIST in which each TREE_PURPOSE is a parameter pack of
9897 PATTERN, and each TREE_VALUE is its corresponding argument pack.
9898 INDEX is the index 'i' of the element Ei to produce. ARGS,
9899 COMPLAIN, and IN_DECL are the same parameters as for the
9900 tsubst_pack_expansion function.
9902 The function returns the resulting Ei upon successful completion,
9905 Note that this function possibly modifies the ARGS parameter, so
9906 it's the responsibility of the caller to restore it. */
9909 gen_elem_of_pack_expansion_instantiation (tree pattern
,
9912 tree args
/* This parm gets
9914 tsubst_flags_t complain
,
9918 bool ith_elem_is_expansion
= false;
9920 /* For each parameter pack, change the substitution of the parameter
9921 pack to the ith argument in its argument pack, then expand the
9923 for (tree pack
= parm_packs
; pack
; pack
= TREE_CHAIN (pack
))
9925 tree parm
= TREE_PURPOSE (pack
);
9926 tree arg_pack
= TREE_VALUE (pack
);
9927 tree aps
; /* instance of ARGUMENT_PACK_SELECT. */
9929 ith_elem_is_expansion
|=
9930 argument_pack_element_is_expansion_p (arg_pack
, index
);
9932 /* Select the Ith argument from the pack. */
9933 if (TREE_CODE (parm
) == PARM_DECL
9934 || TREE_CODE (parm
) == FIELD_DECL
)
9938 aps
= make_argument_pack_select (arg_pack
, index
);
9939 if (!mark_used (parm
, complain
) && !(complain
& tf_error
))
9940 return error_mark_node
;
9941 register_local_specialization (aps
, parm
);
9944 aps
= retrieve_local_specialization (parm
);
9949 template_parm_level_and_index (parm
, &level
, &idx
);
9953 aps
= make_argument_pack_select (arg_pack
, index
);
9954 /* Update the corresponding argument. */
9955 TMPL_ARG (args
, level
, idx
) = aps
;
9958 /* Re-use the ARGUMENT_PACK_SELECT. */
9959 aps
= TMPL_ARG (args
, level
, idx
);
9961 ARGUMENT_PACK_SELECT_INDEX (aps
) = index
;
9964 /* Substitute into the PATTERN with the (possibly altered)
9966 if (pattern
== in_decl
)
9967 /* Expanding a fixed parameter pack from
9968 coerce_template_parameter_pack. */
9969 t
= tsubst_decl (pattern
, args
, complain
);
9970 else if (!TYPE_P (pattern
))
9971 t
= tsubst_expr (pattern
, args
, complain
, in_decl
,
9972 /*integral_constant_expression_p=*/false);
9974 t
= tsubst (pattern
, args
, complain
, in_decl
);
9976 /* If the Ith argument pack element is a pack expansion, then
9977 the Ith element resulting from the substituting is going to
9978 be a pack expansion as well. */
9979 if (ith_elem_is_expansion
)
9980 t
= make_pack_expansion (t
);
9985 /* Substitute ARGS into T, which is an pack expansion
9986 (i.e. TYPE_PACK_EXPANSION or EXPR_PACK_EXPANSION). Returns a
9987 TREE_VEC with the substituted arguments, a PACK_EXPANSION_* node
9988 (if only a partial substitution could be performed) or
9989 ERROR_MARK_NODE if there was an error. */
9991 tsubst_pack_expansion (tree t
, tree args
, tsubst_flags_t complain
,
9995 tree pack
, packs
= NULL_TREE
;
9996 bool unsubstituted_packs
= false;
9999 hash_map
<tree
, tree
> *saved_local_specializations
= NULL
;
10000 bool need_local_specializations
= false;
10003 gcc_assert (PACK_EXPANSION_P (t
));
10004 pattern
= PACK_EXPANSION_PATTERN (t
);
10006 /* Add in any args remembered from an earlier partial instantiation. */
10007 args
= add_to_template_args (PACK_EXPANSION_EXTRA_ARGS (t
), args
);
10009 levels
= TMPL_ARGS_DEPTH (args
);
10011 /* Determine the argument packs that will instantiate the parameter
10012 packs used in the expansion expression. While we're at it,
10013 compute the number of arguments to be expanded and make sure it
10015 for (pack
= PACK_EXPANSION_PARAMETER_PACKS (t
); pack
;
10016 pack
= TREE_CHAIN (pack
))
10018 tree parm_pack
= TREE_VALUE (pack
);
10019 tree arg_pack
= NULL_TREE
;
10020 tree orig_arg
= NULL_TREE
;
10023 if (TREE_CODE (parm_pack
) == BASES
)
10025 if (BASES_DIRECT (parm_pack
))
10026 return calculate_direct_bases (tsubst_expr (BASES_TYPE (parm_pack
),
10027 args
, complain
, in_decl
, false));
10029 return calculate_bases (tsubst_expr (BASES_TYPE (parm_pack
),
10030 args
, complain
, in_decl
, false));
10032 if (TREE_CODE (parm_pack
) == PARM_DECL
)
10034 if (PACK_EXPANSION_LOCAL_P (t
))
10035 arg_pack
= retrieve_local_specialization (parm_pack
);
10038 /* We can't rely on local_specializations for a parameter
10039 name used later in a function declaration (such as in a
10040 late-specified return type). Even if it exists, it might
10041 have the wrong value for a recursive call. Just make a
10042 dummy decl, since it's only used for its type. */
10043 arg_pack
= tsubst_decl (parm_pack
, args
, complain
);
10044 if (arg_pack
&& DECL_PACK_P (arg_pack
))
10045 /* Partial instantiation of the parm_pack, we can't build
10046 up an argument pack yet. */
10047 arg_pack
= NULL_TREE
;
10049 arg_pack
= make_fnparm_pack (arg_pack
);
10050 need_local_specializations
= true;
10053 else if (TREE_CODE (parm_pack
) == FIELD_DECL
)
10054 arg_pack
= tsubst_copy (parm_pack
, args
, complain
, in_decl
);
10058 template_parm_level_and_index (parm_pack
, &level
, &idx
);
10060 if (level
<= levels
)
10061 arg_pack
= TMPL_ARG (args
, level
, idx
);
10064 orig_arg
= arg_pack
;
10065 if (arg_pack
&& TREE_CODE (arg_pack
) == ARGUMENT_PACK_SELECT
)
10066 arg_pack
= ARGUMENT_PACK_SELECT_FROM_PACK (arg_pack
);
10068 if (arg_pack
&& !ARGUMENT_PACK_P (arg_pack
))
10069 /* This can only happen if we forget to expand an argument
10070 pack somewhere else. Just return an error, silently. */
10072 result
= make_tree_vec (1);
10073 TREE_VEC_ELT (result
, 0) = error_mark_node
;
10080 TREE_VEC_LENGTH (ARGUMENT_PACK_ARGS (arg_pack
));
10082 /* Don't bother trying to do a partial substitution with
10083 incomplete packs; we'll try again after deduction. */
10084 if (ARGUMENT_PACK_INCOMPLETE_P (arg_pack
))
10089 else if (len
!= my_len
)
10091 if (!(complain
& tf_error
))
10092 /* Fail quietly. */;
10093 else if (TREE_CODE (t
) == TYPE_PACK_EXPANSION
)
10094 error ("mismatched argument pack lengths while expanding "
10098 error ("mismatched argument pack lengths while expanding "
10101 return error_mark_node
;
10104 /* Keep track of the parameter packs and their corresponding
10106 packs
= tree_cons (parm_pack
, arg_pack
, packs
);
10107 TREE_TYPE (packs
) = orig_arg
;
10111 /* We can't substitute for this parameter pack. We use a flag as
10112 well as the missing_level counter because function parameter
10113 packs don't have a level. */
10114 unsubstituted_packs
= true;
10118 /* If the expansion is just T..., return the matching argument pack. */
10119 if (!unsubstituted_packs
10120 && TREE_PURPOSE (packs
) == pattern
)
10122 tree args
= ARGUMENT_PACK_ARGS (TREE_VALUE (packs
));
10123 if (TREE_CODE (t
) == TYPE_PACK_EXPANSION
10124 || pack_expansion_args_count (args
))
10126 /* Otherwise use the normal path so we get convert_from_reference. */
10129 /* We cannot expand this expansion expression, because we don't have
10130 all of the argument packs we need. */
10131 if (use_pack_expansion_extra_args_p (packs
, len
, unsubstituted_packs
))
10133 /* We got some full packs, but we can't substitute them in until we
10134 have values for all the packs. So remember these until then. */
10136 t
= make_pack_expansion (pattern
);
10137 PACK_EXPANSION_EXTRA_ARGS (t
) = args
;
10140 else if (unsubstituted_packs
)
10142 /* There were no real arguments, we're just replacing a parameter
10143 pack with another version of itself. Substitute into the
10144 pattern and return a PACK_EXPANSION_*. The caller will need to
10146 if (TREE_CODE (t
) == EXPR_PACK_EXPANSION
)
10147 t
= tsubst_expr (pattern
, args
, complain
, in_decl
,
10148 /*integral_constant_expression_p=*/false);
10150 t
= tsubst (pattern
, args
, complain
, in_decl
);
10151 t
= make_pack_expansion (t
);
10155 gcc_assert (len
>= 0);
10157 if (need_local_specializations
)
10159 /* We're in a late-specified return type, so create our own local
10160 specializations map; the current map is either NULL or (in the
10161 case of recursive unification) might have bindings that we don't
10162 want to use or alter. */
10163 saved_local_specializations
= local_specializations
;
10164 local_specializations
= new hash_map
<tree
, tree
>;
10167 /* For each argument in each argument pack, substitute into the
10169 result
= make_tree_vec (len
);
10170 for (i
= 0; i
< len
; ++i
)
10172 t
= gen_elem_of_pack_expansion_instantiation (pattern
, packs
,
10176 TREE_VEC_ELT (result
, i
) = t
;
10177 if (t
== error_mark_node
)
10179 result
= error_mark_node
;
10184 /* Update ARGS to restore the substitution from parameter packs to
10185 their argument packs. */
10186 for (pack
= packs
; pack
; pack
= TREE_CHAIN (pack
))
10188 tree parm
= TREE_PURPOSE (pack
);
10190 if (TREE_CODE (parm
) == PARM_DECL
10191 || TREE_CODE (parm
) == FIELD_DECL
)
10192 register_local_specialization (TREE_TYPE (pack
), parm
);
10197 if (TREE_VALUE (pack
) == NULL_TREE
)
10200 template_parm_level_and_index (parm
, &level
, &idx
);
10202 /* Update the corresponding argument. */
10203 if (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (args
))
10204 TREE_VEC_ELT (TREE_VEC_ELT (args
, level
-1 ), idx
) =
10207 TREE_VEC_ELT (args
, idx
) = TREE_TYPE (pack
);
10211 if (need_local_specializations
)
10213 delete local_specializations
;
10214 local_specializations
= saved_local_specializations
;
10220 /* Given PARM_DECL PARM, find the corresponding PARM_DECL in the template
10221 TMPL. We do this using DECL_PARM_INDEX, which should work even with
10222 parameter packs; all parms generated from a function parameter pack will
10223 have the same DECL_PARM_INDEX. */
10226 get_pattern_parm (tree parm
, tree tmpl
)
10228 tree pattern
= DECL_TEMPLATE_RESULT (tmpl
);
10231 if (DECL_ARTIFICIAL (parm
))
10233 for (patparm
= DECL_ARGUMENTS (pattern
);
10234 patparm
; patparm
= DECL_CHAIN (patparm
))
10235 if (DECL_ARTIFICIAL (patparm
)
10236 && DECL_NAME (parm
) == DECL_NAME (patparm
))
10241 patparm
= FUNCTION_FIRST_USER_PARM (DECL_TEMPLATE_RESULT (tmpl
));
10242 patparm
= chain_index (DECL_PARM_INDEX (parm
)-1, patparm
);
10243 gcc_assert (DECL_PARM_INDEX (patparm
)
10244 == DECL_PARM_INDEX (parm
));
10250 /* Substitute ARGS into the vector or list of template arguments T. */
10253 tsubst_template_args (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
10256 int len
, need_new
= 0, i
, expanded_len_adjust
= 0, out
;
10259 if (t
== error_mark_node
)
10260 return error_mark_node
;
10262 len
= TREE_VEC_LENGTH (t
);
10263 elts
= XALLOCAVEC (tree
, len
);
10265 for (i
= 0; i
< len
; i
++)
10267 tree orig_arg
= TREE_VEC_ELT (t
, i
);
10270 if (TREE_CODE (orig_arg
) == TREE_VEC
)
10271 new_arg
= tsubst_template_args (orig_arg
, args
, complain
, in_decl
);
10272 else if (PACK_EXPANSION_P (orig_arg
))
10274 /* Substitute into an expansion expression. */
10275 new_arg
= tsubst_pack_expansion (orig_arg
, args
, complain
, in_decl
);
10277 if (TREE_CODE (new_arg
) == TREE_VEC
)
10278 /* Add to the expanded length adjustment the number of
10279 expanded arguments. We subtract one from this
10280 measurement, because the argument pack expression
10281 itself is already counted as 1 in
10282 LEN. EXPANDED_LEN_ADJUST can actually be negative, if
10283 the argument pack is empty. */
10284 expanded_len_adjust
+= TREE_VEC_LENGTH (new_arg
) - 1;
10286 else if (ARGUMENT_PACK_P (orig_arg
))
10288 /* Substitute into each of the arguments. */
10289 new_arg
= TYPE_P (orig_arg
)
10290 ? cxx_make_type (TREE_CODE (orig_arg
))
10291 : make_node (TREE_CODE (orig_arg
));
10293 SET_ARGUMENT_PACK_ARGS (
10295 tsubst_template_args (ARGUMENT_PACK_ARGS (orig_arg
),
10296 args
, complain
, in_decl
));
10298 if (ARGUMENT_PACK_ARGS (new_arg
) == error_mark_node
)
10299 new_arg
= error_mark_node
;
10301 if (TREE_CODE (new_arg
) == NONTYPE_ARGUMENT_PACK
) {
10302 TREE_TYPE (new_arg
) = tsubst (TREE_TYPE (orig_arg
), args
,
10303 complain
, in_decl
);
10304 TREE_CONSTANT (new_arg
) = TREE_CONSTANT (orig_arg
);
10306 if (TREE_TYPE (new_arg
) == error_mark_node
)
10307 new_arg
= error_mark_node
;
10311 new_arg
= tsubst_template_arg (orig_arg
, args
, complain
, in_decl
);
10313 if (new_arg
== error_mark_node
)
10314 return error_mark_node
;
10317 if (new_arg
!= orig_arg
)
10324 /* Make space for the expanded arguments coming from template
10326 t
= make_tree_vec (len
+ expanded_len_adjust
);
10327 /* ORIG_T can contain TREE_VECs. That happens if ORIG_T contains the
10328 arguments for a member template.
10329 In that case each TREE_VEC in ORIG_T represents a level of template
10330 arguments, and ORIG_T won't carry any non defaulted argument count.
10331 It will rather be the nested TREE_VECs that will carry one.
10332 In other words, ORIG_T carries a non defaulted argument count only
10333 if it doesn't contain any nested TREE_VEC. */
10334 if (NON_DEFAULT_TEMPLATE_ARGS_COUNT (orig_t
))
10336 int count
= GET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (orig_t
);
10337 count
+= expanded_len_adjust
;
10338 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (t
, count
);
10340 for (i
= 0, out
= 0; i
< len
; i
++)
10342 if ((PACK_EXPANSION_P (TREE_VEC_ELT (orig_t
, i
))
10343 || ARGUMENT_PACK_P (TREE_VEC_ELT (orig_t
, i
)))
10344 && TREE_CODE (elts
[i
]) == TREE_VEC
)
10348 /* Now expand the template argument pack "in place". */
10349 for (idx
= 0; idx
< TREE_VEC_LENGTH (elts
[i
]); idx
++, out
++)
10350 TREE_VEC_ELT (t
, out
) = TREE_VEC_ELT (elts
[i
], idx
);
10354 TREE_VEC_ELT (t
, out
) = elts
[i
];
10362 /* Return the result of substituting ARGS into the template parameters
10363 given by PARMS. If there are m levels of ARGS and m + n levels of
10364 PARMS, then the result will contain n levels of PARMS. For
10365 example, if PARMS is `template <class T> template <class U>
10366 template <T*, U, class V>' and ARGS is {{int}, {double}} then the
10367 result will be `template <int*, double, class V>'. */
10370 tsubst_template_parms (tree parms
, tree args
, tsubst_flags_t complain
)
10372 tree r
= NULL_TREE
;
10375 /* When substituting into a template, we must set
10376 PROCESSING_TEMPLATE_DECL as the template parameters may be
10377 dependent if they are based on one-another, and the dependency
10378 predicates are short-circuit outside of templates. */
10379 ++processing_template_decl
;
10381 for (new_parms
= &r
;
10382 parms
&& TMPL_PARMS_DEPTH (parms
) > TMPL_ARGS_DEPTH (args
);
10383 new_parms
= &(TREE_CHAIN (*new_parms
)),
10384 parms
= TREE_CHAIN (parms
))
10387 make_tree_vec (TREE_VEC_LENGTH (TREE_VALUE (parms
)));
10390 for (i
= 0; i
< TREE_VEC_LENGTH (new_vec
); ++i
)
10394 if (parms
== error_mark_node
)
10397 tuple
= TREE_VEC_ELT (TREE_VALUE (parms
), i
);
10399 if (tuple
== error_mark_node
)
10402 TREE_VEC_ELT (new_vec
, i
) =
10403 tsubst_template_parm (tuple
, args
, complain
);
10407 tree_cons (size_int (TMPL_PARMS_DEPTH (parms
)
10408 - TMPL_ARGS_DEPTH (args
)),
10409 new_vec
, NULL_TREE
);
10412 --processing_template_decl
;
10417 /* Return the result of substituting ARGS into one template parameter
10418 given by T. T Must be a TREE_LIST which TREE_VALUE is the template
10419 parameter and which TREE_PURPOSE is the default argument of the
10420 template parameter. */
10423 tsubst_template_parm (tree t
, tree args
, tsubst_flags_t complain
)
10425 tree default_value
, parm_decl
;
10427 if (args
== NULL_TREE
10429 || t
== error_mark_node
)
10432 gcc_assert (TREE_CODE (t
) == TREE_LIST
);
10434 default_value
= TREE_PURPOSE (t
);
10435 parm_decl
= TREE_VALUE (t
);
10437 parm_decl
= tsubst (parm_decl
, args
, complain
, NULL_TREE
);
10438 if (TREE_CODE (parm_decl
) == PARM_DECL
10439 && invalid_nontype_parm_type_p (TREE_TYPE (parm_decl
), complain
))
10440 parm_decl
= error_mark_node
;
10441 default_value
= tsubst_template_arg (default_value
, args
,
10442 complain
, NULL_TREE
);
10444 return build_tree_list (default_value
, parm_decl
);
10447 /* Substitute the ARGS into the indicated aggregate (or enumeration)
10448 type T. If T is not an aggregate or enumeration type, it is
10449 handled as if by tsubst. IN_DECL is as for tsubst. If
10450 ENTERING_SCOPE is nonzero, T is the context for a template which
10451 we are presently tsubst'ing. Return the substituted value. */
10454 tsubst_aggr_type (tree t
,
10456 tsubst_flags_t complain
,
10458 int entering_scope
)
10460 if (t
== NULL_TREE
)
10463 switch (TREE_CODE (t
))
10466 if (TYPE_PTRMEMFUNC_P (t
))
10467 return tsubst (TYPE_PTRMEMFUNC_FN_TYPE (t
), args
, complain
, in_decl
);
10469 /* Else fall through. */
10470 case ENUMERAL_TYPE
:
10472 if (TYPE_TEMPLATE_INFO (t
) && uses_template_parms (t
))
10477 int saved_unevaluated_operand
;
10478 int saved_inhibit_evaluation_warnings
;
10480 /* In "sizeof(X<I>)" we need to evaluate "I". */
10481 saved_unevaluated_operand
= cp_unevaluated_operand
;
10482 cp_unevaluated_operand
= 0;
10483 saved_inhibit_evaluation_warnings
= c_inhibit_evaluation_warnings
;
10484 c_inhibit_evaluation_warnings
= 0;
10486 /* First, determine the context for the type we are looking
10488 context
= TYPE_CONTEXT (t
);
10489 if (context
&& TYPE_P (context
))
10491 context
= tsubst_aggr_type (context
, args
, complain
,
10492 in_decl
, /*entering_scope=*/1);
10493 /* If context is a nested class inside a class template,
10494 it may still need to be instantiated (c++/33959). */
10495 context
= complete_type (context
);
10498 /* Then, figure out what arguments are appropriate for the
10499 type we are trying to find. For example, given:
10501 template <class T> struct S;
10502 template <class T, class U> void f(T, U) { S<U> su; }
10504 and supposing that we are instantiating f<int, double>,
10505 then our ARGS will be {int, double}, but, when looking up
10506 S we only want {double}. */
10507 argvec
= tsubst_template_args (TYPE_TI_ARGS (t
), args
,
10508 complain
, in_decl
);
10509 if (argvec
== error_mark_node
)
10510 r
= error_mark_node
;
10513 r
= lookup_template_class (t
, argvec
, in_decl
, context
,
10514 entering_scope
, complain
);
10515 r
= cp_build_qualified_type_real (r
, cp_type_quals (t
), complain
);
10518 cp_unevaluated_operand
= saved_unevaluated_operand
;
10519 c_inhibit_evaluation_warnings
= saved_inhibit_evaluation_warnings
;
10524 /* This is not a template type, so there's nothing to do. */
10528 return tsubst (t
, args
, complain
, in_decl
);
10532 /* Substitute into the default argument ARG (a default argument for
10533 FN), which has the indicated TYPE. */
10536 tsubst_default_argument (tree fn
, tree type
, tree arg
, tsubst_flags_t complain
)
10538 tree saved_class_ptr
= NULL_TREE
;
10539 tree saved_class_ref
= NULL_TREE
;
10540 int errs
= errorcount
+ sorrycount
;
10542 /* This can happen in invalid code. */
10543 if (TREE_CODE (arg
) == DEFAULT_ARG
)
10546 /* This default argument came from a template. Instantiate the
10547 default argument here, not in tsubst. In the case of
10556 we must be careful to do name lookup in the scope of S<T>,
10557 rather than in the current class. */
10558 push_access_scope (fn
);
10559 /* The "this" pointer is not valid in a default argument. */
10562 saved_class_ptr
= current_class_ptr
;
10563 cp_function_chain
->x_current_class_ptr
= NULL_TREE
;
10564 saved_class_ref
= current_class_ref
;
10565 cp_function_chain
->x_current_class_ref
= NULL_TREE
;
10568 push_deferring_access_checks(dk_no_deferred
);
10569 /* The default argument expression may cause implicitly defined
10570 member functions to be synthesized, which will result in garbage
10571 collection. We must treat this situation as if we were within
10572 the body of function so as to avoid collecting live data on the
10575 arg
= tsubst_expr (arg
, DECL_TI_ARGS (fn
),
10576 complain
, NULL_TREE
,
10577 /*integral_constant_expression_p=*/false);
10579 pop_deferring_access_checks();
10581 /* Restore the "this" pointer. */
10584 cp_function_chain
->x_current_class_ptr
= saved_class_ptr
;
10585 cp_function_chain
->x_current_class_ref
= saved_class_ref
;
10588 if (errorcount
+sorrycount
> errs
10589 && (complain
& tf_warning_or_error
))
10590 inform (input_location
,
10591 " when instantiating default argument for call to %D", fn
);
10593 /* Make sure the default argument is reasonable. */
10594 arg
= check_default_argument (type
, arg
, complain
);
10596 pop_access_scope (fn
);
10601 /* Substitute into all the default arguments for FN. */
10604 tsubst_default_arguments (tree fn
, tsubst_flags_t complain
)
10609 tmpl_args
= DECL_TI_ARGS (fn
);
10611 /* If this function is not yet instantiated, we certainly don't need
10612 its default arguments. */
10613 if (uses_template_parms (tmpl_args
))
10615 /* Don't do this again for clones. */
10616 if (DECL_CLONED_FUNCTION_P (fn
))
10619 for (arg
= TYPE_ARG_TYPES (TREE_TYPE (fn
));
10621 arg
= TREE_CHAIN (arg
))
10622 if (TREE_PURPOSE (arg
))
10623 TREE_PURPOSE (arg
) = tsubst_default_argument (fn
,
10625 TREE_PURPOSE (arg
),
10629 /* Substitute the ARGS into the T, which is a _DECL. Return the
10630 result of the substitution. Issue error and warning messages under
10631 control of COMPLAIN. */
10634 tsubst_decl (tree t
, tree args
, tsubst_flags_t complain
)
10636 #define RETURN(EXP) do { r = (EXP); goto out; } while(0)
10637 location_t saved_loc
;
10638 tree r
= NULL_TREE
;
10640 hashval_t hash
= 0;
10642 /* Set the filename and linenumber to improve error-reporting. */
10643 saved_loc
= input_location
;
10644 input_location
= DECL_SOURCE_LOCATION (t
);
10646 switch (TREE_CODE (t
))
10648 case TEMPLATE_DECL
:
10650 /* We can get here when processing a member function template,
10651 member class template, or template template parameter. */
10652 tree decl
= DECL_TEMPLATE_RESULT (t
);
10657 if (DECL_TEMPLATE_TEMPLATE_PARM_P (t
))
10659 /* Template template parameter is treated here. */
10660 tree new_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10661 if (new_type
== error_mark_node
)
10662 RETURN (error_mark_node
);
10663 /* If we get a real template back, return it. This can happen in
10664 the context of most_specialized_partial_spec. */
10665 if (TREE_CODE (new_type
) == TEMPLATE_DECL
)
10669 DECL_CHAIN (r
) = NULL_TREE
;
10670 TREE_TYPE (r
) = new_type
;
10671 DECL_TEMPLATE_RESULT (r
)
10672 = build_decl (DECL_SOURCE_LOCATION (decl
),
10673 TYPE_DECL
, DECL_NAME (decl
), new_type
);
10674 DECL_TEMPLATE_PARMS (r
)
10675 = tsubst_template_parms (DECL_TEMPLATE_PARMS (t
), args
,
10677 TYPE_NAME (new_type
) = r
;
10681 /* We might already have an instance of this template.
10682 The ARGS are for the surrounding class type, so the
10683 full args contain the tsubst'd args for the context,
10684 plus the innermost args from the template decl. */
10685 tmpl_args
= DECL_CLASS_TEMPLATE_P (t
)
10686 ? CLASSTYPE_TI_ARGS (TREE_TYPE (t
))
10687 : DECL_TI_ARGS (DECL_TEMPLATE_RESULT (t
));
10688 /* Because this is a template, the arguments will still be
10689 dependent, even after substitution. If
10690 PROCESSING_TEMPLATE_DECL is not set, the dependency
10691 predicates will short-circuit. */
10692 ++processing_template_decl
;
10693 full_args
= tsubst_template_args (tmpl_args
, args
,
10694 complain
, in_decl
);
10695 --processing_template_decl
;
10696 if (full_args
== error_mark_node
)
10697 RETURN (error_mark_node
);
10699 /* If this is a default template template argument,
10700 tsubst might not have changed anything. */
10701 if (full_args
== tmpl_args
)
10704 hash
= hash_tmpl_and_args (t
, full_args
);
10705 spec
= retrieve_specialization (t
, full_args
, hash
);
10706 if (spec
!= NULL_TREE
)
10712 /* Make a new template decl. It will be similar to the
10713 original, but will record the current template arguments.
10714 We also create a new function declaration, which is just
10715 like the old one, but points to this new template, rather
10716 than the old one. */
10718 gcc_assert (DECL_LANG_SPECIFIC (r
) != 0);
10719 DECL_CHAIN (r
) = NULL_TREE
;
10721 DECL_TEMPLATE_INFO (r
) = build_template_info (t
, args
);
10723 if (TREE_CODE (decl
) == TYPE_DECL
10724 && !TYPE_DECL_ALIAS_P (decl
))
10727 ++processing_template_decl
;
10728 new_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10729 --processing_template_decl
;
10730 if (new_type
== error_mark_node
)
10731 RETURN (error_mark_node
);
10733 TREE_TYPE (r
) = new_type
;
10734 /* For a partial specialization, we need to keep pointing to
10735 the primary template. */
10736 if (!DECL_TEMPLATE_SPECIALIZATION (t
))
10737 CLASSTYPE_TI_TEMPLATE (new_type
) = r
;
10738 DECL_TEMPLATE_RESULT (r
) = TYPE_MAIN_DECL (new_type
);
10739 DECL_TI_ARGS (r
) = CLASSTYPE_TI_ARGS (new_type
);
10740 DECL_CONTEXT (r
) = TYPE_CONTEXT (new_type
);
10745 ++processing_template_decl
;
10746 new_decl
= tsubst (decl
, args
, complain
, in_decl
);
10747 --processing_template_decl
;
10748 if (new_decl
== error_mark_node
)
10749 RETURN (error_mark_node
);
10751 DECL_TEMPLATE_RESULT (r
) = new_decl
;
10752 DECL_TI_TEMPLATE (new_decl
) = r
;
10753 TREE_TYPE (r
) = TREE_TYPE (new_decl
);
10754 DECL_TI_ARGS (r
) = DECL_TI_ARGS (new_decl
);
10755 DECL_CONTEXT (r
) = DECL_CONTEXT (new_decl
);
10758 SET_DECL_IMPLICIT_INSTANTIATION (r
);
10759 DECL_TEMPLATE_INSTANTIATIONS (r
) = NULL_TREE
;
10760 DECL_TEMPLATE_SPECIALIZATIONS (r
) = NULL_TREE
;
10762 /* The template parameters for this new template are all the
10763 template parameters for the old template, except the
10764 outermost level of parameters. */
10765 DECL_TEMPLATE_PARMS (r
)
10766 = tsubst_template_parms (DECL_TEMPLATE_PARMS (t
), args
,
10769 if (PRIMARY_TEMPLATE_P (t
))
10770 DECL_PRIMARY_TEMPLATE (r
) = r
;
10772 if (TREE_CODE (decl
) != TYPE_DECL
&& TREE_CODE (decl
) != VAR_DECL
)
10773 /* Record this non-type partial instantiation. */
10774 register_specialization (r
, t
,
10775 DECL_TI_ARGS (DECL_TEMPLATE_RESULT (r
)),
10780 case FUNCTION_DECL
:
10783 tree argvec
= NULL_TREE
;
10791 /* Nobody should be tsubst'ing into non-template functions. */
10792 gcc_assert (DECL_TEMPLATE_INFO (t
) != NULL_TREE
);
10794 if (TREE_CODE (DECL_TI_TEMPLATE (t
)) == TEMPLATE_DECL
)
10799 /* If T is not dependent, just return it. We have to
10800 increment PROCESSING_TEMPLATE_DECL because
10801 value_dependent_expression_p assumes that nothing is
10802 dependent when PROCESSING_TEMPLATE_DECL is zero. */
10803 ++processing_template_decl
;
10804 dependent_p
= value_dependent_expression_p (t
);
10805 --processing_template_decl
;
10809 /* Calculate the most general template of which R is a
10810 specialization, and the complete set of arguments used to
10812 gen_tmpl
= most_general_template (DECL_TI_TEMPLATE (t
));
10813 argvec
= tsubst_template_args (DECL_TI_ARGS
10814 (DECL_TEMPLATE_RESULT
10815 (DECL_TI_TEMPLATE (t
))),
10816 args
, complain
, in_decl
);
10817 if (argvec
== error_mark_node
)
10818 RETURN (error_mark_node
);
10820 /* Check to see if we already have this specialization. */
10821 hash
= hash_tmpl_and_args (gen_tmpl
, argvec
);
10822 spec
= retrieve_specialization (gen_tmpl
, argvec
, hash
);
10830 /* We can see more levels of arguments than parameters if
10831 there was a specialization of a member template, like
10834 template <class T> struct S { template <class U> void f(); }
10835 template <> template <class U> void S<int>::f(U);
10837 Here, we'll be substituting into the specialization,
10838 because that's where we can find the code we actually
10839 want to generate, but we'll have enough arguments for
10840 the most general template.
10842 We also deal with the peculiar case:
10844 template <class T> struct S {
10845 template <class U> friend void f();
10847 template <class U> void f() {}
10849 template void f<double>();
10851 Here, the ARGS for the instantiation of will be {int,
10852 double}. But, we only need as many ARGS as there are
10853 levels of template parameters in CODE_PATTERN. We are
10854 careful not to get fooled into reducing the ARGS in
10857 template <class T> struct S { template <class U> void f(U); }
10858 template <class T> template <> void S<T>::f(int) {}
10860 which we can spot because the pattern will be a
10861 specialization in this case. */
10862 args_depth
= TMPL_ARGS_DEPTH (args
);
10864 TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (DECL_TI_TEMPLATE (t
)));
10865 if (args_depth
> parms_depth
10866 && !DECL_TEMPLATE_SPECIALIZATION (t
))
10867 args
= get_innermost_template_args (args
, parms_depth
);
10871 /* This special case arises when we have something like this:
10873 template <class T> struct S {
10874 friend void f<int>(int, double);
10877 Here, the DECL_TI_TEMPLATE for the friend declaration
10878 will be an IDENTIFIER_NODE. We are being called from
10879 tsubst_friend_function, and we want only to create a
10880 new decl (R) with appropriate types so that we can call
10881 determine_specialization. */
10882 gen_tmpl
= NULL_TREE
;
10885 if (DECL_CLASS_SCOPE_P (t
))
10887 if (DECL_NAME (t
) == constructor_name (DECL_CONTEXT (t
)))
10891 ctx
= tsubst_aggr_type (DECL_CONTEXT (t
), args
,
10892 complain
, t
, /*entering_scope=*/1);
10897 ctx
= DECL_CONTEXT (t
);
10899 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
10900 if (type
== error_mark_node
)
10901 RETURN (error_mark_node
);
10903 /* If we hit excessive deduction depth, the type is bogus even if
10904 it isn't error_mark_node, so don't build a decl. */
10905 if (excessive_deduction_depth
)
10906 RETURN (error_mark_node
);
10908 /* We do NOT check for matching decls pushed separately at this
10909 point, as they may not represent instantiations of this
10910 template, and in any case are considered separate under the
10913 DECL_USE_TEMPLATE (r
) = 0;
10914 TREE_TYPE (r
) = type
;
10915 /* Clear out the mangled name and RTL for the instantiation. */
10916 SET_DECL_ASSEMBLER_NAME (r
, NULL_TREE
);
10917 SET_DECL_RTL (r
, NULL
);
10918 /* Leave DECL_INITIAL set on deleted instantiations. */
10919 if (!DECL_DELETED_FN (r
))
10920 DECL_INITIAL (r
) = NULL_TREE
;
10921 DECL_CONTEXT (r
) = ctx
;
10923 /* OpenMP UDRs have the only argument a reference to the declared
10924 type. We want to diagnose if the declared type is a reference,
10925 which is invalid, but as references to references are usually
10926 quietly merged, diagnose it here. */
10927 if (DECL_OMP_DECLARE_REDUCTION_P (t
))
10930 = TREE_TYPE (TREE_VALUE (TYPE_ARG_TYPES (TREE_TYPE (t
))));
10931 argtype
= tsubst (argtype
, args
, complain
, in_decl
);
10932 if (TREE_CODE (argtype
) == REFERENCE_TYPE
)
10933 error_at (DECL_SOURCE_LOCATION (t
),
10934 "reference type %qT in "
10935 "%<#pragma omp declare reduction%>", argtype
);
10936 if (strchr (IDENTIFIER_POINTER (DECL_NAME (t
)), '~') == NULL
)
10937 DECL_NAME (r
) = omp_reduction_id (ERROR_MARK
, DECL_NAME (t
),
10941 if (member
&& DECL_CONV_FN_P (r
))
10942 /* Type-conversion operator. Reconstruct the name, in
10943 case it's the name of one of the template's parameters. */
10944 DECL_NAME (r
) = mangle_conv_op_name_for_type (TREE_TYPE (type
));
10946 DECL_ARGUMENTS (r
) = tsubst (DECL_ARGUMENTS (t
), args
,
10948 DECL_RESULT (r
) = NULL_TREE
;
10950 TREE_STATIC (r
) = 0;
10951 TREE_PUBLIC (r
) = TREE_PUBLIC (t
);
10952 DECL_EXTERNAL (r
) = 1;
10953 /* If this is an instantiation of a function with internal
10954 linkage, we already know what object file linkage will be
10955 assigned to the instantiation. */
10956 DECL_INTERFACE_KNOWN (r
) = !TREE_PUBLIC (r
);
10957 DECL_DEFER_OUTPUT (r
) = 0;
10958 DECL_CHAIN (r
) = NULL_TREE
;
10959 DECL_PENDING_INLINE_INFO (r
) = 0;
10960 DECL_PENDING_INLINE_P (r
) = 0;
10961 DECL_SAVED_TREE (r
) = NULL_TREE
;
10962 DECL_STRUCT_FUNCTION (r
) = NULL
;
10964 /* We'll re-clone as appropriate in instantiate_template. */
10965 DECL_CLONED_FUNCTION (r
) = NULL_TREE
;
10967 /* If we aren't complaining now, return on error before we register
10968 the specialization so that we'll complain eventually. */
10969 if ((complain
& tf_error
) == 0
10970 && IDENTIFIER_OPNAME_P (DECL_NAME (r
))
10971 && !grok_op_properties (r
, /*complain=*/false))
10972 RETURN (error_mark_node
);
10974 /* Set up the DECL_TEMPLATE_INFO for R. There's no need to do
10975 this in the special friend case mentioned above where
10976 GEN_TMPL is NULL. */
10979 DECL_TEMPLATE_INFO (r
)
10980 = build_template_info (gen_tmpl
, argvec
);
10981 SET_DECL_IMPLICIT_INSTANTIATION (r
);
10984 = register_specialization (r
, gen_tmpl
, argvec
, false, hash
);
10986 /* We instantiated this while substituting into
10987 the type earlier (template/friend54.C). */
10990 /* We're not supposed to instantiate default arguments
10991 until they are called, for a template. But, for a
10994 template <class T> void f ()
10995 { extern void g(int i = T()); }
10997 we should do the substitution when the template is
10998 instantiated. We handle the member function case in
10999 instantiate_class_template since the default arguments
11000 might refer to other members of the class. */
11002 && !PRIMARY_TEMPLATE_P (gen_tmpl
)
11003 && !uses_template_parms (argvec
))
11004 tsubst_default_arguments (r
, complain
);
11007 DECL_TEMPLATE_INFO (r
) = NULL_TREE
;
11009 /* Copy the list of befriending classes. */
11010 for (friends
= &DECL_BEFRIENDING_CLASSES (r
);
11012 friends
= &TREE_CHAIN (*friends
))
11014 *friends
= copy_node (*friends
);
11015 TREE_VALUE (*friends
) = tsubst (TREE_VALUE (*friends
),
11020 if (DECL_CONSTRUCTOR_P (r
) || DECL_DESTRUCTOR_P (r
))
11022 maybe_retrofit_in_chrg (r
);
11023 if (DECL_CONSTRUCTOR_P (r
))
11024 grok_ctor_properties (ctx
, r
);
11025 if (DECL_INHERITED_CTOR_BASE (r
))
11026 deduce_inheriting_ctor (r
);
11027 /* If this is an instantiation of a member template, clone it.
11028 If it isn't, that'll be handled by
11029 clone_constructors_and_destructors. */
11030 if (PRIMARY_TEMPLATE_P (gen_tmpl
))
11031 clone_function_decl (r
, /*update_method_vec_p=*/0);
11033 else if ((complain
& tf_error
) != 0
11034 && IDENTIFIER_OPNAME_P (DECL_NAME (r
))
11035 && !grok_op_properties (r
, /*complain=*/true))
11036 RETURN (error_mark_node
);
11038 if (DECL_FRIEND_P (t
) && DECL_FRIEND_CONTEXT (t
))
11039 SET_DECL_FRIEND_CONTEXT (r
,
11040 tsubst (DECL_FRIEND_CONTEXT (t
),
11041 args
, complain
, in_decl
));
11043 /* Possibly limit visibility based on template args. */
11044 DECL_VISIBILITY (r
) = VISIBILITY_DEFAULT
;
11045 if (DECL_VISIBILITY_SPECIFIED (t
))
11047 DECL_VISIBILITY_SPECIFIED (r
) = 0;
11048 DECL_ATTRIBUTES (r
)
11049 = remove_attribute ("visibility", DECL_ATTRIBUTES (r
));
11051 determine_visibility (r
);
11052 if (DECL_DEFAULTED_OUTSIDE_CLASS_P (r
)
11053 && !processing_template_decl
)
11054 defaulted_late_check (r
);
11056 apply_late_template_attributes (&r
, DECL_ATTRIBUTES (r
), 0,
11057 args
, complain
, in_decl
);
11063 tree type
= NULL_TREE
;
11065 tree expanded_types
= NULL_TREE
;
11066 tree prev_r
= NULL_TREE
;
11067 tree first_r
= NULL_TREE
;
11069 if (DECL_PACK_P (t
))
11071 /* If there is a local specialization that isn't a
11072 parameter pack, it means that we're doing a "simple"
11073 substitution from inside tsubst_pack_expansion. Just
11074 return the local specialization (which will be a single
11076 tree spec
= retrieve_local_specialization (t
);
11078 && TREE_CODE (spec
) == PARM_DECL
11079 && TREE_CODE (TREE_TYPE (spec
)) != TYPE_PACK_EXPANSION
)
11082 /* Expand the TYPE_PACK_EXPANSION that provides the types for
11083 the parameters in this function parameter pack. */
11084 expanded_types
= tsubst_pack_expansion (TREE_TYPE (t
), args
,
11085 complain
, in_decl
);
11086 if (TREE_CODE (expanded_types
) == TREE_VEC
)
11088 len
= TREE_VEC_LENGTH (expanded_types
);
11090 /* Zero-length parameter packs are boring. Just substitute
11093 RETURN (tsubst (TREE_CHAIN (t
), args
, complain
,
11098 /* All we did was update the type. Make a note of that. */
11099 type
= expanded_types
;
11100 expanded_types
= NULL_TREE
;
11104 /* Loop through all of the parameters we'll build. When T is
11105 a function parameter pack, LEN is the number of expanded
11106 types in EXPANDED_TYPES; otherwise, LEN is 1. */
11108 for (i
= 0; i
< len
; ++i
)
11112 if (DECL_TEMPLATE_PARM_P (t
))
11113 SET_DECL_TEMPLATE_PARM_P (r
);
11115 if (expanded_types
)
11116 /* We're on the Ith parameter of the function parameter
11119 /* Get the Ith type. */
11120 type
= TREE_VEC_ELT (expanded_types
, i
);
11122 /* Rename the parameter to include the index. */
11124 = make_ith_pack_parameter_name (DECL_NAME (r
), i
);
11127 /* We're dealing with a normal parameter. */
11128 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
11130 type
= type_decays_to (type
);
11131 TREE_TYPE (r
) = type
;
11132 cp_apply_type_quals_to_decl (cp_type_quals (type
), r
);
11134 if (DECL_INITIAL (r
))
11136 if (TREE_CODE (DECL_INITIAL (r
)) != TEMPLATE_PARM_INDEX
)
11137 DECL_INITIAL (r
) = TREE_TYPE (r
);
11139 DECL_INITIAL (r
) = tsubst (DECL_INITIAL (r
), args
,
11140 complain
, in_decl
);
11143 DECL_CONTEXT (r
) = NULL_TREE
;
11145 if (!DECL_TEMPLATE_PARM_P (r
))
11146 DECL_ARG_TYPE (r
) = type_passed_as (type
);
11148 apply_late_template_attributes (&r
, DECL_ATTRIBUTES (r
), 0,
11149 args
, complain
, in_decl
);
11151 /* Keep track of the first new parameter we
11152 generate. That's what will be returned to the
11157 /* Build a proper chain of parameters when substituting
11158 into a function parameter pack. */
11160 DECL_CHAIN (prev_r
) = r
;
11163 /* If cp_unevaluated_operand is set, we're just looking for a
11164 single dummy parameter, so don't keep going. */
11165 if (DECL_CHAIN (t
) && !cp_unevaluated_operand
)
11166 DECL_CHAIN (r
) = tsubst (DECL_CHAIN (t
), args
,
11167 complain
, DECL_CHAIN (t
));
11169 /* FIRST_R contains the start of the chain we've built. */
11176 tree type
= NULL_TREE
;
11177 tree vec
= NULL_TREE
;
11178 tree expanded_types
= NULL_TREE
;
11181 if (PACK_EXPANSION_P (TREE_TYPE (t
)))
11183 /* This field is a lambda capture pack. Return a TREE_VEC of
11184 the expanded fields to instantiate_class_template_1 and
11185 store them in the specializations hash table as a
11186 NONTYPE_ARGUMENT_PACK so that tsubst_copy can find them. */
11187 expanded_types
= tsubst_pack_expansion (TREE_TYPE (t
), args
,
11188 complain
, in_decl
);
11189 if (TREE_CODE (expanded_types
) == TREE_VEC
)
11191 len
= TREE_VEC_LENGTH (expanded_types
);
11192 vec
= make_tree_vec (len
);
11196 /* All we did was update the type. Make a note of that. */
11197 type
= expanded_types
;
11198 expanded_types
= NULL_TREE
;
11202 for (int i
= 0; i
< len
; ++i
)
11205 if (expanded_types
)
11207 type
= TREE_VEC_ELT (expanded_types
, i
);
11209 = make_ith_pack_parameter_name (DECL_NAME (r
), i
);
11212 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
11214 if (type
== error_mark_node
)
11215 RETURN (error_mark_node
);
11216 TREE_TYPE (r
) = type
;
11217 cp_apply_type_quals_to_decl (cp_type_quals (type
), r
);
11219 if (DECL_C_BIT_FIELD (r
))
11220 /* For bit-fields, DECL_INITIAL gives the number of bits. For
11221 non-bit-fields DECL_INITIAL is a non-static data member
11222 initializer, which gets deferred instantiation. */
11224 = tsubst_expr (DECL_INITIAL (t
), args
,
11226 /*integral_constant_expression_p=*/true);
11227 else if (DECL_INITIAL (t
))
11229 /* Set up DECL_TEMPLATE_INFO so that we can get at the
11230 NSDMI in perform_member_init. Still set DECL_INITIAL
11231 so that we know there is one. */
11232 DECL_INITIAL (r
) = void_node
;
11233 gcc_assert (DECL_LANG_SPECIFIC (r
) == NULL
);
11234 retrofit_lang_decl (r
);
11235 DECL_TEMPLATE_INFO (r
) = build_template_info (t
, args
);
11237 /* We don't have to set DECL_CONTEXT here; it is set by
11238 finish_member_declaration. */
11239 DECL_CHAIN (r
) = NULL_TREE
;
11241 apply_late_template_attributes (&r
, DECL_ATTRIBUTES (r
), 0,
11242 args
, complain
, in_decl
);
11245 TREE_VEC_ELT (vec
, i
) = r
;
11251 tree pack
= make_node (NONTYPE_ARGUMENT_PACK
);
11252 tree tpack
= cxx_make_type (TYPE_ARGUMENT_PACK
);
11253 SET_ARGUMENT_PACK_ARGS (pack
, vec
);
11254 SET_ARGUMENT_PACK_ARGS (tpack
, expanded_types
);
11255 TREE_TYPE (pack
) = tpack
;
11256 register_specialization (pack
, t
, args
, false, 0);
11262 /* We reach here only for member using decls. We also need to check
11263 uses_template_parms because DECL_DEPENDENT_P is not set for a
11264 using-declaration that designates a member of the current
11265 instantiation (c++/53549). */
11266 if (DECL_DEPENDENT_P (t
)
11267 || uses_template_parms (USING_DECL_SCOPE (t
)))
11269 tree inst_scope
= tsubst_copy (USING_DECL_SCOPE (t
), args
,
11270 complain
, in_decl
);
11271 tree name
= tsubst_copy (DECL_NAME (t
), args
, complain
, in_decl
);
11272 r
= do_class_using_decl (inst_scope
, name
);
11274 r
= error_mark_node
;
11277 TREE_PROTECTED (r
) = TREE_PROTECTED (t
);
11278 TREE_PRIVATE (r
) = TREE_PRIVATE (t
);
11284 DECL_CHAIN (r
) = NULL_TREE
;
11291 tree argvec
= NULL_TREE
;
11292 tree gen_tmpl
= NULL_TREE
;
11294 tree tmpl
= NULL_TREE
;
11296 tree type
= NULL_TREE
;
11299 if (TREE_TYPE (t
) == error_mark_node
)
11300 RETURN (error_mark_node
);
11302 if (TREE_CODE (t
) == TYPE_DECL
11303 && t
== TYPE_MAIN_DECL (TREE_TYPE (t
)))
11305 /* If this is the canonical decl, we don't have to
11306 mess with instantiations, and often we can't (for
11307 typename, template type parms and such). Note that
11308 TYPE_NAME is not correct for the above test if
11309 we've copied the type for a typedef. */
11310 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
11311 if (type
== error_mark_node
)
11312 RETURN (error_mark_node
);
11313 r
= TYPE_NAME (type
);
11317 /* Check to see if we already have the specialization we
11320 if (DECL_CLASS_SCOPE_P (t
) || DECL_NAMESPACE_SCOPE_P (t
))
11322 /* T is a static data member or namespace-scope entity.
11323 We have to substitute into namespace-scope variables
11324 (not just variable templates) because of cases like:
11326 template <class T> void f() { extern T t; }
11328 where the entity referenced is not known until
11329 instantiation time. */
11331 ctx
= DECL_CONTEXT (t
);
11332 if (DECL_CLASS_SCOPE_P (t
))
11334 ctx
= tsubst_aggr_type (ctx
, args
,
11336 in_decl
, /*entering_scope=*/1);
11337 /* If CTX is unchanged, then T is in fact the
11338 specialization we want. That situation occurs when
11339 referencing a static data member within in its own
11340 class. We can use pointer equality, rather than
11341 same_type_p, because DECL_CONTEXT is always
11343 if (ctx
== DECL_CONTEXT (t
)
11344 /* ... unless T is a member template; in which
11345 case our caller can be willing to create a
11346 specialization of that template represented
11348 && !(DECL_TI_TEMPLATE (t
)
11349 && DECL_MEMBER_TEMPLATE_P (DECL_TI_TEMPLATE (t
))))
11355 tmpl
= DECL_TI_TEMPLATE (t
);
11356 gen_tmpl
= most_general_template (tmpl
);
11357 argvec
= tsubst (DECL_TI_ARGS (t
), args
, complain
, in_decl
);
11358 if (argvec
!= error_mark_node
)
11359 argvec
= (coerce_innermost_template_parms
11360 (DECL_TEMPLATE_PARMS (gen_tmpl
),
11361 argvec
, t
, complain
,
11362 /*all*/true, /*defarg*/true));
11363 if (argvec
== error_mark_node
)
11364 RETURN (error_mark_node
);
11365 hash
= hash_tmpl_and_args (gen_tmpl
, argvec
);
11366 spec
= retrieve_specialization (gen_tmpl
, argvec
, hash
);
11371 /* A local variable. */
11373 /* Subsequent calls to pushdecl will fill this in. */
11375 spec
= retrieve_local_specialization (t
);
11377 /* If we already have the specialization we need, there is
11378 nothing more to do. */
11385 /* Create a new node for the specialization we need. */
11387 if (type
== NULL_TREE
)
11389 if (is_typedef_decl (t
))
11390 type
= DECL_ORIGINAL_TYPE (t
);
11392 type
= TREE_TYPE (t
);
11394 && VAR_HAD_UNKNOWN_BOUND (t
)
11395 && type
!= error_mark_node
)
11396 type
= strip_array_domain (type
);
11397 type
= tsubst (type
, args
, complain
, in_decl
);
11401 /* Even if the original location is out of scope, the
11402 newly substituted one is not. */
11403 DECL_DEAD_FOR_LOCAL (r
) = 0;
11404 DECL_INITIALIZED_P (r
) = 0;
11405 DECL_TEMPLATE_INSTANTIATED (r
) = 0;
11406 if (type
== error_mark_node
)
11407 RETURN (error_mark_node
);
11408 if (TREE_CODE (type
) == FUNCTION_TYPE
)
11410 /* It may seem that this case cannot occur, since:
11415 declares a function, not a variable. However:
11418 template <typename T> void g() { T t; }
11419 template void g<f>();
11421 is an attempt to declare a variable with function
11423 error ("variable %qD has function type",
11424 /* R is not yet sufficiently initialized, so we
11425 just use its name. */
11427 RETURN (error_mark_node
);
11429 type
= complete_type (type
);
11430 /* Wait until cp_finish_decl to set this again, to handle
11431 circular dependency (template/instantiate6.C). */
11432 DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (r
) = 0;
11433 type
= check_var_type (DECL_NAME (r
), type
);
11435 if (DECL_HAS_VALUE_EXPR_P (t
))
11437 tree ve
= DECL_VALUE_EXPR (t
);
11438 ve
= tsubst_expr (ve
, args
, complain
, in_decl
,
11439 /*constant_expression_p=*/false);
11440 if (REFERENCE_REF_P (ve
))
11442 gcc_assert (TREE_CODE (type
) == REFERENCE_TYPE
);
11443 ve
= TREE_OPERAND (ve
, 0);
11445 SET_DECL_VALUE_EXPR (r
, ve
);
11447 if (TREE_STATIC (r
) || DECL_EXTERNAL (r
))
11448 set_decl_tls_model (r
, decl_tls_model (t
));
11450 else if (DECL_SELF_REFERENCE_P (t
))
11451 SET_DECL_SELF_REFERENCE_P (r
);
11452 TREE_TYPE (r
) = type
;
11453 cp_apply_type_quals_to_decl (cp_type_quals (type
), r
);
11454 DECL_CONTEXT (r
) = ctx
;
11455 /* Clear out the mangled name and RTL for the instantiation. */
11456 SET_DECL_ASSEMBLER_NAME (r
, NULL_TREE
);
11457 if (CODE_CONTAINS_STRUCT (TREE_CODE (t
), TS_DECL_WRTL
))
11458 SET_DECL_RTL (r
, NULL
);
11459 /* The initializer must not be expanded until it is required;
11460 see [temp.inst]. */
11461 DECL_INITIAL (r
) = NULL_TREE
;
11462 if (CODE_CONTAINS_STRUCT (TREE_CODE (t
), TS_DECL_WRTL
))
11463 SET_DECL_RTL (r
, NULL
);
11464 DECL_SIZE (r
) = DECL_SIZE_UNIT (r
) = 0;
11467 /* Possibly limit visibility based on template args. */
11468 DECL_VISIBILITY (r
) = VISIBILITY_DEFAULT
;
11469 if (DECL_VISIBILITY_SPECIFIED (t
))
11471 DECL_VISIBILITY_SPECIFIED (r
) = 0;
11472 DECL_ATTRIBUTES (r
)
11473 = remove_attribute ("visibility", DECL_ATTRIBUTES (r
));
11475 determine_visibility (r
);
11480 /* A static data member declaration is always marked
11481 external when it is declared in-class, even if an
11482 initializer is present. We mimic the non-template
11483 processing here. */
11484 DECL_EXTERNAL (r
) = 1;
11485 if (DECL_NAMESPACE_SCOPE_P (t
))
11486 DECL_NOT_REALLY_EXTERN (r
) = 1;
11488 DECL_TEMPLATE_INFO (r
) = build_template_info (tmpl
, argvec
);
11489 SET_DECL_IMPLICIT_INSTANTIATION (r
);
11490 register_specialization (r
, gen_tmpl
, argvec
, false, hash
);
11492 else if (!cp_unevaluated_operand
)
11493 register_local_specialization (r
, t
);
11495 DECL_CHAIN (r
) = NULL_TREE
;
11497 apply_late_template_attributes (&r
, DECL_ATTRIBUTES (r
),
11499 args
, complain
, in_decl
);
11501 /* Preserve a typedef that names a type. */
11502 if (is_typedef_decl (r
))
11504 DECL_ORIGINAL_TYPE (r
) = NULL_TREE
;
11505 set_underlying_type (r
);
11508 layout_decl (r
, 0);
11513 gcc_unreachable ();
11518 /* Restore the file and line information. */
11519 input_location
= saved_loc
;
11524 /* Substitute into the ARG_TYPES of a function type.
11525 If END is a TREE_CHAIN, leave it and any following types
11529 tsubst_arg_types (tree arg_types
,
11532 tsubst_flags_t complain
,
11535 tree remaining_arg_types
;
11536 tree type
= NULL_TREE
;
11538 tree expanded_args
= NULL_TREE
;
11541 if (!arg_types
|| arg_types
== void_list_node
|| arg_types
== end
)
11544 remaining_arg_types
= tsubst_arg_types (TREE_CHAIN (arg_types
),
11545 args
, end
, complain
, in_decl
);
11546 if (remaining_arg_types
== error_mark_node
)
11547 return error_mark_node
;
11549 if (PACK_EXPANSION_P (TREE_VALUE (arg_types
)))
11551 /* For a pack expansion, perform substitution on the
11552 entire expression. Later on, we'll handle the arguments
11554 expanded_args
= tsubst_pack_expansion (TREE_VALUE (arg_types
),
11555 args
, complain
, in_decl
);
11557 if (TREE_CODE (expanded_args
) == TREE_VEC
)
11558 /* So that we'll spin through the parameters, one by one. */
11559 i
= TREE_VEC_LENGTH (expanded_args
);
11562 /* We only partially substituted into the parameter
11563 pack. Our type is TYPE_PACK_EXPANSION. */
11564 type
= expanded_args
;
11565 expanded_args
= NULL_TREE
;
11573 type
= TREE_VEC_ELT (expanded_args
, i
);
11575 type
= tsubst (TREE_VALUE (arg_types
), args
, complain
, in_decl
);
11577 if (type
== error_mark_node
)
11578 return error_mark_node
;
11579 if (VOID_TYPE_P (type
))
11581 if (complain
& tf_error
)
11583 error ("invalid parameter type %qT", type
);
11585 error ("in declaration %q+D", in_decl
);
11587 return error_mark_node
;
11590 if (abstract_virtuals_error_sfinae (ACU_PARM
, type
, complain
))
11591 return error_mark_node
;
11593 /* Do array-to-pointer, function-to-pointer conversion, and ignore
11594 top-level qualifiers as required. */
11595 type
= cv_unqualified (type_decays_to (type
));
11597 /* We do not substitute into default arguments here. The standard
11598 mandates that they be instantiated only when needed, which is
11599 done in build_over_call. */
11600 default_arg
= TREE_PURPOSE (arg_types
);
11602 if (default_arg
&& TREE_CODE (default_arg
) == DEFAULT_ARG
)
11604 /* We've instantiated a template before its default arguments
11605 have been parsed. This can happen for a nested template
11606 class, and is not an error unless we require the default
11607 argument in a call of this function. */
11608 remaining_arg_types
=
11609 tree_cons (default_arg
, type
, remaining_arg_types
);
11610 vec_safe_push (DEFARG_INSTANTIATIONS(default_arg
), remaining_arg_types
);
11613 remaining_arg_types
=
11614 hash_tree_cons (default_arg
, type
, remaining_arg_types
);
11617 return remaining_arg_types
;
11620 /* Substitute into a FUNCTION_TYPE or METHOD_TYPE. This routine does
11621 *not* handle the exception-specification for FNTYPE, because the
11622 initial substitution of explicitly provided template parameters
11623 during argument deduction forbids substitution into the
11624 exception-specification:
11628 All references in the function type of the function template to the
11629 corresponding template parameters are replaced by the specified tem-
11630 plate argument values. If a substitution in a template parameter or
11631 in the function type of the function template results in an invalid
11632 type, type deduction fails. [Note: The equivalent substitution in
11633 exception specifications is done only when the function is instanti-
11634 ated, at which point a program is ill-formed if the substitution
11635 results in an invalid type.] */
11638 tsubst_function_type (tree t
,
11640 tsubst_flags_t complain
,
11644 tree arg_types
= NULL_TREE
;
11647 /* The TYPE_CONTEXT is not used for function/method types. */
11648 gcc_assert (TYPE_CONTEXT (t
) == NULL_TREE
);
11650 /* DR 1227: Mixing immediate and non-immediate contexts in deduction
11652 bool late_return_type_p
= TYPE_HAS_LATE_RETURN_TYPE (t
);
11654 if (late_return_type_p
)
11656 /* Substitute the argument types. */
11657 arg_types
= tsubst_arg_types (TYPE_ARG_TYPES (t
), args
, NULL_TREE
,
11658 complain
, in_decl
);
11659 if (arg_types
== error_mark_node
)
11660 return error_mark_node
;
11662 tree save_ccp
= current_class_ptr
;
11663 tree save_ccr
= current_class_ref
;
11664 tree this_type
= (TREE_CODE (t
) == METHOD_TYPE
11665 ? TREE_TYPE (TREE_VALUE (arg_types
)) : NULL_TREE
);
11666 bool do_inject
= this_type
&& CLASS_TYPE_P (this_type
);
11669 /* DR 1207: 'this' is in scope in the trailing return type. */
11670 inject_this_parameter (this_type
, cp_type_quals (this_type
));
11673 /* Substitute the return type. */
11674 return_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
11678 current_class_ptr
= save_ccp
;
11679 current_class_ref
= save_ccr
;
11683 /* Substitute the return type. */
11684 return_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
11686 if (return_type
== error_mark_node
)
11687 return error_mark_node
;
11688 /* DR 486 clarifies that creation of a function type with an
11689 invalid return type is a deduction failure. */
11690 if (TREE_CODE (return_type
) == ARRAY_TYPE
11691 || TREE_CODE (return_type
) == FUNCTION_TYPE
)
11693 if (complain
& tf_error
)
11695 if (TREE_CODE (return_type
) == ARRAY_TYPE
)
11696 error ("function returning an array");
11698 error ("function returning a function");
11700 return error_mark_node
;
11703 if (abstract_virtuals_error_sfinae (ACU_RETURN
, return_type
, complain
))
11704 return error_mark_node
;
11706 if (!late_return_type_p
)
11708 /* Substitute the argument types. */
11709 arg_types
= tsubst_arg_types (TYPE_ARG_TYPES (t
), args
, NULL_TREE
,
11710 complain
, in_decl
);
11711 if (arg_types
== error_mark_node
)
11712 return error_mark_node
;
11715 /* Construct a new type node and return it. */
11716 if (TREE_CODE (t
) == FUNCTION_TYPE
)
11718 fntype
= build_function_type (return_type
, arg_types
);
11719 fntype
= apply_memfn_quals (fntype
,
11720 type_memfn_quals (t
),
11721 type_memfn_rqual (t
));
11725 tree r
= TREE_TYPE (TREE_VALUE (arg_types
));
11726 /* Don't pick up extra function qualifiers from the basetype. */
11727 r
= cp_build_qualified_type_real (r
, type_memfn_quals (t
), complain
);
11728 if (! MAYBE_CLASS_TYPE_P (r
))
11732 Type deduction may fail for any of the following
11735 -- Attempting to create "pointer to member of T" when T
11736 is not a class type. */
11737 if (complain
& tf_error
)
11738 error ("creating pointer to member function of non-class type %qT",
11740 return error_mark_node
;
11743 fntype
= build_method_type_directly (r
, return_type
,
11744 TREE_CHAIN (arg_types
));
11745 fntype
= build_ref_qualified_type (fntype
, type_memfn_rqual (t
));
11747 fntype
= cp_build_type_attribute_variant (fntype
, TYPE_ATTRIBUTES (t
));
11749 if (late_return_type_p
)
11750 TYPE_HAS_LATE_RETURN_TYPE (fntype
) = 1;
11755 /* FNTYPE is a FUNCTION_TYPE or METHOD_TYPE. Substitute the template
11756 ARGS into that specification, and return the substituted
11757 specification. If there is no specification, return NULL_TREE. */
11760 tsubst_exception_specification (tree fntype
,
11762 tsubst_flags_t complain
,
11769 specs
= TYPE_RAISES_EXCEPTIONS (fntype
);
11770 new_specs
= NULL_TREE
;
11771 if (specs
&& TREE_PURPOSE (specs
))
11773 /* A noexcept-specifier. */
11774 tree expr
= TREE_PURPOSE (specs
);
11775 if (TREE_CODE (expr
) == INTEGER_CST
)
11779 /* Defer instantiation of noexcept-specifiers to avoid
11780 excessive instantiations (c++/49107). */
11781 new_specs
= make_node (DEFERRED_NOEXCEPT
);
11782 if (DEFERRED_NOEXCEPT_SPEC_P (specs
))
11784 /* We already partially instantiated this member template,
11785 so combine the new args with the old. */
11786 DEFERRED_NOEXCEPT_PATTERN (new_specs
)
11787 = DEFERRED_NOEXCEPT_PATTERN (expr
);
11788 DEFERRED_NOEXCEPT_ARGS (new_specs
)
11789 = add_to_template_args (DEFERRED_NOEXCEPT_ARGS (expr
), args
);
11793 DEFERRED_NOEXCEPT_PATTERN (new_specs
) = expr
;
11794 DEFERRED_NOEXCEPT_ARGS (new_specs
) = args
;
11798 new_specs
= tsubst_copy_and_build
11799 (expr
, args
, complain
, in_decl
, /*function_p=*/false,
11800 /*integral_constant_expression_p=*/true);
11801 new_specs
= build_noexcept_spec (new_specs
, complain
);
11805 if (! TREE_VALUE (specs
))
11812 tree expanded_specs
= NULL_TREE
;
11814 if (PACK_EXPANSION_P (TREE_VALUE (specs
)))
11816 /* Expand the pack expansion type. */
11817 expanded_specs
= tsubst_pack_expansion (TREE_VALUE (specs
),
11821 if (expanded_specs
== error_mark_node
)
11822 return error_mark_node
;
11823 else if (TREE_CODE (expanded_specs
) == TREE_VEC
)
11824 len
= TREE_VEC_LENGTH (expanded_specs
);
11827 /* We're substituting into a member template, so
11828 we got a TYPE_PACK_EXPANSION back. Add that
11829 expansion and move on. */
11830 gcc_assert (TREE_CODE (expanded_specs
)
11831 == TYPE_PACK_EXPANSION
);
11832 new_specs
= add_exception_specifier (new_specs
,
11835 specs
= TREE_CHAIN (specs
);
11840 for (i
= 0; i
< len
; ++i
)
11842 if (expanded_specs
)
11843 spec
= TREE_VEC_ELT (expanded_specs
, i
);
11845 spec
= tsubst (TREE_VALUE (specs
), args
, complain
, in_decl
);
11846 if (spec
== error_mark_node
)
11848 new_specs
= add_exception_specifier (new_specs
, spec
,
11852 specs
= TREE_CHAIN (specs
);
11858 /* Take the tree structure T and replace template parameters used
11859 therein with the argument vector ARGS. IN_DECL is an associated
11860 decl for diagnostics. If an error occurs, returns ERROR_MARK_NODE.
11861 Issue error and warning messages under control of COMPLAIN. Note
11862 that we must be relatively non-tolerant of extensions here, in
11863 order to preserve conformance; if we allow substitutions that
11864 should not be allowed, we may allow argument deductions that should
11865 not succeed, and therefore report ambiguous overload situations
11866 where there are none. In theory, we could allow the substitution,
11867 but indicate that it should have failed, and allow our caller to
11868 make sure that the right thing happens, but we don't try to do this
11871 This function is used for dealing with types, decls and the like;
11872 for expressions, use tsubst_expr or tsubst_copy. */
11875 tsubst (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
11877 enum tree_code code
;
11878 tree type
, r
= NULL_TREE
;
11880 if (t
== NULL_TREE
|| t
== error_mark_node
11881 || t
== integer_type_node
11882 || t
== void_type_node
11883 || t
== char_type_node
11884 || t
== unknown_type_node
11885 || TREE_CODE (t
) == NAMESPACE_DECL
11886 || TREE_CODE (t
) == TRANSLATION_UNIT_DECL
)
11890 return tsubst_decl (t
, args
, complain
);
11892 if (args
== NULL_TREE
)
11895 code
= TREE_CODE (t
);
11897 if (code
== IDENTIFIER_NODE
)
11898 type
= IDENTIFIER_TYPE_VALUE (t
);
11900 type
= TREE_TYPE (t
);
11902 gcc_assert (type
!= unknown_type_node
);
11904 /* Reuse typedefs. We need to do this to handle dependent attributes,
11905 such as attribute aligned. */
11907 && typedef_variant_p (t
))
11909 tree decl
= TYPE_NAME (t
);
11911 if (alias_template_specialization_p (t
))
11913 /* DECL represents an alias template and we want to
11915 tree tmpl
= most_general_template (DECL_TI_TEMPLATE (decl
));
11916 tree gen_args
= tsubst (DECL_TI_ARGS (decl
), args
, complain
, in_decl
);
11917 r
= instantiate_alias_template (tmpl
, gen_args
, complain
);
11919 else if (DECL_CLASS_SCOPE_P (decl
)
11920 && CLASSTYPE_TEMPLATE_INFO (DECL_CONTEXT (decl
))
11921 && uses_template_parms (DECL_CONTEXT (decl
)))
11923 tree tmpl
= most_general_template (DECL_TI_TEMPLATE (decl
));
11924 tree gen_args
= tsubst (DECL_TI_ARGS (decl
), args
, complain
, in_decl
);
11925 r
= retrieve_specialization (tmpl
, gen_args
, 0);
11927 else if (DECL_FUNCTION_SCOPE_P (decl
)
11928 && DECL_TEMPLATE_INFO (DECL_CONTEXT (decl
))
11929 && uses_template_parms (DECL_TI_ARGS (DECL_CONTEXT (decl
))))
11930 r
= retrieve_local_specialization (decl
);
11932 /* The typedef is from a non-template context. */
11938 r
= cp_build_qualified_type_real
11939 (r
, cp_type_quals (t
) | cp_type_quals (r
),
11940 complain
| tf_ignore_bad_quals
);
11945 /* We don't have an instantiation yet, so drop the typedef. */
11946 int quals
= cp_type_quals (t
);
11947 t
= DECL_ORIGINAL_TYPE (decl
);
11948 t
= cp_build_qualified_type_real (t
, quals
,
11949 complain
| tf_ignore_bad_quals
);
11954 && code
!= TYPENAME_TYPE
11955 && code
!= TEMPLATE_TYPE_PARM
11956 && code
!= IDENTIFIER_NODE
11957 && code
!= FUNCTION_TYPE
11958 && code
!= METHOD_TYPE
)
11959 type
= tsubst (type
, args
, complain
, in_decl
);
11960 if (type
== error_mark_node
)
11961 return error_mark_node
;
11967 case ENUMERAL_TYPE
:
11968 return tsubst_aggr_type (t
, args
, complain
, in_decl
,
11969 /*entering_scope=*/0);
11972 case IDENTIFIER_NODE
:
11983 if (t
== integer_type_node
)
11986 if (TREE_CODE (TYPE_MIN_VALUE (t
)) == INTEGER_CST
11987 && TREE_CODE (TYPE_MAX_VALUE (t
)) == INTEGER_CST
)
11991 tree max
, omax
= TREE_OPERAND (TYPE_MAX_VALUE (t
), 0);
11993 max
= tsubst_expr (omax
, args
, complain
, in_decl
,
11994 /*integral_constant_expression_p=*/false);
11996 /* Fix up type of the magic NOP_EXPR with TREE_SIDE_EFFECTS if
11998 if (TREE_CODE (max
) == NOP_EXPR
11999 && TREE_SIDE_EFFECTS (omax
)
12000 && !TREE_TYPE (max
))
12001 TREE_TYPE (max
) = TREE_TYPE (TREE_OPERAND (max
, 0));
12003 /* If we're in a partial instantiation, preserve the magic NOP_EXPR
12004 with TREE_SIDE_EFFECTS that indicates this is not an integral
12005 constant expression. */
12006 if (processing_template_decl
12007 && TREE_SIDE_EFFECTS (omax
) && TREE_CODE (omax
) == NOP_EXPR
)
12009 gcc_assert (TREE_CODE (max
) == NOP_EXPR
);
12010 TREE_SIDE_EFFECTS (max
) = 1;
12013 return compute_array_index_type (NULL_TREE
, max
, complain
);
12016 case TEMPLATE_TYPE_PARM
:
12017 case TEMPLATE_TEMPLATE_PARM
:
12018 case BOUND_TEMPLATE_TEMPLATE_PARM
:
12019 case TEMPLATE_PARM_INDEX
:
12024 tree arg
= NULL_TREE
;
12028 gcc_assert (TREE_VEC_LENGTH (args
) > 0);
12029 template_parm_level_and_index (t
, &level
, &idx
);
12031 levels
= TMPL_ARGS_DEPTH (args
);
12032 if (level
<= levels
)
12034 arg
= TMPL_ARG (args
, level
, idx
);
12036 if (arg
&& TREE_CODE (arg
) == ARGUMENT_PACK_SELECT
)
12038 /* See through ARGUMENT_PACK_SELECT arguments. */
12039 arg
= ARGUMENT_PACK_SELECT_ARG (arg
);
12040 /* If the selected argument is an expansion E, that most
12041 likely means we were called from
12042 gen_elem_of_pack_expansion_instantiation during the
12043 substituting of pack an argument pack (which Ith
12044 element is a pack expansion, where I is
12045 ARGUMENT_PACK_SELECT_INDEX) into a pack expansion.
12046 In this case, the Ith element resulting from this
12047 substituting is going to be a pack expansion, which
12048 pattern is the pattern of E. Let's return the
12050 gen_elem_of_pack_expansion_instantiation will
12051 build the resulting pack expansion from it. */
12052 if (PACK_EXPANSION_P (arg
))
12054 /* Make sure we aren't throwing away arg info. */
12055 gcc_assert (!PACK_EXPANSION_EXTRA_ARGS (arg
));
12056 arg
= PACK_EXPANSION_PATTERN (arg
);
12061 if (arg
== error_mark_node
)
12062 return error_mark_node
;
12063 else if (arg
!= NULL_TREE
)
12065 if (ARGUMENT_PACK_P (arg
))
12066 /* If ARG is an argument pack, we don't actually want to
12067 perform a substitution here, because substitutions
12068 for argument packs are only done
12069 element-by-element. We can get to this point when
12070 substituting the type of a non-type template
12071 parameter pack, when that type actually contains
12072 template parameter packs from an outer template, e.g.,
12074 template<typename... Types> struct A {
12075 template<Types... Values> struct B { };
12079 if (code
== TEMPLATE_TYPE_PARM
)
12082 gcc_assert (TYPE_P (arg
));
12084 quals
= cp_type_quals (arg
) | cp_type_quals (t
);
12086 return cp_build_qualified_type_real
12087 (arg
, quals
, complain
| tf_ignore_bad_quals
);
12089 else if (code
== BOUND_TEMPLATE_TEMPLATE_PARM
)
12091 /* We are processing a type constructed from a
12092 template template parameter. */
12093 tree argvec
= tsubst (TYPE_TI_ARGS (t
),
12094 args
, complain
, in_decl
);
12095 if (argvec
== error_mark_node
)
12096 return error_mark_node
;
12098 gcc_assert (TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
12099 || TREE_CODE (arg
) == TEMPLATE_DECL
12100 || TREE_CODE (arg
) == UNBOUND_CLASS_TEMPLATE
);
12102 if (TREE_CODE (arg
) == UNBOUND_CLASS_TEMPLATE
)
12103 /* Consider this code:
12105 template <template <class> class Template>
12107 template <class Arg> using Bind = Template<Arg>;
12110 template <template <class> class Template, class Arg>
12111 using Instantiate = Template<Arg>; //#0
12113 template <template <class> class Template,
12116 Instantiate<Internal<Template>::template Bind,
12119 When #1 is parsed, the
12120 BOUND_TEMPLATE_TEMPLATE_PARM representing the
12121 parameter `Template' in #0 matches the
12122 UNBOUND_CLASS_TEMPLATE representing the argument
12123 `Internal<Template>::template Bind'; We then want
12124 to assemble the type `Bind<Argument>' that can't
12125 be fully created right now, because
12126 `Internal<Template>' not being complete, the Bind
12127 template cannot be looked up in that context. So
12128 we need to "store" `Bind<Argument>' for later
12129 when the context of Bind becomes complete. Let's
12130 store that in a TYPENAME_TYPE. */
12131 return make_typename_type (TYPE_CONTEXT (arg
),
12132 build_nt (TEMPLATE_ID_EXPR
,
12133 TYPE_IDENTIFIER (arg
),
12138 /* We can get a TEMPLATE_TEMPLATE_PARM here when we
12139 are resolving nested-types in the signature of a
12140 member function templates. Otherwise ARG is a
12141 TEMPLATE_DECL and is the real template to be
12143 if (TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
)
12144 arg
= TYPE_NAME (arg
);
12146 r
= lookup_template_class (arg
,
12148 DECL_CONTEXT (arg
),
12149 /*entering_scope=*/0,
12151 return cp_build_qualified_type_real
12152 (r
, cp_type_quals (t
) | cp_type_quals (r
), complain
);
12155 /* TEMPLATE_TEMPLATE_PARM or TEMPLATE_PARM_INDEX. */
12156 return convert_from_reference (unshare_expr (arg
));
12160 /* This can happen during the attempted tsubst'ing in
12161 unify. This means that we don't yet have any information
12162 about the template parameter in question. */
12165 /* Early in template argument deduction substitution, we don't
12166 want to reduce the level of 'auto', or it will be confused
12167 with a normal template parm in subsequent deduction. */
12168 if (is_auto (t
) && (complain
& tf_partial
))
12171 /* If we get here, we must have been looking at a parm for a
12172 more deeply nested template. Make a new version of this
12173 template parameter, but with a lower level. */
12176 case TEMPLATE_TYPE_PARM
:
12177 case TEMPLATE_TEMPLATE_PARM
:
12178 case BOUND_TEMPLATE_TEMPLATE_PARM
:
12179 if (cp_type_quals (t
))
12181 r
= tsubst (TYPE_MAIN_VARIANT (t
), args
, complain
, in_decl
);
12182 r
= cp_build_qualified_type_real
12183 (r
, cp_type_quals (t
),
12184 complain
| (code
== TEMPLATE_TYPE_PARM
12185 ? tf_ignore_bad_quals
: 0));
12190 TEMPLATE_TYPE_PARM_INDEX (r
)
12191 = reduce_template_parm_level (TEMPLATE_TYPE_PARM_INDEX (t
),
12192 r
, levels
, args
, complain
);
12193 TYPE_STUB_DECL (r
) = TYPE_NAME (r
) = TEMPLATE_TYPE_DECL (r
);
12194 TYPE_MAIN_VARIANT (r
) = r
;
12195 TYPE_POINTER_TO (r
) = NULL_TREE
;
12196 TYPE_REFERENCE_TO (r
) = NULL_TREE
;
12198 if (TREE_CODE (r
) == TEMPLATE_TEMPLATE_PARM
)
12199 /* We have reduced the level of the template
12200 template parameter, but not the levels of its
12201 template parameters, so canonical_type_parameter
12202 will not be able to find the canonical template
12203 template parameter for this level. Thus, we
12204 require structural equality checking to compare
12205 TEMPLATE_TEMPLATE_PARMs. */
12206 SET_TYPE_STRUCTURAL_EQUALITY (r
);
12207 else if (TYPE_STRUCTURAL_EQUALITY_P (t
))
12208 SET_TYPE_STRUCTURAL_EQUALITY (r
);
12210 TYPE_CANONICAL (r
) = canonical_type_parameter (r
);
12212 if (code
== BOUND_TEMPLATE_TEMPLATE_PARM
)
12214 tree argvec
= tsubst (TYPE_TI_ARGS (t
), args
,
12215 complain
, in_decl
);
12216 if (argvec
== error_mark_node
)
12217 return error_mark_node
;
12219 TEMPLATE_TEMPLATE_PARM_TEMPLATE_INFO (r
)
12220 = build_template_info (TYPE_TI_TEMPLATE (t
), argvec
);
12225 case TEMPLATE_PARM_INDEX
:
12226 r
= reduce_template_parm_level (t
, type
, levels
, args
, complain
);
12230 gcc_unreachable ();
12238 tree purpose
, value
, chain
;
12240 if (t
== void_list_node
)
12243 purpose
= TREE_PURPOSE (t
);
12246 purpose
= tsubst (purpose
, args
, complain
, in_decl
);
12247 if (purpose
== error_mark_node
)
12248 return error_mark_node
;
12250 value
= TREE_VALUE (t
);
12253 value
= tsubst (value
, args
, complain
, in_decl
);
12254 if (value
== error_mark_node
)
12255 return error_mark_node
;
12257 chain
= TREE_CHAIN (t
);
12258 if (chain
&& chain
!= void_type_node
)
12260 chain
= tsubst (chain
, args
, complain
, in_decl
);
12261 if (chain
== error_mark_node
)
12262 return error_mark_node
;
12264 if (purpose
== TREE_PURPOSE (t
)
12265 && value
== TREE_VALUE (t
)
12266 && chain
== TREE_CHAIN (t
))
12268 return hash_tree_cons (purpose
, value
, chain
);
12272 /* We should never be tsubsting a binfo. */
12273 gcc_unreachable ();
12276 /* A vector of template arguments. */
12277 gcc_assert (!type
);
12278 return tsubst_template_args (t
, args
, complain
, in_decl
);
12281 case REFERENCE_TYPE
:
12283 if (type
== TREE_TYPE (t
) && TREE_CODE (type
) != METHOD_TYPE
)
12288 Type deduction may fail for any of the following
12291 -- Attempting to create a pointer to reference type.
12292 -- Attempting to create a reference to a reference type or
12293 a reference to void.
12295 Core issue 106 says that creating a reference to a reference
12296 during instantiation is no longer a cause for failure. We
12297 only enforce this check in strict C++98 mode. */
12298 if ((TREE_CODE (type
) == REFERENCE_TYPE
12299 && (((cxx_dialect
== cxx98
) && flag_iso
) || code
!= REFERENCE_TYPE
))
12300 || (code
== REFERENCE_TYPE
&& VOID_TYPE_P (type
)))
12302 static location_t last_loc
;
12304 /* We keep track of the last time we issued this error
12305 message to avoid spewing a ton of messages during a
12306 single bad template instantiation. */
12307 if (complain
& tf_error
12308 && last_loc
!= input_location
)
12310 if (VOID_TYPE_P (type
))
12311 error ("forming reference to void");
12312 else if (code
== POINTER_TYPE
)
12313 error ("forming pointer to reference type %qT", type
);
12315 error ("forming reference to reference type %qT", type
);
12316 last_loc
= input_location
;
12319 return error_mark_node
;
12321 else if (TREE_CODE (type
) == FUNCTION_TYPE
12322 && (type_memfn_quals (type
) != TYPE_UNQUALIFIED
12323 || type_memfn_rqual (type
) != REF_QUAL_NONE
))
12325 if (complain
& tf_error
)
12327 if (code
== POINTER_TYPE
)
12328 error ("forming pointer to qualified function type %qT",
12331 error ("forming reference to qualified function type %qT",
12334 return error_mark_node
;
12336 else if (code
== POINTER_TYPE
)
12338 r
= build_pointer_type (type
);
12339 if (TREE_CODE (type
) == METHOD_TYPE
)
12340 r
= build_ptrmemfunc_type (r
);
12342 else if (TREE_CODE (type
) == REFERENCE_TYPE
)
12343 /* In C++0x, during template argument substitution, when there is an
12344 attempt to create a reference to a reference type, reference
12345 collapsing is applied as described in [14.3.1/4 temp.arg.type]:
12347 "If a template-argument for a template-parameter T names a type
12348 that is a reference to a type A, an attempt to create the type
12349 'lvalue reference to cv T' creates the type 'lvalue reference to
12350 A,' while an attempt to create the type type rvalue reference to
12351 cv T' creates the type T"
12353 r
= cp_build_reference_type
12355 TYPE_REF_IS_RVALUE (t
) && TYPE_REF_IS_RVALUE (type
));
12357 r
= cp_build_reference_type (type
, TYPE_REF_IS_RVALUE (t
));
12358 r
= cp_build_qualified_type_real (r
, cp_type_quals (t
), complain
);
12360 if (r
!= error_mark_node
)
12361 /* Will this ever be needed for TYPE_..._TO values? */
12368 r
= tsubst (TYPE_OFFSET_BASETYPE (t
), args
, complain
, in_decl
);
12369 if (r
== error_mark_node
|| !MAYBE_CLASS_TYPE_P (r
))
12373 Type deduction may fail for any of the following
12376 -- Attempting to create "pointer to member of T" when T
12377 is not a class type. */
12378 if (complain
& tf_error
)
12379 error ("creating pointer to member of non-class type %qT", r
);
12380 return error_mark_node
;
12382 if (TREE_CODE (type
) == REFERENCE_TYPE
)
12384 if (complain
& tf_error
)
12385 error ("creating pointer to member reference type %qT", type
);
12386 return error_mark_node
;
12388 if (VOID_TYPE_P (type
))
12390 if (complain
& tf_error
)
12391 error ("creating pointer to member of type void");
12392 return error_mark_node
;
12394 gcc_assert (TREE_CODE (type
) != METHOD_TYPE
);
12395 if (TREE_CODE (type
) == FUNCTION_TYPE
)
12397 /* The type of the implicit object parameter gets its
12398 cv-qualifiers from the FUNCTION_TYPE. */
12401 = build_memfn_type (type
, r
, type_memfn_quals (type
),
12402 type_memfn_rqual (type
));
12403 memptr
= build_ptrmemfunc_type (build_pointer_type (method_type
));
12404 return cp_build_qualified_type_real (memptr
, cp_type_quals (t
),
12408 return cp_build_qualified_type_real (build_ptrmem_type (r
, type
),
12412 case FUNCTION_TYPE
:
12417 fntype
= tsubst_function_type (t
, args
, complain
, in_decl
);
12418 if (fntype
== error_mark_node
)
12419 return error_mark_node
;
12421 /* Substitute the exception specification. */
12422 specs
= tsubst_exception_specification (t
, args
, complain
,
12423 in_decl
, /*defer_ok*/true);
12424 if (specs
== error_mark_node
)
12425 return error_mark_node
;
12427 fntype
= build_exception_variant (fntype
, specs
);
12432 tree domain
= tsubst (TYPE_DOMAIN (t
), args
, complain
, in_decl
);
12433 if (domain
== error_mark_node
)
12434 return error_mark_node
;
12436 /* As an optimization, we avoid regenerating the array type if
12437 it will obviously be the same as T. */
12438 if (type
== TREE_TYPE (t
) && domain
== TYPE_DOMAIN (t
))
12441 /* These checks should match the ones in create_array_type_for_decl.
12445 The deduction may fail for any of the following reasons:
12447 -- Attempting to create an array with an element type that
12448 is void, a function type, or a reference type, or [DR337]
12449 an abstract class type. */
12450 if (VOID_TYPE_P (type
)
12451 || TREE_CODE (type
) == FUNCTION_TYPE
12452 || (TREE_CODE (type
) == ARRAY_TYPE
12453 && TYPE_DOMAIN (type
) == NULL_TREE
)
12454 || TREE_CODE (type
) == REFERENCE_TYPE
)
12456 if (complain
& tf_error
)
12457 error ("creating array of %qT", type
);
12458 return error_mark_node
;
12461 if (abstract_virtuals_error_sfinae (ACU_ARRAY
, type
, complain
))
12462 return error_mark_node
;
12464 r
= build_cplus_array_type (type
, domain
);
12466 if (TYPE_USER_ALIGN (t
))
12468 TYPE_ALIGN (r
) = TYPE_ALIGN (t
);
12469 TYPE_USER_ALIGN (r
) = 1;
12475 case TYPENAME_TYPE
:
12477 tree ctx
= tsubst_aggr_type (TYPE_CONTEXT (t
), args
, complain
,
12478 in_decl
, /*entering_scope=*/1);
12479 tree f
= tsubst_copy (TYPENAME_TYPE_FULLNAME (t
), args
,
12480 complain
, in_decl
);
12482 if (ctx
== error_mark_node
|| f
== error_mark_node
)
12483 return error_mark_node
;
12485 if (!MAYBE_CLASS_TYPE_P (ctx
))
12487 if (complain
& tf_error
)
12488 error ("%qT is not a class, struct, or union type", ctx
);
12489 return error_mark_node
;
12491 else if (!uses_template_parms (ctx
) && !TYPE_BEING_DEFINED (ctx
))
12493 /* Normally, make_typename_type does not require that the CTX
12494 have complete type in order to allow things like:
12496 template <class T> struct S { typename S<T>::X Y; };
12498 But, such constructs have already been resolved by this
12499 point, so here CTX really should have complete type, unless
12500 it's a partial instantiation. */
12501 ctx
= complete_type (ctx
);
12502 if (!COMPLETE_TYPE_P (ctx
))
12504 if (complain
& tf_error
)
12505 cxx_incomplete_type_error (NULL_TREE
, ctx
);
12506 return error_mark_node
;
12510 f
= make_typename_type (ctx
, f
, typename_type
,
12511 complain
| tf_keep_type_decl
);
12512 if (f
== error_mark_node
)
12514 if (TREE_CODE (f
) == TYPE_DECL
)
12516 complain
|= tf_ignore_bad_quals
;
12520 if (TREE_CODE (f
) != TYPENAME_TYPE
)
12522 if (TYPENAME_IS_ENUM_P (t
) && TREE_CODE (f
) != ENUMERAL_TYPE
)
12524 if (complain
& tf_error
)
12525 error ("%qT resolves to %qT, which is not an enumeration type",
12528 return error_mark_node
;
12530 else if (TYPENAME_IS_CLASS_P (t
) && !CLASS_TYPE_P (f
))
12532 if (complain
& tf_error
)
12533 error ("%qT resolves to %qT, which is is not a class type",
12536 return error_mark_node
;
12540 return cp_build_qualified_type_real
12541 (f
, cp_type_quals (f
) | cp_type_quals (t
), complain
);
12544 case UNBOUND_CLASS_TEMPLATE
:
12546 tree ctx
= tsubst_aggr_type (TYPE_CONTEXT (t
), args
, complain
,
12547 in_decl
, /*entering_scope=*/1);
12548 tree name
= TYPE_IDENTIFIER (t
);
12549 tree parm_list
= DECL_TEMPLATE_PARMS (TYPE_NAME (t
));
12551 if (ctx
== error_mark_node
|| name
== error_mark_node
)
12552 return error_mark_node
;
12555 parm_list
= tsubst_template_parms (parm_list
, args
, complain
);
12556 return make_unbound_class_template (ctx
, name
, parm_list
, complain
);
12563 ++cp_unevaluated_operand
;
12564 ++c_inhibit_evaluation_warnings
;
12566 type
= tsubst_expr (TYPEOF_TYPE_EXPR (t
), args
,
12568 /*integral_constant_expression_p=*/false);
12570 --cp_unevaluated_operand
;
12571 --c_inhibit_evaluation_warnings
;
12573 type
= finish_typeof (type
);
12574 return cp_build_qualified_type_real (type
,
12576 | cp_type_quals (type
),
12580 case DECLTYPE_TYPE
:
12584 ++cp_unevaluated_operand
;
12585 ++c_inhibit_evaluation_warnings
;
12587 type
= tsubst_copy_and_build (DECLTYPE_TYPE_EXPR (t
), args
,
12588 complain
|tf_decltype
, in_decl
,
12589 /*function_p*/false,
12590 /*integral_constant_expression*/false);
12592 --cp_unevaluated_operand
;
12593 --c_inhibit_evaluation_warnings
;
12595 if (DECLTYPE_FOR_LAMBDA_CAPTURE (t
))
12596 type
= lambda_capture_field_type (type
,
12597 DECLTYPE_FOR_INIT_CAPTURE (t
));
12598 else if (DECLTYPE_FOR_LAMBDA_PROXY (t
))
12599 type
= lambda_proxy_type (type
);
12602 bool id
= DECLTYPE_TYPE_ID_EXPR_OR_MEMBER_ACCESS_P (t
);
12603 if (id
&& TREE_CODE (DECLTYPE_TYPE_EXPR (t
)) == BIT_NOT_EXPR
12605 /* In a template ~id could be either a complement expression
12606 or an unqualified-id naming a destructor; if instantiating
12607 it produces an expression, it's not an id-expression or
12610 type
= finish_decltype_type (type
, id
, complain
);
12612 return cp_build_qualified_type_real (type
,
12614 | cp_type_quals (type
),
12615 complain
| tf_ignore_bad_quals
);
12618 case UNDERLYING_TYPE
:
12620 tree type
= tsubst (UNDERLYING_TYPE_TYPE (t
), args
,
12621 complain
, in_decl
);
12622 return finish_underlying_type (type
);
12625 case TYPE_ARGUMENT_PACK
:
12626 case NONTYPE_ARGUMENT_PACK
:
12628 tree r
= TYPE_P (t
) ? cxx_make_type (code
) : make_node (code
);
12630 tsubst_template_args (ARGUMENT_PACK_ARGS (t
),
12634 SET_ARGUMENT_PACK_ARGS (r
, packed_out
);
12636 /* For template nontype argument packs, also substitute into
12638 if (code
== NONTYPE_ARGUMENT_PACK
)
12639 TREE_TYPE (r
) = tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
12658 /* We should use one of the expression tsubsts for these codes. */
12659 gcc_unreachable ();
12662 sorry ("use of %qs in template", get_tree_code_name (code
));
12663 return error_mark_node
;
12667 /* Like tsubst_expr for a BASELINK. OBJECT_TYPE, if non-NULL, is the
12668 type of the expression on the left-hand side of the "." or "->"
12672 tsubst_baselink (tree baselink
, tree object_type
,
12673 tree args
, tsubst_flags_t complain
, tree in_decl
)
12676 tree qualifying_scope
;
12679 tree template_args
= 0;
12680 bool template_id_p
= false;
12681 bool qualified
= BASELINK_QUALIFIED_P (baselink
);
12683 /* A baselink indicates a function from a base class. Both the
12684 BASELINK_ACCESS_BINFO and the base class referenced may
12685 indicate bases of the template class, rather than the
12686 instantiated class. In addition, lookups that were not
12687 ambiguous before may be ambiguous now. Therefore, we perform
12688 the lookup again. */
12689 qualifying_scope
= BINFO_TYPE (BASELINK_ACCESS_BINFO (baselink
));
12690 qualifying_scope
= tsubst (qualifying_scope
, args
,
12691 complain
, in_decl
);
12692 fns
= BASELINK_FUNCTIONS (baselink
);
12693 optype
= tsubst (BASELINK_OPTYPE (baselink
), args
, complain
, in_decl
);
12694 if (TREE_CODE (fns
) == TEMPLATE_ID_EXPR
)
12696 template_id_p
= true;
12697 template_args
= TREE_OPERAND (fns
, 1);
12698 fns
= TREE_OPERAND (fns
, 0);
12700 template_args
= tsubst_template_args (template_args
, args
,
12701 complain
, in_decl
);
12703 name
= DECL_NAME (get_first_fn (fns
));
12704 if (IDENTIFIER_TYPENAME_P (name
))
12705 name
= mangle_conv_op_name_for_type (optype
);
12706 baselink
= lookup_fnfields (qualifying_scope
, name
, /*protect=*/1);
12708 return error_mark_node
;
12710 /* If lookup found a single function, mark it as used at this
12711 point. (If it lookup found multiple functions the one selected
12712 later by overload resolution will be marked as used at that
12714 if (BASELINK_P (baselink
))
12715 fns
= BASELINK_FUNCTIONS (baselink
);
12716 if (!template_id_p
&& !really_overloaded_fn (fns
)
12717 && !mark_used (OVL_CURRENT (fns
), complain
) && !(complain
& tf_error
))
12718 return error_mark_node
;
12720 /* Add back the template arguments, if present. */
12721 if (BASELINK_P (baselink
) && template_id_p
)
12722 BASELINK_FUNCTIONS (baselink
)
12723 = build_nt (TEMPLATE_ID_EXPR
,
12724 BASELINK_FUNCTIONS (baselink
),
12726 /* Update the conversion operator type. */
12727 BASELINK_OPTYPE (baselink
) = optype
;
12730 object_type
= current_class_type
;
12733 baselink
= adjust_result_of_qualified_name_lookup (baselink
,
12739 /* Like tsubst_expr for a SCOPE_REF, given by QUALIFIED_ID. DONE is
12740 true if the qualified-id will be a postfix-expression in-and-of
12741 itself; false if more of the postfix-expression follows the
12742 QUALIFIED_ID. ADDRESS_P is true if the qualified-id is the operand
12746 tsubst_qualified_id (tree qualified_id
, tree args
,
12747 tsubst_flags_t complain
, tree in_decl
,
12748 bool done
, bool address_p
)
12754 tree template_args
;
12755 location_t loc
= UNKNOWN_LOCATION
;
12757 gcc_assert (TREE_CODE (qualified_id
) == SCOPE_REF
);
12759 /* Figure out what name to look up. */
12760 name
= TREE_OPERAND (qualified_id
, 1);
12761 if (TREE_CODE (name
) == TEMPLATE_ID_EXPR
)
12763 is_template
= true;
12764 loc
= EXPR_LOCATION (name
);
12765 template_args
= TREE_OPERAND (name
, 1);
12767 template_args
= tsubst_template_args (template_args
, args
,
12768 complain
, in_decl
);
12769 name
= TREE_OPERAND (name
, 0);
12773 is_template
= false;
12774 template_args
= NULL_TREE
;
12777 /* Substitute into the qualifying scope. When there are no ARGS, we
12778 are just trying to simplify a non-dependent expression. In that
12779 case the qualifying scope may be dependent, and, in any case,
12780 substituting will not help. */
12781 scope
= TREE_OPERAND (qualified_id
, 0);
12784 scope
= tsubst (scope
, args
, complain
, in_decl
);
12785 expr
= tsubst_copy (name
, args
, complain
, in_decl
);
12790 if (dependent_scope_p (scope
))
12793 expr
= build_min_nt_loc (loc
, TEMPLATE_ID_EXPR
, expr
, template_args
);
12794 return build_qualified_name (NULL_TREE
, scope
, expr
,
12795 QUALIFIED_NAME_IS_TEMPLATE (qualified_id
));
12798 if (!BASELINK_P (name
) && !DECL_P (expr
))
12800 if (TREE_CODE (expr
) == BIT_NOT_EXPR
)
12802 /* A BIT_NOT_EXPR is used to represent a destructor. */
12803 if (!check_dtor_name (scope
, TREE_OPERAND (expr
, 0)))
12805 error ("qualifying type %qT does not match destructor name ~%qT",
12806 scope
, TREE_OPERAND (expr
, 0));
12807 expr
= error_mark_node
;
12810 expr
= lookup_qualified_name (scope
, complete_dtor_identifier
,
12811 /*is_type_p=*/0, false);
12814 expr
= lookup_qualified_name (scope
, expr
, /*is_type_p=*/0, false);
12815 if (TREE_CODE (TREE_CODE (expr
) == TEMPLATE_DECL
12816 ? DECL_TEMPLATE_RESULT (expr
) : expr
) == TYPE_DECL
)
12818 if (complain
& tf_error
)
12820 error ("dependent-name %qE is parsed as a non-type, but "
12821 "instantiation yields a type", qualified_id
);
12822 inform (input_location
, "say %<typename %E%> if a type is meant", qualified_id
);
12824 return error_mark_node
;
12830 check_accessibility_of_qualified_id (expr
, /*object_type=*/NULL_TREE
,
12832 /* Remember that there was a reference to this entity. */
12833 if (!mark_used (expr
, complain
) && !(complain
& tf_error
))
12834 return error_mark_node
;
12837 if (expr
== error_mark_node
|| TREE_CODE (expr
) == TREE_LIST
)
12839 if (complain
& tf_error
)
12840 qualified_name_lookup_error (scope
,
12841 TREE_OPERAND (qualified_id
, 1),
12842 expr
, input_location
);
12843 return error_mark_node
;
12847 expr
= lookup_template_function (expr
, template_args
);
12849 if (expr
== error_mark_node
&& complain
& tf_error
)
12850 qualified_name_lookup_error (scope
, TREE_OPERAND (qualified_id
, 1),
12851 expr
, input_location
);
12852 else if (TYPE_P (scope
))
12854 expr
= (adjust_result_of_qualified_name_lookup
12855 (expr
, scope
, current_nonlambda_class_type ()));
12856 expr
= (finish_qualified_id_expr
12857 (scope
, expr
, done
, address_p
&& PTRMEM_OK_P (qualified_id
),
12858 QUALIFIED_NAME_IS_TEMPLATE (qualified_id
),
12859 /*template_arg_p=*/false, complain
));
12862 /* Expressions do not generally have reference type. */
12863 if (TREE_CODE (expr
) != SCOPE_REF
12864 /* However, if we're about to form a pointer-to-member, we just
12865 want the referenced member referenced. */
12866 && TREE_CODE (expr
) != OFFSET_REF
)
12867 expr
= convert_from_reference (expr
);
12872 /* tsubst the initializer for a VAR_DECL. INIT is the unsubstituted
12873 initializer, DECL is the substituted VAR_DECL. Other arguments are as
12877 tsubst_init (tree init
, tree decl
, tree args
,
12878 tsubst_flags_t complain
, tree in_decl
)
12883 init
= tsubst_expr (init
, args
, complain
, in_decl
, false);
12887 /* If we had an initializer but it
12888 instantiated to nothing,
12889 value-initialize the object. This will
12890 only occur when the initializer was a
12891 pack expansion where the parameter packs
12892 used in that expansion were of length
12894 init
= build_value_init (TREE_TYPE (decl
),
12896 if (TREE_CODE (init
) == AGGR_INIT_EXPR
)
12897 init
= get_target_expr_sfinae (init
, complain
);
12903 /* Like tsubst, but deals with expressions. This function just replaces
12904 template parms; to finish processing the resultant expression, use
12905 tsubst_copy_and_build or tsubst_expr. */
12908 tsubst_copy (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
12910 enum tree_code code
;
12913 if (t
== NULL_TREE
|| t
== error_mark_node
|| args
== NULL_TREE
)
12916 code
= TREE_CODE (t
);
12921 r
= retrieve_local_specialization (t
);
12923 if (r
== NULL_TREE
)
12925 /* We get here for a use of 'this' in an NSDMI. */
12926 if (DECL_NAME (t
) == this_identifier
12927 && current_function_decl
12928 && DECL_CONSTRUCTOR_P (current_function_decl
))
12929 return current_class_ptr
;
12931 /* This can happen for a parameter name used later in a function
12932 declaration (such as in a late-specified return type). Just
12933 make a dummy decl, since it's only used for its type. */
12934 gcc_assert (cp_unevaluated_operand
!= 0);
12935 r
= tsubst_decl (t
, args
, complain
);
12936 /* Give it the template pattern as its context; its true context
12937 hasn't been instantiated yet and this is good enough for
12939 DECL_CONTEXT (r
) = DECL_CONTEXT (t
);
12942 if (TREE_CODE (r
) == ARGUMENT_PACK_SELECT
)
12943 r
= ARGUMENT_PACK_SELECT_ARG (r
);
12944 if (!mark_used (r
, complain
) && !(complain
& tf_error
))
12945 return error_mark_node
;
12953 if (DECL_TEMPLATE_PARM_P (t
))
12954 return tsubst_copy (DECL_INITIAL (t
), args
, complain
, in_decl
);
12955 /* There is no need to substitute into namespace-scope
12957 if (DECL_NAMESPACE_SCOPE_P (t
))
12959 /* If ARGS is NULL, then T is known to be non-dependent. */
12960 if (args
== NULL_TREE
)
12961 return scalar_constant_value (t
);
12963 /* Unfortunately, we cannot just call lookup_name here.
12966 template <int I> int f() {
12968 struct S { void g() { E e = a; } };
12971 When we instantiate f<7>::S::g(), say, lookup_name is not
12972 clever enough to find f<7>::a. */
12974 = tsubst_aggr_type (DECL_CONTEXT (t
), args
, complain
, in_decl
,
12975 /*entering_scope=*/0);
12977 for (v
= TYPE_VALUES (enum_type
);
12979 v
= TREE_CHAIN (v
))
12980 if (TREE_PURPOSE (v
) == DECL_NAME (t
))
12981 return TREE_VALUE (v
);
12983 /* We didn't find the name. That should never happen; if
12984 name-lookup found it during preliminary parsing, we
12985 should find it again here during instantiation. */
12986 gcc_unreachable ();
12991 if (PACK_EXPANSION_P (TREE_TYPE (t
)))
12993 /* Check for a local specialization set up by
12994 tsubst_pack_expansion. */
12995 if (tree r
= retrieve_local_specialization (t
))
12997 if (TREE_CODE (r
) == ARGUMENT_PACK_SELECT
)
12998 r
= ARGUMENT_PACK_SELECT_ARG (r
);
13002 /* When retrieving a capture pack from a generic lambda, remove the
13003 lambda call op's own template argument list from ARGS. Only the
13004 template arguments active for the closure type should be used to
13005 retrieve the pack specialization. */
13006 if (LAMBDA_FUNCTION_P (current_function_decl
)
13007 && (template_class_depth (DECL_CONTEXT (t
))
13008 != TMPL_ARGS_DEPTH (args
)))
13009 args
= strip_innermost_template_args (args
, 1);
13011 /* Otherwise return the full NONTYPE_ARGUMENT_PACK that
13012 tsubst_decl put in the hash table. */
13013 return retrieve_specialization (t
, args
, 0);
13016 if (DECL_CONTEXT (t
))
13020 ctx
= tsubst_aggr_type (DECL_CONTEXT (t
), args
, complain
, in_decl
,
13021 /*entering_scope=*/1);
13022 if (ctx
!= DECL_CONTEXT (t
))
13024 tree r
= lookup_field (ctx
, DECL_NAME (t
), 0, false);
13027 if (complain
& tf_error
)
13028 error ("using invalid field %qD", t
);
13029 return error_mark_node
;
13038 case FUNCTION_DECL
:
13039 if (DECL_LANG_SPECIFIC (t
) && DECL_TEMPLATE_INFO (t
))
13040 r
= tsubst (t
, args
, complain
, in_decl
);
13041 else if (local_variable_p (t
))
13043 r
= retrieve_local_specialization (t
);
13044 if (r
== NULL_TREE
)
13046 /* First try name lookup to find the instantiation. */
13047 r
= lookup_name (DECL_NAME (t
));
13050 /* Make sure that the one we found is the one we want. */
13051 tree ctx
= tsubst (DECL_CONTEXT (t
), args
,
13052 complain
, in_decl
);
13053 if (ctx
!= DECL_CONTEXT (r
))
13061 /* This can happen for a variable used in a
13062 late-specified return type of a local lambda, or for a
13063 local static or constant. Building a new VAR_DECL
13064 should be OK in all those cases. */
13065 r
= tsubst_decl (t
, args
, complain
);
13066 if (decl_maybe_constant_var_p (r
))
13068 /* We can't call cp_finish_decl, so handle the
13069 initializer by hand. */
13070 tree init
= tsubst_init (DECL_INITIAL (t
), r
, args
,
13071 complain
, in_decl
);
13072 if (!processing_template_decl
)
13073 init
= maybe_constant_init (init
);
13074 if (processing_template_decl
13075 ? potential_constant_expression (init
)
13076 : reduced_constant_expression_p (init
))
13077 DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (r
)
13078 = TREE_CONSTANT (r
) = true;
13079 DECL_INITIAL (r
) = init
;
13081 gcc_assert (cp_unevaluated_operand
|| TREE_STATIC (r
)
13082 || decl_constant_var_p (r
)
13083 || errorcount
|| sorrycount
);
13084 if (!processing_template_decl
)
13086 if (TREE_STATIC (r
))
13087 rest_of_decl_compilation (r
, toplevel_bindings_p (),
13090 r
= process_outer_var_ref (r
, complain
);
13093 /* Remember this for subsequent uses. */
13094 if (local_specializations
)
13095 register_local_specialization (r
, t
);
13100 if (!mark_used (r
, complain
) && !(complain
& tf_error
))
13101 return error_mark_node
;
13104 case NAMESPACE_DECL
:
13108 /* An OVERLOAD will always be a non-dependent overload set; an
13109 overload set from function scope will just be represented with an
13110 IDENTIFIER_NODE, and from class scope with a BASELINK. */
13111 gcc_assert (!uses_template_parms (t
));
13115 return tsubst_baselink (t
, current_nonlambda_class_type (),
13116 args
, complain
, in_decl
);
13118 case TEMPLATE_DECL
:
13119 if (DECL_TEMPLATE_TEMPLATE_PARM_P (t
))
13120 return tsubst (TREE_TYPE (DECL_TEMPLATE_RESULT (t
)),
13121 args
, complain
, in_decl
);
13122 else if (DECL_FUNCTION_TEMPLATE_P (t
) && DECL_MEMBER_TEMPLATE_P (t
))
13123 return tsubst (t
, args
, complain
, in_decl
);
13124 else if (DECL_CLASS_SCOPE_P (t
)
13125 && uses_template_parms (DECL_CONTEXT (t
)))
13127 /* Template template argument like the following example need
13130 template <template <class> class TT> struct C {};
13131 template <class T> struct D {
13132 template <class U> struct E {};
13137 We are processing the template argument `E' in #1 for
13138 the template instantiation #2. Originally, `E' is a
13139 TEMPLATE_DECL with `D<T>' as its DECL_CONTEXT. Now we
13140 have to substitute this with one having context `D<int>'. */
13142 tree context
= tsubst (DECL_CONTEXT (t
), args
, complain
, in_decl
);
13143 return lookup_field (context
, DECL_NAME(t
), 0, false);
13146 /* Ordinary template template argument. */
13150 case REINTERPRET_CAST_EXPR
:
13151 case CONST_CAST_EXPR
:
13152 case STATIC_CAST_EXPR
:
13153 case DYNAMIC_CAST_EXPR
:
13154 case IMPLICIT_CONV_EXPR
:
13158 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13159 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13160 return build1 (code
, type
, op0
);
13164 if (PACK_EXPANSION_P (TREE_OPERAND (t
, 0)))
13167 tree expanded
, op
= TREE_OPERAND (t
, 0);
13170 if (SIZEOF_EXPR_TYPE_P (t
))
13171 op
= TREE_TYPE (op
);
13173 ++cp_unevaluated_operand
;
13174 ++c_inhibit_evaluation_warnings
;
13175 /* We only want to compute the number of arguments. */
13176 expanded
= tsubst_pack_expansion (op
, args
, complain
, in_decl
);
13177 --cp_unevaluated_operand
;
13178 --c_inhibit_evaluation_warnings
;
13180 if (TREE_CODE (expanded
) == TREE_VEC
)
13181 len
= TREE_VEC_LENGTH (expanded
);
13183 if (expanded
== error_mark_node
)
13184 return error_mark_node
;
13185 else if (PACK_EXPANSION_P (expanded
)
13186 || (TREE_CODE (expanded
) == TREE_VEC
13188 && PACK_EXPANSION_P (TREE_VEC_ELT (expanded
, len
-1))))
13190 if (TREE_CODE (expanded
) == TREE_VEC
)
13191 expanded
= TREE_VEC_ELT (expanded
, len
- 1);
13193 if (TYPE_P (expanded
))
13194 return cxx_sizeof_or_alignof_type (expanded
, SIZEOF_EXPR
,
13195 complain
& tf_error
);
13197 return cxx_sizeof_or_alignof_expr (expanded
, SIZEOF_EXPR
,
13198 complain
& tf_error
);
13201 return build_int_cst (size_type_node
, len
);
13203 if (SIZEOF_EXPR_TYPE_P (t
))
13205 r
= tsubst (TREE_TYPE (TREE_OPERAND (t
, 0)),
13206 args
, complain
, in_decl
);
13207 r
= build1 (NOP_EXPR
, r
, error_mark_node
);
13208 r
= build1 (SIZEOF_EXPR
,
13209 tsubst (TREE_TYPE (t
), args
, complain
, in_decl
), r
);
13210 SIZEOF_EXPR_TYPE_P (r
) = 1;
13217 case TRUTH_NOT_EXPR
:
13220 case UNARY_PLUS_EXPR
: /* Unary + */
13222 case AT_ENCODE_EXPR
:
13226 case REALPART_EXPR
:
13227 case IMAGPART_EXPR
:
13230 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13231 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13232 return build1 (code
, type
, op0
);
13235 case COMPONENT_REF
:
13240 object
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13241 name
= TREE_OPERAND (t
, 1);
13242 if (TREE_CODE (name
) == BIT_NOT_EXPR
)
13244 name
= tsubst_copy (TREE_OPERAND (name
, 0), args
,
13245 complain
, in_decl
);
13246 name
= build1 (BIT_NOT_EXPR
, NULL_TREE
, name
);
13248 else if (TREE_CODE (name
) == SCOPE_REF
13249 && TREE_CODE (TREE_OPERAND (name
, 1)) == BIT_NOT_EXPR
)
13251 tree base
= tsubst_copy (TREE_OPERAND (name
, 0), args
,
13252 complain
, in_decl
);
13253 name
= TREE_OPERAND (name
, 1);
13254 name
= tsubst_copy (TREE_OPERAND (name
, 0), args
,
13255 complain
, in_decl
);
13256 name
= build1 (BIT_NOT_EXPR
, NULL_TREE
, name
);
13257 name
= build_qualified_name (/*type=*/NULL_TREE
,
13259 /*template_p=*/false);
13261 else if (BASELINK_P (name
))
13262 name
= tsubst_baselink (name
,
13263 non_reference (TREE_TYPE (object
)),
13267 name
= tsubst_copy (name
, args
, complain
, in_decl
);
13268 return build_nt (COMPONENT_REF
, object
, name
, NULL_TREE
);
13274 case TRUNC_DIV_EXPR
:
13275 case CEIL_DIV_EXPR
:
13276 case FLOOR_DIV_EXPR
:
13277 case ROUND_DIV_EXPR
:
13278 case EXACT_DIV_EXPR
:
13282 case TRUNC_MOD_EXPR
:
13283 case FLOOR_MOD_EXPR
:
13284 case TRUTH_ANDIF_EXPR
:
13285 case TRUTH_ORIF_EXPR
:
13286 case TRUTH_AND_EXPR
:
13287 case TRUTH_OR_EXPR
:
13300 case COMPOUND_EXPR
:
13303 case PREDECREMENT_EXPR
:
13304 case PREINCREMENT_EXPR
:
13305 case POSTDECREMENT_EXPR
:
13306 case POSTINCREMENT_EXPR
:
13308 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13309 tree op1
= tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
);
13310 return build_nt (code
, op0
, op1
);
13315 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13316 tree op1
= tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
);
13317 return build_qualified_name (/*type=*/NULL_TREE
, op0
, op1
,
13318 QUALIFIED_NAME_IS_TEMPLATE (t
));
13323 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13324 tree op1
= tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
);
13325 return build_nt (ARRAY_REF
, op0
, op1
, NULL_TREE
, NULL_TREE
);
13330 int n
= VL_EXP_OPERAND_LENGTH (t
);
13331 tree result
= build_vl_exp (CALL_EXPR
, n
);
13333 for (i
= 0; i
< n
; i
++)
13334 TREE_OPERAND (t
, i
) = tsubst_copy (TREE_OPERAND (t
, i
), args
,
13335 complain
, in_decl
);
13341 case PSEUDO_DTOR_EXPR
:
13342 case VEC_PERM_EXPR
:
13344 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13345 tree op1
= tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
);
13346 tree op2
= tsubst_copy (TREE_OPERAND (t
, 2), args
, complain
, in_decl
);
13347 r
= build_nt (code
, op0
, op1
, op2
);
13348 TREE_NO_WARNING (r
) = TREE_NO_WARNING (t
);
13354 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13355 tree op1
= tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
);
13356 tree op2
= tsubst_copy (TREE_OPERAND (t
, 2), args
, complain
, in_decl
);
13357 r
= build_nt (code
, op0
, op1
, op2
);
13358 NEW_EXPR_USE_GLOBAL (r
) = NEW_EXPR_USE_GLOBAL (t
);
13364 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13365 tree op1
= tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
);
13366 r
= build_nt (code
, op0
, op1
);
13367 DELETE_EXPR_USE_GLOBAL (r
) = DELETE_EXPR_USE_GLOBAL (t
);
13368 DELETE_EXPR_USE_VEC (r
) = DELETE_EXPR_USE_VEC (t
);
13372 case TEMPLATE_ID_EXPR
:
13374 /* Substituted template arguments */
13375 tree fn
= TREE_OPERAND (t
, 0);
13376 tree targs
= TREE_OPERAND (t
, 1);
13378 fn
= tsubst_copy (fn
, args
, complain
, in_decl
);
13380 targs
= tsubst_template_args (targs
, args
, complain
, in_decl
);
13382 return lookup_template_function (fn
, targs
);
13387 tree purpose
, value
, chain
;
13389 if (t
== void_list_node
)
13392 purpose
= TREE_PURPOSE (t
);
13394 purpose
= tsubst_copy (purpose
, args
, complain
, in_decl
);
13395 value
= TREE_VALUE (t
);
13397 value
= tsubst_copy (value
, args
, complain
, in_decl
);
13398 chain
= TREE_CHAIN (t
);
13399 if (chain
&& chain
!= void_type_node
)
13400 chain
= tsubst_copy (chain
, args
, complain
, in_decl
);
13401 if (purpose
== TREE_PURPOSE (t
)
13402 && value
== TREE_VALUE (t
)
13403 && chain
== TREE_CHAIN (t
))
13405 return tree_cons (purpose
, value
, chain
);
13410 case ENUMERAL_TYPE
:
13412 case TEMPLATE_TYPE_PARM
:
13413 case TEMPLATE_TEMPLATE_PARM
:
13414 case BOUND_TEMPLATE_TEMPLATE_PARM
:
13415 case TEMPLATE_PARM_INDEX
:
13417 case REFERENCE_TYPE
:
13419 case FUNCTION_TYPE
:
13422 case TYPENAME_TYPE
:
13423 case UNBOUND_CLASS_TEMPLATE
:
13425 case DECLTYPE_TYPE
:
13427 return tsubst (t
, args
, complain
, in_decl
);
13431 /* Fall through. */
13432 case IDENTIFIER_NODE
:
13433 if (IDENTIFIER_TYPENAME_P (t
))
13435 tree new_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13436 return mangle_conv_op_name_for_type (new_type
);
13442 /* This is handled by tsubst_copy_and_build. */
13443 gcc_unreachable ();
13447 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13448 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13449 return build_x_va_arg (EXPR_LOCATION (t
), op0
, type
);
13452 case CLEANUP_POINT_EXPR
:
13453 /* We shouldn't have built any of these during initial template
13454 generation. Instead, they should be built during instantiation
13455 in response to the saved STMT_IS_FULL_EXPR_P setting. */
13456 gcc_unreachable ();
13460 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13461 tree op0
= tsubst_copy (TREE_OPERAND (t
, 0), args
, complain
, in_decl
);
13462 tree op1
= tsubst_copy (TREE_OPERAND (t
, 1), args
, complain
, in_decl
);
13463 r
= build2 (code
, type
, op0
, op1
);
13464 PTRMEM_OK_P (r
) = PTRMEM_OK_P (t
);
13465 if (!mark_used (TREE_OPERAND (r
, 1), complain
)
13466 && !(complain
& tf_error
))
13467 return error_mark_node
;
13471 case EXPR_PACK_EXPANSION
:
13472 error ("invalid use of pack expansion expression");
13473 return error_mark_node
;
13475 case NONTYPE_ARGUMENT_PACK
:
13476 error ("use %<...%> to expand argument pack");
13477 return error_mark_node
;
13480 gcc_checking_assert (t
== void_node
&& VOID_TYPE_P (TREE_TYPE (t
)));
13488 /* Instantiate any typedefs in the type. */
13489 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
13490 r
= fold_convert (type
, t
);
13491 gcc_assert (TREE_CODE (r
) == code
);
13496 /* These can sometimes show up in a partial instantiation, but never
13497 involve template parms. */
13498 gcc_assert (!uses_template_parms (t
));
13502 /* We shouldn't get here, but keep going if !ENABLE_CHECKING. */
13503 gcc_checking_assert (false);
13508 /* Helper function for tsubst_omp_clauses, used for instantiation of
13509 OMP_CLAUSE_DECL of clauses that handles also OpenMP array sections
13510 represented with TREE_LIST. */
13513 tsubst_omp_clause_decl (tree decl
, tree args
, tsubst_flags_t complain
,
13516 if (TREE_CODE (decl
) == TREE_LIST
)
13519 = tsubst_expr (TREE_PURPOSE (decl
), args
, complain
, in_decl
,
13520 /*integral_constant_expression_p=*/false);
13521 tree length
= tsubst_expr (TREE_VALUE (decl
), args
, complain
, in_decl
,
13522 /*integral_constant_expression_p=*/false);
13523 tree chain
= tsubst_omp_clause_decl (TREE_CHAIN (decl
), args
, complain
,
13525 if (TREE_PURPOSE (decl
) == low_bound
13526 && TREE_VALUE (decl
) == length
13527 && TREE_CHAIN (decl
) == chain
)
13529 return tree_cons (low_bound
, length
, chain
);
13531 return tsubst_copy (decl
, args
, complain
, in_decl
);
13534 /* Like tsubst_copy, but specifically for OpenMP clauses. */
13537 tsubst_omp_clauses (tree clauses
, bool declare_simd
,
13538 tree args
, tsubst_flags_t complain
, tree in_decl
)
13540 tree new_clauses
= NULL
, nc
, oc
;
13542 for (oc
= clauses
; oc
; oc
= OMP_CLAUSE_CHAIN (oc
))
13544 nc
= copy_node (oc
);
13545 OMP_CLAUSE_CHAIN (nc
) = new_clauses
;
13548 switch (OMP_CLAUSE_CODE (nc
))
13550 case OMP_CLAUSE_LASTPRIVATE
:
13551 if (OMP_CLAUSE_LASTPRIVATE_STMT (oc
))
13553 OMP_CLAUSE_LASTPRIVATE_STMT (nc
) = push_stmt_list ();
13554 tsubst_expr (OMP_CLAUSE_LASTPRIVATE_STMT (oc
), args
, complain
,
13555 in_decl
, /*integral_constant_expression_p=*/false);
13556 OMP_CLAUSE_LASTPRIVATE_STMT (nc
)
13557 = pop_stmt_list (OMP_CLAUSE_LASTPRIVATE_STMT (nc
));
13560 case OMP_CLAUSE_PRIVATE
:
13561 case OMP_CLAUSE_SHARED
:
13562 case OMP_CLAUSE_FIRSTPRIVATE
:
13563 case OMP_CLAUSE_COPYIN
:
13564 case OMP_CLAUSE_COPYPRIVATE
:
13565 case OMP_CLAUSE_UNIFORM
:
13566 OMP_CLAUSE_DECL (nc
) = tsubst_copy (OMP_CLAUSE_DECL (oc
), args
,
13567 complain
, in_decl
);
13569 case OMP_CLAUSE_DEPEND
:
13570 case OMP_CLAUSE_FROM
:
13571 case OMP_CLAUSE_TO
:
13572 case OMP_CLAUSE_MAP
:
13573 OMP_CLAUSE_DECL (nc
)
13574 = tsubst_omp_clause_decl (OMP_CLAUSE_DECL (oc
), args
, complain
,
13577 case OMP_CLAUSE_IF
:
13578 case OMP_CLAUSE_NUM_THREADS
:
13579 case OMP_CLAUSE_SCHEDULE
:
13580 case OMP_CLAUSE_COLLAPSE
:
13581 case OMP_CLAUSE_FINAL
:
13582 case OMP_CLAUSE_DEVICE
:
13583 case OMP_CLAUSE_DIST_SCHEDULE
:
13584 case OMP_CLAUSE_NUM_TEAMS
:
13585 case OMP_CLAUSE_THREAD_LIMIT
:
13586 case OMP_CLAUSE_SAFELEN
:
13587 case OMP_CLAUSE_SIMDLEN
:
13588 OMP_CLAUSE_OPERAND (nc
, 0)
13589 = tsubst_expr (OMP_CLAUSE_OPERAND (oc
, 0), args
, complain
,
13590 in_decl
, /*integral_constant_expression_p=*/false);
13592 case OMP_CLAUSE_REDUCTION
:
13593 if (OMP_CLAUSE_REDUCTION_PLACEHOLDER (oc
))
13595 tree placeholder
= OMP_CLAUSE_REDUCTION_PLACEHOLDER (oc
);
13596 if (TREE_CODE (placeholder
) == SCOPE_REF
)
13598 tree scope
= tsubst (TREE_OPERAND (placeholder
, 0), args
,
13599 complain
, in_decl
);
13600 OMP_CLAUSE_REDUCTION_PLACEHOLDER (nc
)
13601 = build_qualified_name (NULL_TREE
, scope
,
13602 TREE_OPERAND (placeholder
, 1),
13606 gcc_assert (identifier_p (placeholder
));
13608 OMP_CLAUSE_DECL (nc
) = tsubst_copy (OMP_CLAUSE_DECL (oc
), args
,
13609 complain
, in_decl
);
13611 case OMP_CLAUSE_LINEAR
:
13612 case OMP_CLAUSE_ALIGNED
:
13613 OMP_CLAUSE_DECL (nc
) = tsubst_copy (OMP_CLAUSE_DECL (oc
), args
,
13614 complain
, in_decl
);
13615 OMP_CLAUSE_OPERAND (nc
, 1)
13616 = tsubst_expr (OMP_CLAUSE_OPERAND (oc
, 1), args
, complain
,
13617 in_decl
, /*integral_constant_expression_p=*/false);
13619 case OMP_CLAUSE_NOWAIT
:
13620 case OMP_CLAUSE_ORDERED
:
13621 case OMP_CLAUSE_DEFAULT
:
13622 case OMP_CLAUSE_UNTIED
:
13623 case OMP_CLAUSE_MERGEABLE
:
13624 case OMP_CLAUSE_INBRANCH
:
13625 case OMP_CLAUSE_NOTINBRANCH
:
13626 case OMP_CLAUSE_PROC_BIND
:
13627 case OMP_CLAUSE_FOR
:
13628 case OMP_CLAUSE_PARALLEL
:
13629 case OMP_CLAUSE_SECTIONS
:
13630 case OMP_CLAUSE_TASKGROUP
:
13633 gcc_unreachable ();
13637 new_clauses
= nreverse (new_clauses
);
13639 new_clauses
= finish_omp_clauses (new_clauses
);
13640 return new_clauses
;
13643 /* Like tsubst_copy_and_build, but unshare TREE_LIST nodes. */
13646 tsubst_copy_asm_operands (tree t
, tree args
, tsubst_flags_t complain
,
13649 #define RECUR(t) tsubst_copy_asm_operands (t, args, complain, in_decl)
13651 tree purpose
, value
, chain
;
13656 if (TREE_CODE (t
) != TREE_LIST
)
13657 return tsubst_copy_and_build (t
, args
, complain
, in_decl
,
13658 /*function_p=*/false,
13659 /*integral_constant_expression_p=*/false);
13661 if (t
== void_list_node
)
13664 purpose
= TREE_PURPOSE (t
);
13666 purpose
= RECUR (purpose
);
13667 value
= TREE_VALUE (t
);
13670 if (TREE_CODE (value
) != LABEL_DECL
)
13671 value
= RECUR (value
);
13674 value
= lookup_label (DECL_NAME (value
));
13675 gcc_assert (TREE_CODE (value
) == LABEL_DECL
);
13676 TREE_USED (value
) = 1;
13679 chain
= TREE_CHAIN (t
);
13680 if (chain
&& chain
!= void_type_node
)
13681 chain
= RECUR (chain
);
13682 return tree_cons (purpose
, value
, chain
);
13686 /* Substitute one OMP_FOR iterator. */
13689 tsubst_omp_for_iterator (tree t
, int i
, tree declv
, tree initv
,
13690 tree condv
, tree incrv
, tree
*clauses
,
13691 tree args
, tsubst_flags_t complain
, tree in_decl
,
13692 bool integral_constant_expression_p
)
13694 #define RECUR(NODE) \
13695 tsubst_expr ((NODE), args, complain, in_decl, \
13696 integral_constant_expression_p)
13697 tree decl
, init
, cond
, incr
;
13699 init
= TREE_VEC_ELT (OMP_FOR_INIT (t
), i
);
13700 gcc_assert (TREE_CODE (init
) == MODIFY_EXPR
);
13701 decl
= TREE_OPERAND (init
, 0);
13702 init
= TREE_OPERAND (init
, 1);
13703 tree decl_expr
= NULL_TREE
;
13704 if (init
&& TREE_CODE (init
) == DECL_EXPR
)
13706 /* We need to jump through some hoops to handle declarations in the
13707 for-init-statement, since we might need to handle auto deduction,
13708 but we need to keep control of initialization. */
13710 init
= DECL_INITIAL (DECL_EXPR_DECL (init
));
13711 decl
= tsubst_decl (decl
, args
, complain
);
13714 decl
= RECUR (decl
);
13715 init
= RECUR (init
);
13717 tree auto_node
= type_uses_auto (TREE_TYPE (decl
));
13718 if (auto_node
&& init
)
13720 = do_auto_deduction (TREE_TYPE (decl
), init
, auto_node
);
13722 gcc_assert (!type_dependent_expression_p (decl
));
13724 if (!CLASS_TYPE_P (TREE_TYPE (decl
)))
13728 /* Declare the variable, but don't let that initialize it. */
13729 tree init_sav
= DECL_INITIAL (DECL_EXPR_DECL (decl_expr
));
13730 DECL_INITIAL (DECL_EXPR_DECL (decl_expr
)) = NULL_TREE
;
13732 DECL_INITIAL (DECL_EXPR_DECL (decl_expr
)) = init_sav
;
13735 cond
= RECUR (TREE_VEC_ELT (OMP_FOR_COND (t
), i
));
13736 incr
= TREE_VEC_ELT (OMP_FOR_INCR (t
), i
);
13737 if (TREE_CODE (incr
) == MODIFY_EXPR
)
13739 tree lhs
= RECUR (TREE_OPERAND (incr
, 0));
13740 tree rhs
= RECUR (TREE_OPERAND (incr
, 1));
13741 incr
= build_x_modify_expr (EXPR_LOCATION (incr
), lhs
,
13742 NOP_EXPR
, rhs
, complain
);
13745 incr
= RECUR (incr
);
13746 TREE_VEC_ELT (declv
, i
) = decl
;
13747 TREE_VEC_ELT (initv
, i
) = init
;
13748 TREE_VEC_ELT (condv
, i
) = cond
;
13749 TREE_VEC_ELT (incrv
, i
) = incr
;
13755 /* Declare and initialize the variable. */
13762 for (c
= *clauses
; c
; c
= OMP_CLAUSE_CHAIN (c
))
13764 if ((OMP_CLAUSE_CODE (c
) == OMP_CLAUSE_PRIVATE
13765 || OMP_CLAUSE_CODE (c
) == OMP_CLAUSE_LASTPRIVATE
)
13766 && OMP_CLAUSE_DECL (c
) == decl
)
13768 else if (OMP_CLAUSE_CODE (c
) == OMP_CLAUSE_FIRSTPRIVATE
13769 && OMP_CLAUSE_DECL (c
) == decl
)
13770 error ("iteration variable %qD should not be firstprivate", decl
);
13771 else if (OMP_CLAUSE_CODE (c
) == OMP_CLAUSE_REDUCTION
13772 && OMP_CLAUSE_DECL (c
) == decl
)
13773 error ("iteration variable %qD should not be reduction", decl
);
13777 c
= build_omp_clause (input_location
, OMP_CLAUSE_PRIVATE
);
13778 OMP_CLAUSE_DECL (c
) = decl
;
13779 c
= finish_omp_clauses (c
);
13782 OMP_CLAUSE_CHAIN (c
) = *clauses
;
13787 cond
= TREE_VEC_ELT (OMP_FOR_COND (t
), i
);
13788 if (COMPARISON_CLASS_P (cond
))
13790 tree op0
= RECUR (TREE_OPERAND (cond
, 0));
13791 tree op1
= RECUR (TREE_OPERAND (cond
, 1));
13792 cond
= build2 (TREE_CODE (cond
), boolean_type_node
, op0
, op1
);
13795 cond
= RECUR (cond
);
13796 incr
= TREE_VEC_ELT (OMP_FOR_INCR (t
), i
);
13797 switch (TREE_CODE (incr
))
13799 case PREINCREMENT_EXPR
:
13800 case PREDECREMENT_EXPR
:
13801 case POSTINCREMENT_EXPR
:
13802 case POSTDECREMENT_EXPR
:
13803 incr
= build2 (TREE_CODE (incr
), TREE_TYPE (decl
),
13804 RECUR (TREE_OPERAND (incr
, 0)), NULL_TREE
);
13807 if (TREE_CODE (TREE_OPERAND (incr
, 1)) == PLUS_EXPR
13808 || TREE_CODE (TREE_OPERAND (incr
, 1)) == MINUS_EXPR
)
13810 tree rhs
= TREE_OPERAND (incr
, 1);
13811 tree lhs
= RECUR (TREE_OPERAND (incr
, 0));
13812 tree rhs0
= RECUR (TREE_OPERAND (rhs
, 0));
13813 tree rhs1
= RECUR (TREE_OPERAND (rhs
, 1));
13814 incr
= build2 (MODIFY_EXPR
, TREE_TYPE (decl
), lhs
,
13815 build2 (TREE_CODE (rhs
), TREE_TYPE (decl
),
13819 incr
= RECUR (incr
);
13822 if (TREE_CODE (TREE_OPERAND (incr
, 1)) == PLUS_EXPR
13823 || TREE_CODE (TREE_OPERAND (incr
, 1)) == MINUS_EXPR
)
13825 tree lhs
= RECUR (TREE_OPERAND (incr
, 0));
13826 incr
= build2 (MODIFY_EXPR
, TREE_TYPE (decl
), lhs
,
13827 build2 (TREE_CODE (TREE_OPERAND (incr
, 1)),
13828 TREE_TYPE (decl
), lhs
,
13829 RECUR (TREE_OPERAND (incr
, 2))));
13831 else if (TREE_CODE (TREE_OPERAND (incr
, 1)) == NOP_EXPR
13832 && (TREE_CODE (TREE_OPERAND (incr
, 2)) == PLUS_EXPR
13833 || (TREE_CODE (TREE_OPERAND (incr
, 2)) == MINUS_EXPR
)))
13835 tree rhs
= TREE_OPERAND (incr
, 2);
13836 tree lhs
= RECUR (TREE_OPERAND (incr
, 0));
13837 tree rhs0
= RECUR (TREE_OPERAND (rhs
, 0));
13838 tree rhs1
= RECUR (TREE_OPERAND (rhs
, 1));
13839 incr
= build2 (MODIFY_EXPR
, TREE_TYPE (decl
), lhs
,
13840 build2 (TREE_CODE (rhs
), TREE_TYPE (decl
),
13844 incr
= RECUR (incr
);
13847 incr
= RECUR (incr
);
13851 TREE_VEC_ELT (declv
, i
) = decl
;
13852 TREE_VEC_ELT (initv
, i
) = init
;
13853 TREE_VEC_ELT (condv
, i
) = cond
;
13854 TREE_VEC_ELT (incrv
, i
) = incr
;
13858 /* Like tsubst_copy for expressions, etc. but also does semantic
13862 tsubst_expr (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
,
13863 bool integral_constant_expression_p
)
13865 #define RETURN(EXP) do { r = (EXP); goto out; } while(0)
13866 #define RECUR(NODE) \
13867 tsubst_expr ((NODE), args, complain, in_decl, \
13868 integral_constant_expression_p)
13874 if (t
== NULL_TREE
|| t
== error_mark_node
)
13877 loc
= input_location
;
13878 if (EXPR_HAS_LOCATION (t
))
13879 input_location
= EXPR_LOCATION (t
);
13880 if (STATEMENT_CODE_P (TREE_CODE (t
)))
13881 current_stmt_tree ()->stmts_are_full_exprs_p
= STMT_IS_FULL_EXPR_P (t
);
13883 switch (TREE_CODE (t
))
13885 case STATEMENT_LIST
:
13887 tree_stmt_iterator i
;
13888 for (i
= tsi_start (t
); !tsi_end_p (i
); tsi_next (&i
))
13889 RECUR (tsi_stmt (i
));
13893 case CTOR_INITIALIZER
:
13894 finish_mem_initializers (tsubst_initializer_list
13895 (TREE_OPERAND (t
, 0), args
));
13899 finish_return_stmt (RECUR (TREE_OPERAND (t
, 0)));
13903 tmp
= RECUR (EXPR_STMT_EXPR (t
));
13904 if (EXPR_STMT_STMT_EXPR_RESULT (t
))
13905 finish_stmt_expr_expr (tmp
, cur_stmt_expr
);
13907 finish_expr_stmt (tmp
);
13911 do_using_directive (USING_STMT_NAMESPACE (t
));
13916 tree decl
, pattern_decl
;
13919 pattern_decl
= decl
= DECL_EXPR_DECL (t
);
13920 if (TREE_CODE (decl
) == LABEL_DECL
)
13921 finish_label_decl (DECL_NAME (decl
));
13922 else if (TREE_CODE (decl
) == USING_DECL
)
13924 tree scope
= USING_DECL_SCOPE (decl
);
13925 tree name
= DECL_NAME (decl
);
13928 scope
= tsubst (scope
, args
, complain
, in_decl
);
13929 decl
= lookup_qualified_name (scope
, name
,
13930 /*is_type_p=*/false,
13931 /*complain=*/false);
13932 if (decl
== error_mark_node
|| TREE_CODE (decl
) == TREE_LIST
)
13933 qualified_name_lookup_error (scope
, name
, decl
, input_location
);
13935 do_local_using_decl (decl
, scope
, name
);
13937 else if (DECL_PACK_P (decl
))
13939 /* Don't build up decls for a variadic capture proxy, we'll
13940 instantiate the elements directly as needed. */
13945 init
= DECL_INITIAL (decl
);
13946 decl
= tsubst (decl
, args
, complain
, in_decl
);
13947 if (decl
!= error_mark_node
)
13949 /* By marking the declaration as instantiated, we avoid
13950 trying to instantiate it. Since instantiate_decl can't
13951 handle local variables, and since we've already done
13952 all that needs to be done, that's the right thing to
13955 DECL_TEMPLATE_INSTANTIATED (decl
) = 1;
13957 && ANON_AGGR_TYPE_P (TREE_TYPE (decl
)))
13958 /* Anonymous aggregates are a special case. */
13959 finish_anon_union (decl
);
13960 else if (is_capture_proxy (DECL_EXPR_DECL (t
)))
13962 DECL_CONTEXT (decl
) = current_function_decl
;
13963 if (DECL_NAME (decl
) == this_identifier
)
13965 tree lam
= DECL_CONTEXT (current_function_decl
);
13966 lam
= CLASSTYPE_LAMBDA_EXPR (lam
);
13967 LAMBDA_EXPR_THIS_CAPTURE (lam
) = decl
;
13969 insert_capture_proxy (decl
);
13971 else if (DECL_IMPLICIT_TYPEDEF_P (t
))
13972 /* We already did a pushtag. */;
13973 else if (TREE_CODE (decl
) == FUNCTION_DECL
13974 && DECL_OMP_DECLARE_REDUCTION_P (decl
)
13975 && DECL_FUNCTION_SCOPE_P (pattern_decl
))
13977 DECL_CONTEXT (decl
) = NULL_TREE
;
13979 DECL_CONTEXT (decl
) = current_function_decl
;
13980 cp_check_omp_declare_reduction (decl
);
13984 int const_init
= false;
13985 maybe_push_decl (decl
);
13987 && DECL_PRETTY_FUNCTION_P (decl
))
13989 /* For __PRETTY_FUNCTION__ we have to adjust the
13991 const char *const name
13992 = cxx_printable_name (current_function_decl
, 2);
13993 init
= cp_fname_init (name
, &TREE_TYPE (decl
));
13996 init
= tsubst_init (init
, decl
, args
, complain
, in_decl
);
13999 const_init
= (DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P
14001 cp_finish_decl (decl
, init
, const_init
, NULL_TREE
, 0);
14010 stmt
= begin_for_stmt (NULL_TREE
, NULL_TREE
);
14011 RECUR (FOR_INIT_STMT (t
));
14012 finish_for_init_stmt (stmt
);
14013 tmp
= RECUR (FOR_COND (t
));
14014 finish_for_cond (tmp
, stmt
, false);
14015 tmp
= RECUR (FOR_EXPR (t
));
14016 finish_for_expr (tmp
, stmt
);
14017 RECUR (FOR_BODY (t
));
14018 finish_for_stmt (stmt
);
14021 case RANGE_FOR_STMT
:
14024 stmt
= begin_for_stmt (NULL_TREE
, NULL_TREE
);
14025 decl
= RANGE_FOR_DECL (t
);
14026 decl
= tsubst (decl
, args
, complain
, in_decl
);
14027 maybe_push_decl (decl
);
14028 expr
= RECUR (RANGE_FOR_EXPR (t
));
14029 stmt
= cp_convert_range_for (stmt
, decl
, expr
, RANGE_FOR_IVDEP (t
));
14030 RECUR (RANGE_FOR_BODY (t
));
14031 finish_for_stmt (stmt
);
14036 stmt
= begin_while_stmt ();
14037 tmp
= RECUR (WHILE_COND (t
));
14038 finish_while_stmt_cond (tmp
, stmt
, false);
14039 RECUR (WHILE_BODY (t
));
14040 finish_while_stmt (stmt
);
14044 stmt
= begin_do_stmt ();
14045 RECUR (DO_BODY (t
));
14046 finish_do_body (stmt
);
14047 tmp
= RECUR (DO_COND (t
));
14048 finish_do_stmt (tmp
, stmt
, false);
14052 stmt
= begin_if_stmt ();
14053 tmp
= RECUR (IF_COND (t
));
14054 finish_if_stmt_cond (tmp
, stmt
);
14055 RECUR (THEN_CLAUSE (t
));
14056 finish_then_clause (stmt
);
14058 if (ELSE_CLAUSE (t
))
14060 begin_else_clause (stmt
);
14061 RECUR (ELSE_CLAUSE (t
));
14062 finish_else_clause (stmt
);
14065 finish_if_stmt (stmt
);
14069 if (BIND_EXPR_BODY_BLOCK (t
))
14070 stmt
= begin_function_body ();
14072 stmt
= begin_compound_stmt (BIND_EXPR_TRY_BLOCK (t
)
14073 ? BCS_TRY_BLOCK
: 0);
14075 RECUR (BIND_EXPR_BODY (t
));
14077 if (BIND_EXPR_BODY_BLOCK (t
))
14078 finish_function_body (stmt
);
14080 finish_compound_stmt (stmt
);
14084 finish_break_stmt ();
14087 case CONTINUE_STMT
:
14088 finish_continue_stmt ();
14092 stmt
= begin_switch_stmt ();
14093 tmp
= RECUR (SWITCH_STMT_COND (t
));
14094 finish_switch_cond (tmp
, stmt
);
14095 RECUR (SWITCH_STMT_BODY (t
));
14096 finish_switch_stmt (stmt
);
14099 case CASE_LABEL_EXPR
:
14101 tree low
= RECUR (CASE_LOW (t
));
14102 tree high
= RECUR (CASE_HIGH (t
));
14103 finish_case_label (EXPR_LOCATION (t
), low
, high
);
14109 tree decl
= LABEL_EXPR_LABEL (t
);
14112 label
= finish_label_stmt (DECL_NAME (decl
));
14113 if (DECL_ATTRIBUTES (decl
) != NULL_TREE
)
14114 cplus_decl_attributes (&label
, DECL_ATTRIBUTES (decl
), 0);
14119 tmp
= GOTO_DESTINATION (t
);
14120 if (TREE_CODE (tmp
) != LABEL_DECL
)
14121 /* Computed goto's must be tsubst'd into. On the other hand,
14122 non-computed gotos must not be; the identifier in question
14123 will have no binding. */
14126 tmp
= DECL_NAME (tmp
);
14127 finish_goto_stmt (tmp
);
14132 tree string
= RECUR (ASM_STRING (t
));
14133 tree outputs
= tsubst_copy_asm_operands (ASM_OUTPUTS (t
), args
,
14134 complain
, in_decl
);
14135 tree inputs
= tsubst_copy_asm_operands (ASM_INPUTS (t
), args
,
14136 complain
, in_decl
);
14137 tree clobbers
= tsubst_copy_asm_operands (ASM_CLOBBERS (t
), args
,
14138 complain
, in_decl
);
14139 tree labels
= tsubst_copy_asm_operands (ASM_LABELS (t
), args
,
14140 complain
, in_decl
);
14141 tmp
= finish_asm_stmt (ASM_VOLATILE_P (t
), string
, outputs
, inputs
,
14143 tree asm_expr
= tmp
;
14144 if (TREE_CODE (asm_expr
) == CLEANUP_POINT_EXPR
)
14145 asm_expr
= TREE_OPERAND (asm_expr
, 0);
14146 ASM_INPUT_P (asm_expr
) = ASM_INPUT_P (t
);
14153 stmt
= begin_try_block ();
14154 RECUR (TRY_STMTS (t
));
14155 finish_cleanup_try_block (stmt
);
14156 finish_cleanup (RECUR (TRY_HANDLERS (t
)), stmt
);
14160 tree compound_stmt
= NULL_TREE
;
14162 if (FN_TRY_BLOCK_P (t
))
14163 stmt
= begin_function_try_block (&compound_stmt
);
14165 stmt
= begin_try_block ();
14167 RECUR (TRY_STMTS (t
));
14169 if (FN_TRY_BLOCK_P (t
))
14170 finish_function_try_block (stmt
);
14172 finish_try_block (stmt
);
14174 RECUR (TRY_HANDLERS (t
));
14175 if (FN_TRY_BLOCK_P (t
))
14176 finish_function_handler_sequence (stmt
, compound_stmt
);
14178 finish_handler_sequence (stmt
);
14184 tree decl
= HANDLER_PARMS (t
);
14188 decl
= tsubst (decl
, args
, complain
, in_decl
);
14189 /* Prevent instantiate_decl from trying to instantiate
14190 this variable. We've already done all that needs to be
14192 if (decl
!= error_mark_node
)
14193 DECL_TEMPLATE_INSTANTIATED (decl
) = 1;
14195 stmt
= begin_handler ();
14196 finish_handler_parms (decl
, stmt
);
14197 RECUR (HANDLER_BODY (t
));
14198 finish_handler (stmt
);
14203 tmp
= tsubst (TREE_TYPE (t
), args
, complain
, NULL_TREE
);
14204 if (CLASS_TYPE_P (tmp
))
14206 /* Local classes are not independent templates; they are
14207 instantiated along with their containing function. And this
14208 way we don't have to deal with pushing out of one local class
14209 to instantiate a member of another local class. */
14211 /* Closures are handled by the LAMBDA_EXPR. */
14212 gcc_assert (!LAMBDA_TYPE_P (TREE_TYPE (t
)));
14213 complete_type (tmp
);
14214 for (fn
= TYPE_METHODS (tmp
); fn
; fn
= DECL_CHAIN (fn
))
14215 if (!DECL_ARTIFICIAL (fn
))
14216 instantiate_decl (fn
, /*defer_ok*/0, /*expl_inst_class*/false);
14220 case STATIC_ASSERT
:
14224 ++c_inhibit_evaluation_warnings
;
14226 tsubst_expr (STATIC_ASSERT_CONDITION (t
),
14229 /*integral_constant_expression_p=*/true);
14230 --c_inhibit_evaluation_warnings
;
14232 finish_static_assert (condition
,
14233 STATIC_ASSERT_MESSAGE (t
),
14234 STATIC_ASSERT_SOURCE_LOCATION (t
),
14235 /*member_p=*/false);
14240 tmp
= tsubst_omp_clauses (OMP_PARALLEL_CLAUSES (t
), false,
14241 args
, complain
, in_decl
);
14242 stmt
= begin_omp_parallel ();
14243 RECUR (OMP_PARALLEL_BODY (t
));
14244 OMP_PARALLEL_COMBINED (finish_omp_parallel (tmp
, stmt
))
14245 = OMP_PARALLEL_COMBINED (t
);
14249 tmp
= tsubst_omp_clauses (OMP_TASK_CLAUSES (t
), false,
14250 args
, complain
, in_decl
);
14251 stmt
= begin_omp_task ();
14252 RECUR (OMP_TASK_BODY (t
));
14253 finish_omp_task (tmp
, stmt
);
14260 case OMP_DISTRIBUTE
:
14262 tree clauses
, body
, pre_body
;
14263 tree declv
= NULL_TREE
, initv
= NULL_TREE
, condv
= NULL_TREE
;
14264 tree incrv
= NULL_TREE
;
14267 clauses
= tsubst_omp_clauses (OMP_FOR_CLAUSES (t
), false,
14268 args
, complain
, in_decl
);
14269 if (OMP_FOR_INIT (t
) != NULL_TREE
)
14271 declv
= make_tree_vec (TREE_VEC_LENGTH (OMP_FOR_INIT (t
)));
14272 initv
= make_tree_vec (TREE_VEC_LENGTH (OMP_FOR_INIT (t
)));
14273 condv
= make_tree_vec (TREE_VEC_LENGTH (OMP_FOR_INIT (t
)));
14274 incrv
= make_tree_vec (TREE_VEC_LENGTH (OMP_FOR_INIT (t
)));
14277 stmt
= begin_omp_structured_block ();
14279 pre_body
= push_stmt_list ();
14280 RECUR (OMP_FOR_PRE_BODY (t
));
14281 pre_body
= pop_stmt_list (pre_body
);
14283 if (OMP_FOR_INIT (t
) != NULL_TREE
)
14284 for (i
= 0; i
< TREE_VEC_LENGTH (OMP_FOR_INIT (t
)); i
++)
14285 tsubst_omp_for_iterator (t
, i
, declv
, initv
, condv
, incrv
,
14286 &clauses
, args
, complain
, in_decl
,
14287 integral_constant_expression_p
);
14289 body
= push_stmt_list ();
14290 RECUR (OMP_FOR_BODY (t
));
14291 body
= pop_stmt_list (body
);
14293 if (OMP_FOR_INIT (t
) != NULL_TREE
)
14294 t
= finish_omp_for (EXPR_LOCATION (t
), TREE_CODE (t
), declv
, initv
,
14295 condv
, incrv
, body
, pre_body
, clauses
);
14298 t
= make_node (TREE_CODE (t
));
14299 TREE_TYPE (t
) = void_type_node
;
14300 OMP_FOR_BODY (t
) = body
;
14301 OMP_FOR_PRE_BODY (t
) = pre_body
;
14302 OMP_FOR_CLAUSES (t
) = clauses
;
14303 SET_EXPR_LOCATION (t
, EXPR_LOCATION (t
));
14307 add_stmt (finish_omp_structured_block (stmt
));
14314 tmp
= tsubst_omp_clauses (OMP_CLAUSES (t
), false,
14315 args
, complain
, in_decl
);
14316 stmt
= push_stmt_list ();
14317 RECUR (OMP_BODY (t
));
14318 stmt
= pop_stmt_list (stmt
);
14321 OMP_BODY (t
) = stmt
;
14322 OMP_CLAUSES (t
) = tmp
;
14326 case OMP_TARGET_DATA
:
14328 tmp
= tsubst_omp_clauses (OMP_CLAUSES (t
), false,
14329 args
, complain
, in_decl
);
14330 keep_next_level (true);
14331 stmt
= begin_omp_structured_block ();
14333 RECUR (OMP_BODY (t
));
14334 stmt
= finish_omp_structured_block (stmt
);
14337 OMP_BODY (t
) = stmt
;
14338 OMP_CLAUSES (t
) = tmp
;
14342 case OMP_TARGET_UPDATE
:
14343 tmp
= tsubst_omp_clauses (OMP_TARGET_UPDATE_CLAUSES (t
), false,
14344 args
, complain
, in_decl
);
14346 OMP_TARGET_UPDATE_CLAUSES (t
) = tmp
;
14353 case OMP_TASKGROUP
:
14355 stmt
= push_stmt_list ();
14356 RECUR (OMP_BODY (t
));
14357 stmt
= pop_stmt_list (stmt
);
14360 OMP_BODY (t
) = stmt
;
14365 gcc_assert (OMP_ATOMIC_DEPENDENT_P (t
));
14366 if (TREE_CODE (TREE_OPERAND (t
, 1)) != MODIFY_EXPR
)
14368 tree op1
= TREE_OPERAND (t
, 1);
14369 tree rhs1
= NULL_TREE
;
14371 if (TREE_CODE (op1
) == COMPOUND_EXPR
)
14373 rhs1
= RECUR (TREE_OPERAND (op1
, 0));
14374 op1
= TREE_OPERAND (op1
, 1);
14376 lhs
= RECUR (TREE_OPERAND (op1
, 0));
14377 rhs
= RECUR (TREE_OPERAND (op1
, 1));
14378 finish_omp_atomic (OMP_ATOMIC
, TREE_CODE (op1
), lhs
, rhs
,
14379 NULL_TREE
, NULL_TREE
, rhs1
,
14380 OMP_ATOMIC_SEQ_CST (t
));
14384 tree op1
= TREE_OPERAND (t
, 1);
14385 tree v
= NULL_TREE
, lhs
, rhs
= NULL_TREE
, lhs1
= NULL_TREE
;
14386 tree rhs1
= NULL_TREE
;
14387 enum tree_code code
= TREE_CODE (TREE_OPERAND (op1
, 1));
14388 enum tree_code opcode
= NOP_EXPR
;
14389 if (code
== OMP_ATOMIC_READ
)
14391 v
= RECUR (TREE_OPERAND (op1
, 0));
14392 lhs
= RECUR (TREE_OPERAND (TREE_OPERAND (op1
, 1), 0));
14394 else if (code
== OMP_ATOMIC_CAPTURE_OLD
14395 || code
== OMP_ATOMIC_CAPTURE_NEW
)
14397 tree op11
= TREE_OPERAND (TREE_OPERAND (op1
, 1), 1);
14398 v
= RECUR (TREE_OPERAND (op1
, 0));
14399 lhs1
= RECUR (TREE_OPERAND (TREE_OPERAND (op1
, 1), 0));
14400 if (TREE_CODE (op11
) == COMPOUND_EXPR
)
14402 rhs1
= RECUR (TREE_OPERAND (op11
, 0));
14403 op11
= TREE_OPERAND (op11
, 1);
14405 lhs
= RECUR (TREE_OPERAND (op11
, 0));
14406 rhs
= RECUR (TREE_OPERAND (op11
, 1));
14407 opcode
= TREE_CODE (op11
);
14408 if (opcode
== MODIFY_EXPR
)
14414 lhs
= RECUR (TREE_OPERAND (op1
, 0));
14415 rhs
= RECUR (TREE_OPERAND (op1
, 1));
14417 finish_omp_atomic (code
, opcode
, lhs
, rhs
, v
, lhs1
, rhs1
,
14418 OMP_ATOMIC_SEQ_CST (t
));
14422 case TRANSACTION_EXPR
:
14425 flags
|= (TRANSACTION_EXPR_OUTER (t
) ? TM_STMT_ATTR_OUTER
: 0);
14426 flags
|= (TRANSACTION_EXPR_RELAXED (t
) ? TM_STMT_ATTR_RELAXED
: 0);
14428 if (TRANSACTION_EXPR_IS_STMT (t
))
14430 tree body
= TRANSACTION_EXPR_BODY (t
);
14431 tree noex
= NULL_TREE
;
14432 if (TREE_CODE (body
) == MUST_NOT_THROW_EXPR
)
14434 noex
= MUST_NOT_THROW_COND (body
);
14435 if (noex
== NULL_TREE
)
14436 noex
= boolean_true_node
;
14437 body
= TREE_OPERAND (body
, 0);
14439 stmt
= begin_transaction_stmt (input_location
, NULL
, flags
);
14441 finish_transaction_stmt (stmt
, NULL
, flags
, RECUR (noex
));
14445 stmt
= build_transaction_expr (EXPR_LOCATION (t
),
14446 RECUR (TRANSACTION_EXPR_BODY (t
)),
14453 case MUST_NOT_THROW_EXPR
:
14455 tree op0
= RECUR (TREE_OPERAND (t
, 0));
14456 tree cond
= RECUR (MUST_NOT_THROW_COND (t
));
14457 RETURN (build_must_not_throw_expr (op0
, cond
));
14460 case EXPR_PACK_EXPANSION
:
14461 error ("invalid use of pack expansion expression");
14462 RETURN (error_mark_node
);
14464 case NONTYPE_ARGUMENT_PACK
:
14465 error ("use %<...%> to expand argument pack");
14466 RETURN (error_mark_node
);
14468 case CILK_SPAWN_STMT
:
14469 cfun
->calls_cilk_spawn
= 1;
14470 RETURN (build_cilk_spawn (EXPR_LOCATION (t
), RECUR (CILK_SPAWN_FN (t
))));
14472 case CILK_SYNC_STMT
:
14473 RETURN (build_cilk_sync ());
14475 case COMPOUND_EXPR
:
14476 tmp
= RECUR (TREE_OPERAND (t
, 0));
14477 if (tmp
== NULL_TREE
)
14478 /* If the first operand was a statement, we're done with it. */
14479 RETURN (RECUR (TREE_OPERAND (t
, 1)));
14480 RETURN (build_x_compound_expr (EXPR_LOCATION (t
), tmp
,
14481 RECUR (TREE_OPERAND (t
, 1)),
14484 case ANNOTATE_EXPR
:
14485 tmp
= RECUR (TREE_OPERAND (t
, 0));
14486 RETURN (build2_loc (EXPR_LOCATION (t
), ANNOTATE_EXPR
,
14487 TREE_TYPE (tmp
), tmp
, RECUR (TREE_OPERAND (t
, 1))));
14490 gcc_assert (!STATEMENT_CODE_P (TREE_CODE (t
)));
14492 RETURN (tsubst_copy_and_build (t
, args
, complain
, in_decl
,
14493 /*function_p=*/false,
14494 integral_constant_expression_p
));
14497 RETURN (NULL_TREE
);
14499 input_location
= loc
;
14505 /* Instantiate the special body of the artificial DECL_OMP_DECLARE_REDUCTION
14506 function. For description of the body see comment above
14507 cp_parser_omp_declare_reduction_exprs. */
14510 tsubst_omp_udr (tree t
, tree args
, tsubst_flags_t complain
, tree in_decl
)
14512 if (t
== NULL_TREE
|| t
== error_mark_node
)
14515 gcc_assert (TREE_CODE (t
) == STATEMENT_LIST
);
14517 tree_stmt_iterator tsi
;
14520 memset (stmts
, 0, sizeof stmts
);
14521 for (i
= 0, tsi
= tsi_start (t
);
14522 i
< 7 && !tsi_end_p (tsi
);
14523 i
++, tsi_next (&tsi
))
14524 stmts
[i
] = tsi_stmt (tsi
);
14525 gcc_assert (tsi_end_p (tsi
));
14529 gcc_assert (TREE_CODE (stmts
[0]) == DECL_EXPR
14530 && TREE_CODE (stmts
[1]) == DECL_EXPR
);
14531 tree omp_out
= tsubst (DECL_EXPR_DECL (stmts
[0]),
14532 args
, complain
, in_decl
);
14533 tree omp_in
= tsubst (DECL_EXPR_DECL (stmts
[1]),
14534 args
, complain
, in_decl
);
14535 DECL_CONTEXT (omp_out
) = current_function_decl
;
14536 DECL_CONTEXT (omp_in
) = current_function_decl
;
14537 keep_next_level (true);
14538 tree block
= begin_omp_structured_block ();
14539 tsubst_expr (stmts
[2], args
, complain
, in_decl
, false);
14540 block
= finish_omp_structured_block (block
);
14541 block
= maybe_cleanup_point_expr_void (block
);
14542 add_decl_expr (omp_out
);
14543 if (TREE_NO_WARNING (DECL_EXPR_DECL (stmts
[0])))
14544 TREE_NO_WARNING (omp_out
) = 1;
14545 add_decl_expr (omp_in
);
14546 finish_expr_stmt (block
);
14550 gcc_assert (TREE_CODE (stmts
[3]) == DECL_EXPR
14551 && TREE_CODE (stmts
[4]) == DECL_EXPR
);
14552 tree omp_priv
= tsubst (DECL_EXPR_DECL (stmts
[3]),
14553 args
, complain
, in_decl
);
14554 tree omp_orig
= tsubst (DECL_EXPR_DECL (stmts
[4]),
14555 args
, complain
, in_decl
);
14556 DECL_CONTEXT (omp_priv
) = current_function_decl
;
14557 DECL_CONTEXT (omp_orig
) = current_function_decl
;
14558 keep_next_level (true);
14559 tree block
= begin_omp_structured_block ();
14560 tsubst_expr (stmts
[5], args
, complain
, in_decl
, false);
14561 block
= finish_omp_structured_block (block
);
14562 block
= maybe_cleanup_point_expr_void (block
);
14563 cp_walk_tree (&block
, cp_remove_omp_priv_cleanup_stmt
, omp_priv
, NULL
);
14564 add_decl_expr (omp_priv
);
14565 add_decl_expr (omp_orig
);
14566 finish_expr_stmt (block
);
14568 add_decl_expr (omp_orig
);
14572 /* T is a postfix-expression that is not being used in a function
14573 call. Return the substituted version of T. */
14576 tsubst_non_call_postfix_expression (tree t
, tree args
,
14577 tsubst_flags_t complain
,
14580 if (TREE_CODE (t
) == SCOPE_REF
)
14581 t
= tsubst_qualified_id (t
, args
, complain
, in_decl
,
14582 /*done=*/false, /*address_p=*/false);
14584 t
= tsubst_copy_and_build (t
, args
, complain
, in_decl
,
14585 /*function_p=*/false,
14586 /*integral_constant_expression_p=*/false);
14591 /* Like tsubst but deals with expressions and performs semantic
14592 analysis. FUNCTION_P is true if T is the "F" in "F (ARGS)". */
14595 tsubst_copy_and_build (tree t
,
14597 tsubst_flags_t complain
,
14600 bool integral_constant_expression_p
)
14602 #define RETURN(EXP) do { retval = (EXP); goto out; } while(0)
14603 #define RECUR(NODE) \
14604 tsubst_copy_and_build (NODE, args, complain, in_decl, \
14605 /*function_p=*/false, \
14606 integral_constant_expression_p)
14611 if (t
== NULL_TREE
|| t
== error_mark_node
)
14614 loc
= input_location
;
14615 if (EXPR_HAS_LOCATION (t
))
14616 input_location
= EXPR_LOCATION (t
);
14618 /* N3276 decltype magic only applies to calls at the top level or on the
14619 right side of a comma. */
14620 tsubst_flags_t decltype_flag
= (complain
& tf_decltype
);
14621 complain
&= ~tf_decltype
;
14623 switch (TREE_CODE (t
))
14627 /* Fall through. */
14628 case IDENTIFIER_NODE
:
14632 bool non_integral_constant_expression_p
;
14633 const char *error_msg
;
14635 if (IDENTIFIER_TYPENAME_P (t
))
14637 tree new_type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
14638 t
= mangle_conv_op_name_for_type (new_type
);
14641 /* Look up the name. */
14642 decl
= lookup_name (t
);
14644 /* By convention, expressions use ERROR_MARK_NODE to indicate
14645 failure, not NULL_TREE. */
14646 if (decl
== NULL_TREE
)
14647 decl
= error_mark_node
;
14649 decl
= finish_id_expression (t
, decl
, NULL_TREE
,
14651 integral_constant_expression_p
,
14652 /*allow_non_integral_constant_expression_p=*/(cxx_dialect
>= cxx11
),
14653 &non_integral_constant_expression_p
,
14654 /*template_p=*/false,
14656 /*address_p=*/false,
14657 /*template_arg_p=*/false,
14662 if (!function_p
&& identifier_p (decl
))
14664 if (complain
& tf_error
)
14665 unqualified_name_lookup_error (decl
);
14666 decl
= error_mark_node
;
14671 case TEMPLATE_ID_EXPR
:
14674 tree templ
= RECUR (TREE_OPERAND (t
, 0));
14675 tree targs
= TREE_OPERAND (t
, 1);
14678 targs
= tsubst_template_args (targs
, args
, complain
, in_decl
);
14680 if (TREE_CODE (templ
) == COMPONENT_REF
)
14682 object
= TREE_OPERAND (templ
, 0);
14683 templ
= TREE_OPERAND (templ
, 1);
14686 object
= NULL_TREE
;
14687 templ
= lookup_template_function (templ
, targs
);
14690 RETURN (build3 (COMPONENT_REF
, TREE_TYPE (templ
),
14691 object
, templ
, NULL_TREE
));
14693 RETURN (baselink_for_fns (templ
));
14698 tree r
= RECUR (TREE_OPERAND (t
, 0));
14700 if (REFERENCE_REF_P (t
))
14702 /* A type conversion to reference type will be enclosed in
14703 such an indirect ref, but the substitution of the cast
14704 will have also added such an indirect ref. */
14705 if (TREE_CODE (TREE_TYPE (r
)) == REFERENCE_TYPE
)
14706 r
= convert_from_reference (r
);
14709 r
= build_x_indirect_ref (input_location
, r
, RO_UNARY_STAR
,
14710 complain
|decltype_flag
);
14716 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
14717 tree op0
= RECUR (TREE_OPERAND (t
, 0));
14718 RETURN (build_nop (type
, op0
));
14721 case IMPLICIT_CONV_EXPR
:
14723 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
14724 tree expr
= RECUR (TREE_OPERAND (t
, 0));
14725 int flags
= LOOKUP_IMPLICIT
;
14726 if (IMPLICIT_CONV_EXPR_DIRECT_INIT (t
))
14727 flags
= LOOKUP_NORMAL
;
14728 RETURN (perform_implicit_conversion_flags (type
, expr
, complain
,
14734 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
14735 tree op0
= RECUR (TREE_OPERAND (t
, 0));
14736 RETURN (build1 (CONVERT_EXPR
, type
, op0
));
14740 case REINTERPRET_CAST_EXPR
:
14741 case CONST_CAST_EXPR
:
14742 case DYNAMIC_CAST_EXPR
:
14743 case STATIC_CAST_EXPR
:
14746 tree op
, r
= NULL_TREE
;
14748 type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
14749 if (integral_constant_expression_p
14750 && !cast_valid_in_integral_constant_expression_p (type
))
14752 if (complain
& tf_error
)
14753 error ("a cast to a type other than an integral or "
14754 "enumeration type cannot appear in a constant-expression");
14755 RETURN (error_mark_node
);
14758 op
= RECUR (TREE_OPERAND (t
, 0));
14760 warning_sentinel
s(warn_useless_cast
);
14761 switch (TREE_CODE (t
))
14764 r
= build_functional_cast (type
, op
, complain
);
14766 case REINTERPRET_CAST_EXPR
:
14767 r
= build_reinterpret_cast (type
, op
, complain
);
14769 case CONST_CAST_EXPR
:
14770 r
= build_const_cast (type
, op
, complain
);
14772 case DYNAMIC_CAST_EXPR
:
14773 r
= build_dynamic_cast (type
, op
, complain
);
14775 case STATIC_CAST_EXPR
:
14776 r
= build_static_cast (type
, op
, complain
);
14779 gcc_unreachable ();
14785 case POSTDECREMENT_EXPR
:
14786 case POSTINCREMENT_EXPR
:
14787 op1
= tsubst_non_call_postfix_expression (TREE_OPERAND (t
, 0),
14788 args
, complain
, in_decl
);
14789 RETURN (build_x_unary_op (input_location
, TREE_CODE (t
), op1
,
14790 complain
|decltype_flag
));
14792 case PREDECREMENT_EXPR
:
14793 case PREINCREMENT_EXPR
:
14797 case TRUTH_NOT_EXPR
:
14798 case UNARY_PLUS_EXPR
: /* Unary + */
14799 case REALPART_EXPR
:
14800 case IMAGPART_EXPR
:
14801 RETURN (build_x_unary_op (input_location
, TREE_CODE (t
),
14802 RECUR (TREE_OPERAND (t
, 0)),
14803 complain
|decltype_flag
));
14805 case FIX_TRUNC_EXPR
:
14806 RETURN (cp_build_unary_op (FIX_TRUNC_EXPR
, RECUR (TREE_OPERAND (t
, 0)),
14810 op1
= TREE_OPERAND (t
, 0);
14811 if (TREE_CODE (op1
) == LABEL_DECL
)
14812 RETURN (finish_label_address_expr (DECL_NAME (op1
),
14813 EXPR_LOCATION (op1
)));
14814 if (TREE_CODE (op1
) == SCOPE_REF
)
14815 op1
= tsubst_qualified_id (op1
, args
, complain
, in_decl
,
14816 /*done=*/true, /*address_p=*/true);
14818 op1
= tsubst_non_call_postfix_expression (op1
, args
, complain
,
14820 RETURN (build_x_unary_op (input_location
, ADDR_EXPR
, op1
,
14821 complain
|decltype_flag
));
14826 case TRUNC_DIV_EXPR
:
14827 case CEIL_DIV_EXPR
:
14828 case FLOOR_DIV_EXPR
:
14829 case ROUND_DIV_EXPR
:
14830 case EXACT_DIV_EXPR
:
14834 case TRUNC_MOD_EXPR
:
14835 case FLOOR_MOD_EXPR
:
14836 case TRUTH_ANDIF_EXPR
:
14837 case TRUTH_ORIF_EXPR
:
14838 case TRUTH_AND_EXPR
:
14839 case TRUTH_OR_EXPR
:
14855 warning_sentinel
s1(warn_type_limits
);
14856 warning_sentinel
s2(warn_div_by_zero
);
14857 tree op0
= RECUR (TREE_OPERAND (t
, 0));
14858 tree op1
= RECUR (TREE_OPERAND (t
, 1));
14859 tree r
= build_x_binary_op
14860 (input_location
, TREE_CODE (t
),
14862 (TREE_NO_WARNING (TREE_OPERAND (t
, 0))
14864 : TREE_CODE (TREE_OPERAND (t
, 0))),
14866 (TREE_NO_WARNING (TREE_OPERAND (t
, 1))
14868 : TREE_CODE (TREE_OPERAND (t
, 1))),
14870 complain
|decltype_flag
);
14871 if (EXPR_P (r
) && TREE_NO_WARNING (t
))
14872 TREE_NO_WARNING (r
) = TREE_NO_WARNING (t
);
14877 case POINTER_PLUS_EXPR
:
14879 tree op0
= RECUR (TREE_OPERAND (t
, 0));
14880 tree op1
= RECUR (TREE_OPERAND (t
, 1));
14881 return fold_build_pointer_plus (op0
, op1
);
14885 RETURN (tsubst_qualified_id (t
, args
, complain
, in_decl
, /*done=*/true,
14886 /*address_p=*/false));
14888 op1
= tsubst_non_call_postfix_expression (TREE_OPERAND (t
, 0),
14889 args
, complain
, in_decl
);
14890 RETURN (build_x_array_ref (EXPR_LOCATION (t
), op1
,
14891 RECUR (TREE_OPERAND (t
, 1)),
14892 complain
|decltype_flag
));
14894 case ARRAY_NOTATION_REF
:
14896 tree start_index
, length
, stride
;
14897 op1
= tsubst_non_call_postfix_expression (ARRAY_NOTATION_ARRAY (t
),
14898 args
, complain
, in_decl
);
14899 start_index
= RECUR (ARRAY_NOTATION_START (t
));
14900 length
= RECUR (ARRAY_NOTATION_LENGTH (t
));
14901 stride
= RECUR (ARRAY_NOTATION_STRIDE (t
));
14902 RETURN (build_array_notation_ref (EXPR_LOCATION (t
), op1
, start_index
,
14903 length
, stride
, TREE_TYPE (op1
)));
14906 if (PACK_EXPANSION_P (TREE_OPERAND (t
, 0)))
14907 RETURN (tsubst_copy (t
, args
, complain
, in_decl
));
14914 op1
= TREE_OPERAND (t
, 0);
14915 if (TREE_CODE (t
) == SIZEOF_EXPR
&& SIZEOF_EXPR_TYPE_P (t
))
14916 op1
= TREE_TYPE (op1
);
14919 /* When there are no ARGS, we are trying to evaluate a
14920 non-dependent expression from the parser. Trying to do
14921 the substitutions may not work. */
14923 op1
= TREE_TYPE (op1
);
14927 ++cp_unevaluated_operand
;
14928 ++c_inhibit_evaluation_warnings
;
14930 op1
= tsubst (op1
, args
, complain
, in_decl
);
14932 op1
= tsubst_copy_and_build (op1
, args
, complain
, in_decl
,
14933 /*function_p=*/false,
14934 /*integral_constant_expression_p=*/
14936 --cp_unevaluated_operand
;
14937 --c_inhibit_evaluation_warnings
;
14940 r
= cxx_sizeof_or_alignof_type (op1
, TREE_CODE (t
),
14941 complain
& tf_error
);
14943 r
= cxx_sizeof_or_alignof_expr (op1
, TREE_CODE (t
),
14944 complain
& tf_error
);
14945 if (TREE_CODE (t
) == SIZEOF_EXPR
&& r
!= error_mark_node
)
14947 if (TREE_CODE (r
) != SIZEOF_EXPR
|| TYPE_P (op1
))
14949 if (!processing_template_decl
&& TYPE_P (op1
))
14951 r
= build_min (SIZEOF_EXPR
, size_type_node
,
14952 build1 (NOP_EXPR
, op1
, error_mark_node
));
14953 SIZEOF_EXPR_TYPE_P (r
) = 1;
14956 r
= build_min (SIZEOF_EXPR
, size_type_node
, op1
);
14957 TREE_SIDE_EFFECTS (r
) = 0;
14958 TREE_READONLY (r
) = 1;
14960 SET_EXPR_LOCATION (r
, EXPR_LOCATION (t
));
14965 case AT_ENCODE_EXPR
:
14967 op1
= TREE_OPERAND (t
, 0);
14968 ++cp_unevaluated_operand
;
14969 ++c_inhibit_evaluation_warnings
;
14970 op1
= tsubst_copy_and_build (op1
, args
, complain
, in_decl
,
14971 /*function_p=*/false,
14972 /*integral_constant_expression_p=*/false);
14973 --cp_unevaluated_operand
;
14974 --c_inhibit_evaluation_warnings
;
14975 RETURN (objc_build_encode_expr (op1
));
14978 case NOEXCEPT_EXPR
:
14979 op1
= TREE_OPERAND (t
, 0);
14980 ++cp_unevaluated_operand
;
14981 ++c_inhibit_evaluation_warnings
;
14982 ++cp_noexcept_operand
;
14983 op1
= tsubst_copy_and_build (op1
, args
, complain
, in_decl
,
14984 /*function_p=*/false,
14985 /*integral_constant_expression_p=*/false);
14986 --cp_unevaluated_operand
;
14987 --c_inhibit_evaluation_warnings
;
14988 --cp_noexcept_operand
;
14989 RETURN (finish_noexcept_expr (op1
, complain
));
14993 warning_sentinel
s(warn_div_by_zero
);
14994 tree lhs
= RECUR (TREE_OPERAND (t
, 0));
14995 tree rhs
= RECUR (TREE_OPERAND (t
, 2));
14996 tree r
= build_x_modify_expr
14997 (EXPR_LOCATION (t
), lhs
, TREE_CODE (TREE_OPERAND (t
, 1)), rhs
,
14998 complain
|decltype_flag
);
14999 /* TREE_NO_WARNING must be set if either the expression was
15000 parenthesized or it uses an operator such as >>= rather
15001 than plain assignment. In the former case, it was already
15002 set and must be copied. In the latter case,
15003 build_x_modify_expr sets it and it must not be reset
15005 if (TREE_NO_WARNING (t
))
15006 TREE_NO_WARNING (r
) = TREE_NO_WARNING (t
);
15012 op1
= tsubst_non_call_postfix_expression (TREE_OPERAND (t
, 0),
15013 args
, complain
, in_decl
);
15014 /* Remember that there was a reference to this entity. */
15016 && !mark_used (op1
, complain
) && !(complain
& tf_error
))
15017 RETURN (error_mark_node
);
15018 RETURN (build_x_arrow (input_location
, op1
, complain
));
15022 tree placement
= RECUR (TREE_OPERAND (t
, 0));
15023 tree init
= RECUR (TREE_OPERAND (t
, 3));
15024 vec
<tree
, va_gc
> *placement_vec
;
15025 vec
<tree
, va_gc
> *init_vec
;
15028 if (placement
== NULL_TREE
)
15029 placement_vec
= NULL
;
15032 placement_vec
= make_tree_vector ();
15033 for (; placement
!= NULL_TREE
; placement
= TREE_CHAIN (placement
))
15034 vec_safe_push (placement_vec
, TREE_VALUE (placement
));
15037 /* If there was an initializer in the original tree, but it
15038 instantiated to an empty list, then we should pass a
15039 non-NULL empty vector to tell build_new that it was an
15040 empty initializer() rather than no initializer. This can
15041 only happen when the initializer is a pack expansion whose
15042 parameter packs are of length zero. */
15043 if (init
== NULL_TREE
&& TREE_OPERAND (t
, 3) == NULL_TREE
)
15047 init_vec
= make_tree_vector ();
15048 if (init
== void_node
)
15049 gcc_assert (init_vec
!= NULL
);
15052 for (; init
!= NULL_TREE
; init
= TREE_CHAIN (init
))
15053 vec_safe_push (init_vec
, TREE_VALUE (init
));
15057 tree op1
= tsubst (TREE_OPERAND (t
, 1), args
, complain
, in_decl
);
15058 tree op2
= RECUR (TREE_OPERAND (t
, 2));
15059 ret
= build_new (&placement_vec
, op1
, op2
, &init_vec
,
15060 NEW_EXPR_USE_GLOBAL (t
),
15063 if (placement_vec
!= NULL
)
15064 release_tree_vector (placement_vec
);
15065 if (init_vec
!= NULL
)
15066 release_tree_vector (init_vec
);
15073 tree op0
= RECUR (TREE_OPERAND (t
, 0));
15074 tree op1
= RECUR (TREE_OPERAND (t
, 1));
15075 RETURN (delete_sanity (op0
, op1
,
15076 DELETE_EXPR_USE_VEC (t
),
15077 DELETE_EXPR_USE_GLOBAL (t
),
15081 case COMPOUND_EXPR
:
15083 tree op0
= tsubst_copy_and_build (TREE_OPERAND (t
, 0), args
,
15084 complain
& ~tf_decltype
, in_decl
,
15085 /*function_p=*/false,
15086 integral_constant_expression_p
);
15087 RETURN (build_x_compound_expr (EXPR_LOCATION (t
),
15089 RECUR (TREE_OPERAND (t
, 1)),
15090 complain
|decltype_flag
));
15096 vec
<tree
, va_gc
> *call_args
;
15097 unsigned int nargs
, i
;
15102 function
= CALL_EXPR_FN (t
);
15103 /* When we parsed the expression, we determined whether or
15104 not Koenig lookup should be performed. */
15105 koenig_p
= KOENIG_LOOKUP_P (t
);
15106 if (TREE_CODE (function
) == SCOPE_REF
)
15108 qualified_p
= true;
15109 function
= tsubst_qualified_id (function
, args
, complain
, in_decl
,
15111 /*address_p=*/false);
15113 else if (koenig_p
&& identifier_p (function
))
15115 /* Do nothing; calling tsubst_copy_and_build on an identifier
15116 would incorrectly perform unqualified lookup again.
15118 Note that we can also have an IDENTIFIER_NODE if the earlier
15119 unqualified lookup found a member function; in that case
15120 koenig_p will be false and we do want to do the lookup
15121 again to find the instantiated member function.
15123 FIXME but doing that causes c++/15272, so we need to stop
15124 using IDENTIFIER_NODE in that situation. */
15125 qualified_p
= false;
15129 if (TREE_CODE (function
) == COMPONENT_REF
)
15131 tree op
= TREE_OPERAND (function
, 1);
15133 qualified_p
= (TREE_CODE (op
) == SCOPE_REF
15134 || (BASELINK_P (op
)
15135 && BASELINK_QUALIFIED_P (op
)));
15138 qualified_p
= false;
15140 if (TREE_CODE (function
) == ADDR_EXPR
15141 && TREE_CODE (TREE_OPERAND (function
, 0)) == FUNCTION_DECL
)
15142 /* Avoid error about taking the address of a constructor. */
15143 function
= TREE_OPERAND (function
, 0);
15145 function
= tsubst_copy_and_build (function
, args
, complain
,
15148 integral_constant_expression_p
);
15150 if (BASELINK_P (function
))
15151 qualified_p
= true;
15154 nargs
= call_expr_nargs (t
);
15155 call_args
= make_tree_vector ();
15156 for (i
= 0; i
< nargs
; ++i
)
15158 tree arg
= CALL_EXPR_ARG (t
, i
);
15160 if (!PACK_EXPANSION_P (arg
))
15161 vec_safe_push (call_args
, RECUR (CALL_EXPR_ARG (t
, i
)));
15164 /* Expand the pack expansion and push each entry onto
15166 arg
= tsubst_pack_expansion (arg
, args
, complain
, in_decl
);
15167 if (TREE_CODE (arg
) == TREE_VEC
)
15169 unsigned int len
, j
;
15171 len
= TREE_VEC_LENGTH (arg
);
15172 for (j
= 0; j
< len
; ++j
)
15174 tree value
= TREE_VEC_ELT (arg
, j
);
15175 if (value
!= NULL_TREE
)
15176 value
= convert_from_reference (value
);
15177 vec_safe_push (call_args
, value
);
15182 /* A partial substitution. Add one entry. */
15183 vec_safe_push (call_args
, arg
);
15188 /* We do not perform argument-dependent lookup if normal
15189 lookup finds a non-function, in accordance with the
15190 expected resolution of DR 218. */
15192 && ((is_overloaded_fn (function
)
15193 /* If lookup found a member function, the Koenig lookup is
15194 not appropriate, even if an unqualified-name was used
15195 to denote the function. */
15196 && !DECL_FUNCTION_MEMBER_P (get_first_fn (function
)))
15197 || identifier_p (function
))
15198 /* Only do this when substitution turns a dependent call
15199 into a non-dependent call. */
15200 && type_dependent_expression_p_push (t
)
15201 && !any_type_dependent_arguments_p (call_args
))
15202 function
= perform_koenig_lookup (function
, call_args
, tf_none
);
15204 if (identifier_p (function
)
15205 && !any_type_dependent_arguments_p (call_args
))
15207 if (koenig_p
&& (complain
& tf_warning_or_error
))
15209 /* For backwards compatibility and good diagnostics, try
15210 the unqualified lookup again if we aren't in SFINAE
15212 tree unq
= (tsubst_copy_and_build
15213 (function
, args
, complain
, in_decl
, true,
15214 integral_constant_expression_p
));
15215 if (unq
== error_mark_node
)
15216 RETURN (error_mark_node
);
15218 if (unq
!= function
)
15221 if (INDIRECT_REF_P (fn
))
15222 fn
= TREE_OPERAND (fn
, 0);
15223 if (TREE_CODE (fn
) == COMPONENT_REF
)
15224 fn
= TREE_OPERAND (fn
, 1);
15225 if (is_overloaded_fn (fn
))
15226 fn
= get_first_fn (fn
);
15227 if (permerror (EXPR_LOC_OR_LOC (t
, input_location
),
15228 "%qD was not declared in this scope, "
15229 "and no declarations were found by "
15230 "argument-dependent lookup at the point "
15231 "of instantiation", function
))
15234 /* Can't say anything more. */;
15235 else if (DECL_CLASS_SCOPE_P (fn
))
15237 location_t loc
= EXPR_LOC_OR_LOC (t
,
15240 "declarations in dependent base %qT are "
15241 "not found by unqualified lookup",
15242 DECL_CLASS_CONTEXT (fn
));
15243 if (current_class_ptr
)
15245 "use %<this->%D%> instead", function
);
15248 "use %<%T::%D%> instead",
15249 current_class_name
, function
);
15252 inform (0, "%q+D declared here, later in the "
15253 "translation unit", fn
);
15258 if (identifier_p (function
))
15260 if (complain
& tf_error
)
15261 unqualified_name_lookup_error (function
);
15262 release_tree_vector (call_args
);
15263 RETURN (error_mark_node
);
15267 /* Remember that there was a reference to this entity. */
15268 if (DECL_P (function
)
15269 && !mark_used (function
, complain
) && !(complain
& tf_error
))
15270 RETURN (error_mark_node
);
15272 /* Put back tf_decltype for the actual call. */
15273 complain
|= decltype_flag
;
15275 if (TREE_CODE (function
) == OFFSET_REF
)
15276 ret
= build_offset_ref_call_from_tree (function
, &call_args
,
15278 else if (TREE_CODE (function
) == COMPONENT_REF
)
15280 tree instance
= TREE_OPERAND (function
, 0);
15281 tree fn
= TREE_OPERAND (function
, 1);
15283 if (processing_template_decl
15284 && (type_dependent_expression_p (instance
)
15285 || (!BASELINK_P (fn
)
15286 && TREE_CODE (fn
) != FIELD_DECL
)
15287 || type_dependent_expression_p (fn
)
15288 || any_type_dependent_arguments_p (call_args
)))
15289 ret
= build_nt_call_vec (function
, call_args
);
15290 else if (!BASELINK_P (fn
))
15291 ret
= finish_call_expr (function
, &call_args
,
15292 /*disallow_virtual=*/false,
15293 /*koenig_p=*/false,
15296 ret
= (build_new_method_call
15298 &call_args
, NULL_TREE
,
15299 qualified_p
? LOOKUP_NONVIRTUAL
: LOOKUP_NORMAL
,
15304 ret
= finish_call_expr (function
, &call_args
,
15305 /*disallow_virtual=*/qualified_p
,
15309 release_tree_vector (call_args
);
15316 tree cond
= RECUR (TREE_OPERAND (t
, 0));
15317 tree folded_cond
= fold_non_dependent_expr (cond
);
15320 if (TREE_CODE (folded_cond
) == INTEGER_CST
)
15322 if (integer_zerop (folded_cond
))
15324 ++c_inhibit_evaluation_warnings
;
15325 exp1
= RECUR (TREE_OPERAND (t
, 1));
15326 --c_inhibit_evaluation_warnings
;
15327 exp2
= RECUR (TREE_OPERAND (t
, 2));
15331 exp1
= RECUR (TREE_OPERAND (t
, 1));
15332 ++c_inhibit_evaluation_warnings
;
15333 exp2
= RECUR (TREE_OPERAND (t
, 2));
15334 --c_inhibit_evaluation_warnings
;
15336 cond
= folded_cond
;
15340 exp1
= RECUR (TREE_OPERAND (t
, 1));
15341 exp2
= RECUR (TREE_OPERAND (t
, 2));
15344 RETURN (build_x_conditional_expr (EXPR_LOCATION (t
),
15345 cond
, exp1
, exp2
, complain
));
15348 case PSEUDO_DTOR_EXPR
:
15350 tree op0
= RECUR (TREE_OPERAND (t
, 0));
15351 tree op1
= RECUR (TREE_OPERAND (t
, 1));
15352 tree op2
= tsubst (TREE_OPERAND (t
, 2), args
, complain
, in_decl
);
15353 RETURN (finish_pseudo_destructor_expr (op0
, op1
, op2
,
15359 tree purpose
, value
, chain
;
15361 if (t
== void_list_node
)
15364 if ((TREE_PURPOSE (t
) && PACK_EXPANSION_P (TREE_PURPOSE (t
)))
15365 || (TREE_VALUE (t
) && PACK_EXPANSION_P (TREE_VALUE (t
))))
15367 /* We have pack expansions, so expand those and
15368 create a new list out of it. */
15369 tree purposevec
= NULL_TREE
;
15370 tree valuevec
= NULL_TREE
;
15374 /* Expand the argument expressions. */
15375 if (TREE_PURPOSE (t
))
15376 purposevec
= tsubst_pack_expansion (TREE_PURPOSE (t
), args
,
15377 complain
, in_decl
);
15378 if (TREE_VALUE (t
))
15379 valuevec
= tsubst_pack_expansion (TREE_VALUE (t
), args
,
15380 complain
, in_decl
);
15382 /* Build the rest of the list. */
15383 chain
= TREE_CHAIN (t
);
15384 if (chain
&& chain
!= void_type_node
)
15385 chain
= RECUR (chain
);
15387 /* Determine the number of arguments. */
15388 if (purposevec
&& TREE_CODE (purposevec
) == TREE_VEC
)
15390 len
= TREE_VEC_LENGTH (purposevec
);
15391 gcc_assert (!valuevec
|| len
== TREE_VEC_LENGTH (valuevec
));
15393 else if (TREE_CODE (valuevec
) == TREE_VEC
)
15394 len
= TREE_VEC_LENGTH (valuevec
);
15397 /* Since we only performed a partial substitution into
15398 the argument pack, we only RETURN (a single list
15400 if (purposevec
== TREE_PURPOSE (t
)
15401 && valuevec
== TREE_VALUE (t
)
15402 && chain
== TREE_CHAIN (t
))
15405 RETURN (tree_cons (purposevec
, valuevec
, chain
));
15408 /* Convert the argument vectors into a TREE_LIST */
15412 /* Grab the Ith values. */
15414 purpose
= purposevec
? TREE_VEC_ELT (purposevec
, i
)
15417 = valuevec
? convert_from_reference (TREE_VEC_ELT (valuevec
, i
))
15420 /* Build the list (backwards). */
15421 chain
= tree_cons (purpose
, value
, chain
);
15427 purpose
= TREE_PURPOSE (t
);
15429 purpose
= RECUR (purpose
);
15430 value
= TREE_VALUE (t
);
15432 value
= RECUR (value
);
15433 chain
= TREE_CHAIN (t
);
15434 if (chain
&& chain
!= void_type_node
)
15435 chain
= RECUR (chain
);
15436 if (purpose
== TREE_PURPOSE (t
)
15437 && value
== TREE_VALUE (t
)
15438 && chain
== TREE_CHAIN (t
))
15440 RETURN (tree_cons (purpose
, value
, chain
));
15443 case COMPONENT_REF
:
15450 object
= tsubst_non_call_postfix_expression (TREE_OPERAND (t
, 0),
15451 args
, complain
, in_decl
);
15452 /* Remember that there was a reference to this entity. */
15453 if (DECL_P (object
)
15454 && !mark_used (object
, complain
) && !(complain
& tf_error
))
15455 RETURN (error_mark_node
);
15456 object_type
= TREE_TYPE (object
);
15458 member
= TREE_OPERAND (t
, 1);
15459 if (BASELINK_P (member
))
15460 member
= tsubst_baselink (member
,
15461 non_reference (TREE_TYPE (object
)),
15462 args
, complain
, in_decl
);
15464 member
= tsubst_copy (member
, args
, complain
, in_decl
);
15465 if (member
== error_mark_node
)
15466 RETURN (error_mark_node
);
15468 if (type_dependent_expression_p (object
))
15469 /* We can't do much here. */;
15470 else if (!CLASS_TYPE_P (object_type
))
15472 if (scalarish_type_p (object_type
))
15474 tree s
= NULL_TREE
;
15475 tree dtor
= member
;
15477 if (TREE_CODE (dtor
) == SCOPE_REF
)
15479 s
= TREE_OPERAND (dtor
, 0);
15480 dtor
= TREE_OPERAND (dtor
, 1);
15482 if (TREE_CODE (dtor
) == BIT_NOT_EXPR
)
15484 dtor
= TREE_OPERAND (dtor
, 0);
15486 RETURN (finish_pseudo_destructor_expr
15487 (object
, s
, dtor
, input_location
));
15491 else if (TREE_CODE (member
) == SCOPE_REF
15492 && TREE_CODE (TREE_OPERAND (member
, 1)) == TEMPLATE_ID_EXPR
)
15494 /* Lookup the template functions now that we know what the
15496 tree scope
= TREE_OPERAND (member
, 0);
15497 tree tmpl
= TREE_OPERAND (TREE_OPERAND (member
, 1), 0);
15498 tree args
= TREE_OPERAND (TREE_OPERAND (member
, 1), 1);
15499 member
= lookup_qualified_name (scope
, tmpl
,
15500 /*is_type_p=*/false,
15501 /*complain=*/false);
15502 if (BASELINK_P (member
))
15504 BASELINK_FUNCTIONS (member
)
15505 = build_nt (TEMPLATE_ID_EXPR
, BASELINK_FUNCTIONS (member
),
15507 member
= (adjust_result_of_qualified_name_lookup
15508 (member
, BINFO_TYPE (BASELINK_BINFO (member
)),
15513 qualified_name_lookup_error (scope
, tmpl
, member
,
15515 RETURN (error_mark_node
);
15518 else if (TREE_CODE (member
) == SCOPE_REF
15519 && !CLASS_TYPE_P (TREE_OPERAND (member
, 0))
15520 && TREE_CODE (TREE_OPERAND (member
, 0)) != NAMESPACE_DECL
)
15522 if (complain
& tf_error
)
15524 if (TYPE_P (TREE_OPERAND (member
, 0)))
15525 error ("%qT is not a class or namespace",
15526 TREE_OPERAND (member
, 0));
15528 error ("%qD is not a class or namespace",
15529 TREE_OPERAND (member
, 0));
15531 RETURN (error_mark_node
);
15533 else if (TREE_CODE (member
) == FIELD_DECL
)
15535 r
= finish_non_static_data_member (member
, object
, NULL_TREE
);
15536 if (TREE_CODE (r
) == COMPONENT_REF
)
15537 REF_PARENTHESIZED_P (r
) = REF_PARENTHESIZED_P (t
);
15541 r
= finish_class_member_access_expr (object
, member
,
15542 /*template_p=*/false,
15544 if (TREE_CODE (r
) == COMPONENT_REF
)
15545 REF_PARENTHESIZED_P (r
) = REF_PARENTHESIZED_P (t
);
15550 RETURN (build_throw
15551 (RECUR (TREE_OPERAND (t
, 0))));
15555 vec
<constructor_elt
, va_gc
> *n
;
15556 constructor_elt
*ce
;
15557 unsigned HOST_WIDE_INT idx
;
15558 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
15559 bool process_index_p
;
15561 bool need_copy_p
= false;
15564 if (type
== error_mark_node
)
15565 RETURN (error_mark_node
);
15567 /* digest_init will do the wrong thing if we let it. */
15568 if (type
&& TYPE_PTRMEMFUNC_P (type
))
15571 /* We do not want to process the index of aggregate
15572 initializers as they are identifier nodes which will be
15573 looked up by digest_init. */
15574 process_index_p
= !(type
&& MAYBE_CLASS_TYPE_P (type
));
15576 n
= vec_safe_copy (CONSTRUCTOR_ELTS (t
));
15577 newlen
= vec_safe_length (n
);
15578 FOR_EACH_VEC_SAFE_ELT (n
, idx
, ce
)
15580 if (ce
->index
&& process_index_p
15581 /* An identifier index is looked up in the type
15582 being initialized, not the current scope. */
15583 && TREE_CODE (ce
->index
) != IDENTIFIER_NODE
)
15584 ce
->index
= RECUR (ce
->index
);
15586 if (PACK_EXPANSION_P (ce
->value
))
15588 /* Substitute into the pack expansion. */
15589 ce
->value
= tsubst_pack_expansion (ce
->value
, args
, complain
,
15592 if (ce
->value
== error_mark_node
15593 || PACK_EXPANSION_P (ce
->value
))
15595 else if (TREE_VEC_LENGTH (ce
->value
) == 1)
15596 /* Just move the argument into place. */
15597 ce
->value
= TREE_VEC_ELT (ce
->value
, 0);
15600 /* Update the length of the final CONSTRUCTOR
15601 arguments vector, and note that we will need to
15603 newlen
= newlen
+ TREE_VEC_LENGTH (ce
->value
) - 1;
15604 need_copy_p
= true;
15608 ce
->value
= RECUR (ce
->value
);
15613 vec
<constructor_elt
, va_gc
> *old_n
= n
;
15615 vec_alloc (n
, newlen
);
15616 FOR_EACH_VEC_ELT (*old_n
, idx
, ce
)
15618 if (TREE_CODE (ce
->value
) == TREE_VEC
)
15620 int i
, len
= TREE_VEC_LENGTH (ce
->value
);
15621 for (i
= 0; i
< len
; ++i
)
15622 CONSTRUCTOR_APPEND_ELT (n
, 0,
15623 TREE_VEC_ELT (ce
->value
, i
));
15626 CONSTRUCTOR_APPEND_ELT (n
, 0, ce
->value
);
15630 r
= build_constructor (init_list_type_node
, n
);
15631 CONSTRUCTOR_IS_DIRECT_INIT (r
) = CONSTRUCTOR_IS_DIRECT_INIT (t
);
15633 if (TREE_HAS_CONSTRUCTOR (t
))
15634 RETURN (finish_compound_literal (type
, r
, complain
));
15636 TREE_TYPE (r
) = type
;
15642 tree operand_0
= TREE_OPERAND (t
, 0);
15643 if (TYPE_P (operand_0
))
15645 operand_0
= tsubst (operand_0
, args
, complain
, in_decl
);
15646 RETURN (get_typeid (operand_0
, complain
));
15650 operand_0
= RECUR (operand_0
);
15651 RETURN (build_typeid (operand_0
, complain
));
15658 else if (DECL_PACK_P (t
))
15660 /* We don't build decls for an instantiation of a
15661 variadic capture proxy, we instantiate the elements
15663 gcc_assert (DECL_HAS_VALUE_EXPR_P (t
));
15664 return RECUR (DECL_VALUE_EXPR (t
));
15670 tree r
= tsubst_copy (t
, args
, complain
, in_decl
);
15671 /* ??? We're doing a subset of finish_id_expression here. */
15673 && !processing_template_decl
15674 && !cp_unevaluated_operand
15675 && (TREE_STATIC (r
) || DECL_EXTERNAL (r
))
15676 && DECL_THREAD_LOCAL_P (r
))
15678 if (tree wrap
= get_tls_wrapper_fn (r
))
15679 /* Replace an evaluated use of the thread_local variable with
15680 a call to its wrapper. */
15681 r
= build_cxx_call (wrap
, 0, NULL
, tf_warning_or_error
);
15683 else if (outer_automatic_var_p (r
))
15685 r
= process_outer_var_ref (r
, complain
);
15686 if (is_capture_proxy (r
))
15687 register_local_specialization (r
, t
);
15690 if (TREE_CODE (TREE_TYPE (t
)) != REFERENCE_TYPE
)
15691 /* If the original type was a reference, we'll be wrapped in
15692 the appropriate INDIRECT_REF. */
15693 r
= convert_from_reference (r
);
15699 tree op0
= RECUR (TREE_OPERAND (t
, 0));
15700 tree type
= tsubst (TREE_TYPE (t
), args
, complain
, in_decl
);
15701 RETURN (build_x_va_arg (EXPR_LOCATION (t
), op0
, type
));
15704 case OFFSETOF_EXPR
:
15705 RETURN (finish_offsetof (RECUR (TREE_OPERAND (t
, 0)),
15706 EXPR_LOCATION (t
)));
15710 tree type1
= tsubst (TRAIT_EXPR_TYPE1 (t
), args
,
15711 complain
, in_decl
);
15713 tree type2
= TRAIT_EXPR_TYPE2 (t
);
15714 if (type2
&& TREE_CODE (type2
) == TREE_LIST
)
15715 type2
= RECUR (type2
);
15717 type2
= tsubst (type2
, args
, complain
, in_decl
);
15719 RETURN (finish_trait_expr (TRAIT_EXPR_KIND (t
), type1
, type2
));
15724 tree old_stmt_expr
= cur_stmt_expr
;
15725 tree stmt_expr
= begin_stmt_expr ();
15727 cur_stmt_expr
= stmt_expr
;
15728 tsubst_expr (STMT_EXPR_STMT (t
), args
, complain
, in_decl
,
15729 integral_constant_expression_p
);
15730 stmt_expr
= finish_stmt_expr (stmt_expr
, false);
15731 cur_stmt_expr
= old_stmt_expr
;
15733 /* If the resulting list of expression statement is empty,
15734 fold it further into void_node. */
15735 if (empty_expr_stmt_p (stmt_expr
))
15736 stmt_expr
= void_node
;
15738 RETURN (stmt_expr
);
15743 tree r
= build_lambda_expr ();
15745 tree type
= tsubst (LAMBDA_EXPR_CLOSURE (t
), args
, complain
, NULL_TREE
);
15746 LAMBDA_EXPR_CLOSURE (r
) = type
;
15747 CLASSTYPE_LAMBDA_EXPR (type
) = r
;
15749 LAMBDA_EXPR_LOCATION (r
)
15750 = LAMBDA_EXPR_LOCATION (t
);
15751 LAMBDA_EXPR_DEFAULT_CAPTURE_MODE (r
)
15752 = LAMBDA_EXPR_DEFAULT_CAPTURE_MODE (t
);
15753 LAMBDA_EXPR_MUTABLE_P (r
) = LAMBDA_EXPR_MUTABLE_P (t
);
15754 LAMBDA_EXPR_DISCRIMINATOR (r
)
15755 = (LAMBDA_EXPR_DISCRIMINATOR (t
));
15756 /* For a function scope, we want to use tsubst so that we don't
15757 complain about referring to an auto function before its return
15758 type has been deduced. Otherwise, we want to use tsubst_copy so
15759 that we look up the existing field/parameter/variable rather
15760 than build a new one. */
15761 tree scope
= LAMBDA_EXPR_EXTRA_SCOPE (t
);
15762 if (scope
&& TREE_CODE (scope
) == FUNCTION_DECL
)
15763 scope
= tsubst (scope
, args
, complain
, in_decl
);
15764 else if (scope
&& TREE_CODE (scope
) == PARM_DECL
)
15766 /* Look up the parameter we want directly, as tsubst_copy
15767 doesn't do what we need. */
15768 tree fn
= tsubst (DECL_CONTEXT (scope
), args
, complain
, in_decl
);
15769 tree parm
= FUNCTION_FIRST_USER_PARM (fn
);
15770 while (DECL_PARM_INDEX (parm
) != DECL_PARM_INDEX (scope
))
15771 parm
= DECL_CHAIN (parm
);
15773 /* FIXME Work around the parm not having DECL_CONTEXT set. */
15774 if (DECL_CONTEXT (scope
) == NULL_TREE
)
15775 DECL_CONTEXT (scope
) = fn
;
15778 scope
= RECUR (scope
);
15779 LAMBDA_EXPR_EXTRA_SCOPE (r
) = scope
;
15780 LAMBDA_EXPR_RETURN_TYPE (r
)
15781 = tsubst (LAMBDA_EXPR_RETURN_TYPE (t
), args
, complain
, in_decl
);
15783 gcc_assert (LAMBDA_EXPR_THIS_CAPTURE (t
) == NULL_TREE
15784 && LAMBDA_EXPR_PENDING_PROXIES (t
) == NULL
);
15786 /* Do this again now that LAMBDA_EXPR_EXTRA_SCOPE is set. */
15787 determine_visibility (TYPE_NAME (type
));
15788 /* Now that we know visibility, instantiate the type so we have a
15789 declaration of the op() for later calls to lambda_function. */
15790 complete_type (type
);
15792 LAMBDA_EXPR_THIS_CAPTURE (r
) = NULL_TREE
;
15794 RETURN (build_lambda_object (r
));
15798 /* We can get here for a constant initializer of non-dependent type.
15799 FIXME stop folding in cp_parser_initializer_clause. */
15801 tree r
= get_target_expr_sfinae (RECUR (TARGET_EXPR_INITIAL (t
)),
15806 case TRANSACTION_EXPR
:
15807 RETURN (tsubst_expr(t
, args
, complain
, in_decl
,
15808 integral_constant_expression_p
));
15811 RETURN (finish_parenthesized_expr (RECUR (TREE_OPERAND (t
, 0))));
15813 case VEC_PERM_EXPR
:
15815 tree op0
= RECUR (TREE_OPERAND (t
, 0));
15816 tree op1
= RECUR (TREE_OPERAND (t
, 1));
15817 tree op2
= RECUR (TREE_OPERAND (t
, 2));
15818 RETURN (build_x_vec_perm_expr (input_location
, op0
, op1
, op2
,
15823 /* Handle Objective-C++ constructs, if appropriate. */
15826 = objcp_tsubst_copy_and_build (t
, args
, complain
,
15827 in_decl
, /*function_p=*/false);
15831 RETURN (tsubst_copy (t
, args
, complain
, in_decl
));
15837 input_location
= loc
;
15841 /* Verify that the instantiated ARGS are valid. For type arguments,
15842 make sure that the type's linkage is ok. For non-type arguments,
15843 make sure they are constants if they are integral or enumerations.
15844 Emit an error under control of COMPLAIN, and return TRUE on error. */
15847 check_instantiated_arg (tree tmpl
, tree t
, tsubst_flags_t complain
)
15849 if (dependent_template_arg_p (t
))
15851 if (ARGUMENT_PACK_P (t
))
15853 tree vec
= ARGUMENT_PACK_ARGS (t
);
15854 int len
= TREE_VEC_LENGTH (vec
);
15855 bool result
= false;
15858 for (i
= 0; i
< len
; ++i
)
15859 if (check_instantiated_arg (tmpl
, TREE_VEC_ELT (vec
, i
), complain
))
15863 else if (TYPE_P (t
))
15865 /* [basic.link]: A name with no linkage (notably, the name
15866 of a class or enumeration declared in a local scope)
15867 shall not be used to declare an entity with linkage.
15868 This implies that names with no linkage cannot be used as
15871 DR 757 relaxes this restriction for C++0x. */
15872 tree nt
= (cxx_dialect
> cxx98
? NULL_TREE
15873 : no_linkage_check (t
, /*relaxed_p=*/false));
15877 /* DR 488 makes use of a type with no linkage cause
15878 type deduction to fail. */
15879 if (complain
& tf_error
)
15881 if (TYPE_ANONYMOUS_P (nt
))
15882 error ("%qT is/uses anonymous type", t
);
15884 error ("template argument for %qD uses local type %qT",
15889 /* In order to avoid all sorts of complications, we do not
15890 allow variably-modified types as template arguments. */
15891 else if (variably_modified_type_p (t
, NULL_TREE
))
15893 if (complain
& tf_error
)
15894 error ("%qT is a variably modified type", t
);
15898 /* Class template and alias template arguments should be OK. */
15899 else if (DECL_TYPE_TEMPLATE_P (t
))
15901 /* A non-type argument of integral or enumerated type must be a
15903 else if (TREE_TYPE (t
)
15904 && INTEGRAL_OR_ENUMERATION_TYPE_P (TREE_TYPE (t
))
15905 && !REFERENCE_REF_P (t
)
15906 && !TREE_CONSTANT (t
))
15908 if (complain
& tf_error
)
15909 error ("integral expression %qE is not constant", t
);
15916 check_instantiated_args (tree tmpl
, tree args
, tsubst_flags_t complain
)
15918 int ix
, len
= DECL_NTPARMS (tmpl
);
15919 bool result
= false;
15921 for (ix
= 0; ix
!= len
; ix
++)
15923 if (check_instantiated_arg (tmpl
, TREE_VEC_ELT (args
, ix
), complain
))
15926 if (result
&& (complain
& tf_error
))
15927 error (" trying to instantiate %qD", tmpl
);
15931 /* We're out of SFINAE context now, so generate diagnostics for the access
15932 errors we saw earlier when instantiating D from TMPL and ARGS. */
15935 recheck_decl_substitution (tree d
, tree tmpl
, tree args
)
15937 tree pattern
= DECL_TEMPLATE_RESULT (tmpl
);
15938 tree type
= TREE_TYPE (pattern
);
15939 location_t loc
= input_location
;
15941 push_access_scope (d
);
15942 push_deferring_access_checks (dk_no_deferred
);
15943 input_location
= DECL_SOURCE_LOCATION (pattern
);
15944 tsubst (type
, args
, tf_warning_or_error
, d
);
15945 input_location
= loc
;
15946 pop_deferring_access_checks ();
15947 pop_access_scope (d
);
15950 /* Instantiate the indicated variable, function, or alias template TMPL with
15951 the template arguments in TARG_PTR. */
15954 instantiate_template_1 (tree tmpl
, tree orig_args
, tsubst_flags_t complain
)
15956 tree targ_ptr
= orig_args
;
15960 bool access_ok
= true;
15962 if (tmpl
== error_mark_node
)
15963 return error_mark_node
;
15965 gcc_assert (TREE_CODE (tmpl
) == TEMPLATE_DECL
);
15967 /* If this function is a clone, handle it specially. */
15968 if (DECL_CLONED_FUNCTION_P (tmpl
))
15973 /* Use DECL_ABSTRACT_ORIGIN because only FUNCTION_DECLs have
15974 DECL_CLONED_FUNCTION. */
15975 spec
= instantiate_template (DECL_ABSTRACT_ORIGIN (tmpl
),
15976 targ_ptr
, complain
);
15977 if (spec
== error_mark_node
)
15978 return error_mark_node
;
15980 /* Look for the clone. */
15981 FOR_EACH_CLONE (clone
, spec
)
15982 if (DECL_NAME (clone
) == DECL_NAME (tmpl
))
15984 /* We should always have found the clone by now. */
15985 gcc_unreachable ();
15989 if (targ_ptr
== error_mark_node
)
15990 return error_mark_node
;
15992 /* Check to see if we already have this specialization. */
15993 gen_tmpl
= most_general_template (tmpl
);
15994 if (tmpl
!= gen_tmpl
)
15995 /* The TMPL is a partial instantiation. To get a full set of
15996 arguments we must add the arguments used to perform the
15997 partial instantiation. */
15998 targ_ptr
= add_outermost_template_args (DECL_TI_ARGS (tmpl
),
16001 /* It would be nice to avoid hashing here and then again in tsubst_decl,
16002 but it doesn't seem to be on the hot path. */
16003 spec
= retrieve_specialization (gen_tmpl
, targ_ptr
, 0);
16005 gcc_assert (tmpl
== gen_tmpl
16006 || ((fndecl
= retrieve_specialization (tmpl
, orig_args
, 0))
16008 || fndecl
== NULL_TREE
);
16010 if (spec
!= NULL_TREE
)
16012 if (FNDECL_HAS_ACCESS_ERRORS (spec
))
16014 if (complain
& tf_error
)
16015 recheck_decl_substitution (spec
, gen_tmpl
, targ_ptr
);
16016 return error_mark_node
;
16021 if (check_instantiated_args (gen_tmpl
, INNERMOST_TEMPLATE_ARGS (targ_ptr
),
16023 return error_mark_node
;
16025 /* We are building a FUNCTION_DECL, during which the access of its
16026 parameters and return types have to be checked. However this
16027 FUNCTION_DECL which is the desired context for access checking
16028 is not built yet. We solve this chicken-and-egg problem by
16029 deferring all checks until we have the FUNCTION_DECL. */
16030 push_deferring_access_checks (dk_deferred
);
16032 /* Instantiation of the function happens in the context of the function
16033 template, not the context of the overload resolution we're doing. */
16034 push_to_top_level ();
16035 /* If there are dependent arguments, e.g. because we're doing partial
16036 ordering, make sure processing_template_decl stays set. */
16037 if (uses_template_parms (targ_ptr
))
16038 ++processing_template_decl
;
16039 if (DECL_CLASS_SCOPE_P (gen_tmpl
))
16041 tree ctx
= tsubst_aggr_type (DECL_CONTEXT (gen_tmpl
), targ_ptr
,
16042 complain
, gen_tmpl
, true);
16043 push_nested_class (ctx
);
16046 tree pattern
= DECL_TEMPLATE_RESULT (gen_tmpl
);
16048 if (VAR_P (pattern
))
16050 /* We need to determine if we're using a partial or explicit
16051 specialization now, because the type of the variable could be
16053 tree tid
= lookup_template_variable (gen_tmpl
, targ_ptr
);
16054 tree elt
= most_specialized_partial_spec (tid
, complain
);
16055 if (elt
== error_mark_node
)
16056 pattern
= error_mark_node
;
16059 tmpl
= TREE_VALUE (elt
);
16060 pattern
= DECL_TEMPLATE_RESULT (tmpl
);
16061 targ_ptr
= TREE_PURPOSE (elt
);
16065 /* Substitute template parameters to obtain the specialization. */
16066 fndecl
= tsubst (pattern
, targ_ptr
, complain
, gen_tmpl
);
16067 if (DECL_CLASS_SCOPE_P (gen_tmpl
))
16068 pop_nested_class ();
16069 pop_from_top_level ();
16071 if (fndecl
== error_mark_node
)
16073 pop_deferring_access_checks ();
16074 return error_mark_node
;
16077 /* The DECL_TI_TEMPLATE should always be the immediate parent
16078 template, not the most general template. */
16079 DECL_TI_TEMPLATE (fndecl
) = tmpl
;
16081 /* Now we know the specialization, compute access previously
16083 push_access_scope (fndecl
);
16084 if (!perform_deferred_access_checks (complain
))
16086 pop_access_scope (fndecl
);
16087 pop_deferring_access_checks ();
16089 /* If we've just instantiated the main entry point for a function,
16090 instantiate all the alternate entry points as well. We do this
16091 by cloning the instantiation of the main entry point, not by
16092 instantiating the template clones. */
16093 if (DECL_CHAIN (gen_tmpl
) && DECL_CLONED_FUNCTION_P (DECL_CHAIN (gen_tmpl
)))
16094 clone_function_decl (fndecl
, /*update_method_vec_p=*/0);
16098 if (!(complain
& tf_error
))
16100 /* Remember to reinstantiate when we're out of SFINAE so the user
16101 can see the errors. */
16102 FNDECL_HAS_ACCESS_ERRORS (fndecl
) = true;
16104 return error_mark_node
;
16109 /* Wrapper for instantiate_template_1. */
16112 instantiate_template (tree tmpl
, tree orig_args
, tsubst_flags_t complain
)
16115 timevar_push (TV_TEMPLATE_INST
);
16116 ret
= instantiate_template_1 (tmpl
, orig_args
, complain
);
16117 timevar_pop (TV_TEMPLATE_INST
);
16121 /* Instantiate the alias template TMPL with ARGS. Also push a template
16122 instantiation level, which instantiate_template doesn't do because
16123 functions and variables have sufficient context established by the
16127 instantiate_alias_template (tree tmpl
, tree args
, tsubst_flags_t complain
)
16129 struct pending_template
*old_last_pend
= last_pending_template
;
16130 struct tinst_level
*old_error_tinst
= last_error_tinst_level
;
16131 if (tmpl
== error_mark_node
|| args
== error_mark_node
)
16132 return error_mark_node
;
16133 tree tinst
= build_tree_list (tmpl
, args
);
16134 if (!push_tinst_level (tinst
))
16137 return error_mark_node
;
16141 coerce_innermost_template_parms (DECL_TEMPLATE_PARMS (tmpl
),
16142 args
, tmpl
, complain
,
16143 /*require_all_args=*/true,
16144 /*use_default_args=*/true);
16146 tree r
= instantiate_template (tmpl
, args
, complain
);
16147 pop_tinst_level ();
16148 /* We can't free this if a pending_template entry or last_error_tinst_level
16149 is pointing at it. */
16150 if (last_pending_template
== old_last_pend
16151 && last_error_tinst_level
== old_error_tinst
)
16157 /* PARM is a template parameter pack for FN. Returns true iff
16158 PARM is used in a deducible way in the argument list of FN. */
16161 pack_deducible_p (tree parm
, tree fn
)
16163 tree t
= FUNCTION_FIRST_USER_PARMTYPE (fn
);
16164 for (; t
; t
= TREE_CHAIN (t
))
16166 tree type
= TREE_VALUE (t
);
16168 if (!PACK_EXPANSION_P (type
))
16170 for (packs
= PACK_EXPANSION_PARAMETER_PACKS (type
);
16171 packs
; packs
= TREE_CHAIN (packs
))
16172 if (template_args_equal (TREE_VALUE (packs
), parm
))
16174 /* The template parameter pack is used in a function parameter
16175 pack. If this is the end of the parameter list, the
16176 template parameter pack is deducible. */
16177 if (TREE_CHAIN (t
) == void_list_node
)
16180 /* Otherwise, not. Well, it could be deduced from
16181 a non-pack parameter, but doing so would end up with
16182 a deduction mismatch, so don't bother. */
16186 /* The template parameter pack isn't used in any function parameter
16187 packs, but it might be used deeper, e.g. tuple<Args...>. */
16191 /* The FN is a TEMPLATE_DECL for a function. ARGS is an array with
16192 NARGS elements of the arguments that are being used when calling
16193 it. TARGS is a vector into which the deduced template arguments
16196 Returns either a FUNCTION_DECL for the matching specialization of FN or
16197 NULL_TREE if no suitable specialization can be found. If EXPLAIN_P is
16198 true, diagnostics will be printed to explain why it failed.
16200 If FN is a conversion operator, or we are trying to produce a specific
16201 specialization, RETURN_TYPE is the return type desired.
16203 The EXPLICIT_TARGS are explicit template arguments provided via a
16206 The parameter STRICT is one of:
16209 We are deducing arguments for a function call, as in
16210 [temp.deduct.call].
16213 We are deducing arguments for a conversion function, as in
16214 [temp.deduct.conv].
16217 We are deducing arguments when doing an explicit instantiation
16218 as in [temp.explicit], when determining an explicit specialization
16219 as in [temp.expl.spec], or when taking the address of a function
16220 template, as in [temp.deduct.funcaddr]. */
16223 fn_type_unification (tree fn
,
16224 tree explicit_targs
,
16227 unsigned int nargs
,
16229 unification_kind_t strict
,
16236 tree decl
= NULL_TREE
;
16237 tsubst_flags_t complain
= (explain_p
? tf_warning_or_error
: tf_none
);
16239 static int deduction_depth
;
16240 struct pending_template
*old_last_pend
= last_pending_template
;
16241 struct tinst_level
*old_error_tinst
= last_error_tinst_level
;
16242 tree tparms
= DECL_INNERMOST_TEMPLATE_PARMS (fn
);
16244 tree r
= error_mark_node
;
16247 complain
|= tf_decltype
;
16249 /* In C++0x, it's possible to have a function template whose type depends
16250 on itself recursively. This is most obvious with decltype, but can also
16251 occur with enumeration scope (c++/48969). So we need to catch infinite
16252 recursion and reject the substitution at deduction time; this function
16253 will return error_mark_node for any repeated substitution.
16255 This also catches excessive recursion such as when f<N> depends on
16256 f<N-1> across all integers, and returns error_mark_node for all the
16257 substitutions back up to the initial one.
16259 This is, of course, not reentrant. */
16260 if (excessive_deduction_depth
)
16261 return error_mark_node
;
16262 tinst
= build_tree_list (fn
, NULL_TREE
);
16265 gcc_assert (TREE_CODE (fn
) == TEMPLATE_DECL
);
16267 fntype
= TREE_TYPE (fn
);
16268 if (explicit_targs
)
16272 The specified template arguments must match the template
16273 parameters in kind (i.e., type, nontype, template), and there
16274 must not be more arguments than there are parameters;
16275 otherwise type deduction fails.
16277 Nontype arguments must match the types of the corresponding
16278 nontype template parameters, or must be convertible to the
16279 types of the corresponding nontype parameters as specified in
16280 _temp.arg.nontype_, otherwise type deduction fails.
16282 All references in the function type of the function template
16283 to the corresponding template parameters are replaced by the
16284 specified template argument values. If a substitution in a
16285 template parameter or in the function type of the function
16286 template results in an invalid type, type deduction fails. */
16287 int i
, len
= TREE_VEC_LENGTH (tparms
);
16288 location_t loc
= input_location
;
16289 bool incomplete
= false;
16291 /* Adjust any explicit template arguments before entering the
16292 substitution context. */
16294 = (coerce_template_parms (tparms
, explicit_targs
, NULL_TREE
,
16296 /*require_all_args=*/false,
16297 /*use_default_args=*/false));
16298 if (explicit_targs
== error_mark_node
)
16301 /* Substitute the explicit args into the function type. This is
16302 necessary so that, for instance, explicitly declared function
16303 arguments can match null pointed constants. If we were given
16304 an incomplete set of explicit args, we must not do semantic
16305 processing during substitution as we could create partial
16307 for (i
= 0; i
< len
; i
++)
16309 tree parm
= TREE_VALUE (TREE_VEC_ELT (tparms
, i
));
16310 bool parameter_pack
= false;
16311 tree targ
= TREE_VEC_ELT (explicit_targs
, i
);
16313 /* Dig out the actual parm. */
16314 if (TREE_CODE (parm
) == TYPE_DECL
16315 || TREE_CODE (parm
) == TEMPLATE_DECL
)
16317 parm
= TREE_TYPE (parm
);
16318 parameter_pack
= TEMPLATE_TYPE_PARAMETER_PACK (parm
);
16320 else if (TREE_CODE (parm
) == PARM_DECL
)
16322 parm
= DECL_INITIAL (parm
);
16323 parameter_pack
= TEMPLATE_PARM_PARAMETER_PACK (parm
);
16326 if (!parameter_pack
&& targ
== NULL_TREE
)
16327 /* No explicit argument for this template parameter. */
16330 if (parameter_pack
&& pack_deducible_p (parm
, fn
))
16332 /* Mark the argument pack as "incomplete". We could
16333 still deduce more arguments during unification.
16334 We remove this mark in type_unification_real. */
16337 ARGUMENT_PACK_INCOMPLETE_P(targ
) = 1;
16338 ARGUMENT_PACK_EXPLICIT_ARGS (targ
)
16339 = ARGUMENT_PACK_ARGS (targ
);
16342 /* We have some incomplete argument packs. */
16347 TREE_VALUE (tinst
) = explicit_targs
;
16348 if (!push_tinst_level (tinst
))
16350 excessive_deduction_depth
= true;
16353 processing_template_decl
+= incomplete
;
16354 input_location
= DECL_SOURCE_LOCATION (fn
);
16355 /* Ignore any access checks; we'll see them again in
16356 instantiate_template and they might have the wrong
16357 access path at this point. */
16358 push_deferring_access_checks (dk_deferred
);
16359 fntype
= tsubst (TREE_TYPE (fn
), explicit_targs
,
16360 complain
| tf_partial
, NULL_TREE
);
16361 pop_deferring_access_checks ();
16362 input_location
= loc
;
16363 processing_template_decl
-= incomplete
;
16364 pop_tinst_level ();
16366 if (fntype
== error_mark_node
)
16369 /* Place the explicitly specified arguments in TARGS. */
16370 for (i
= NUM_TMPL_ARGS (explicit_targs
); i
--;)
16371 TREE_VEC_ELT (targs
, i
) = TREE_VEC_ELT (explicit_targs
, i
);
16374 /* Never do unification on the 'this' parameter. */
16375 parms
= skip_artificial_parms_for (fn
, TYPE_ARG_TYPES (fntype
));
16381 parms
= tree_cons (NULL_TREE
, TREE_TYPE (fntype
), parms
);
16382 new_args
= XALLOCAVEC (tree
, nargs
+ 1);
16383 new_args
[0] = return_type
;
16384 memcpy (new_args
+ 1, args
, nargs
* sizeof (tree
));
16389 /* We allow incomplete unification without an error message here
16390 because the standard doesn't seem to explicitly prohibit it. Our
16391 callers must be ready to deal with unification failures in any
16394 TREE_VALUE (tinst
) = targs
;
16395 /* If we aren't explaining yet, push tinst context so we can see where
16396 any errors (e.g. from class instantiations triggered by instantiation
16397 of default template arguments) come from. If we are explaining, this
16398 context is redundant. */
16399 if (!explain_p
&& !push_tinst_level (tinst
))
16401 excessive_deduction_depth
= true;
16405 /* type_unification_real will pass back any access checks from default
16406 template argument substitution. */
16407 vec
<deferred_access_check
, va_gc
> *checks
;
16410 ok
= !type_unification_real (DECL_INNERMOST_TEMPLATE_PARMS (fn
),
16411 targs
, parms
, args
, nargs
, /*subr=*/0,
16412 strict
, flags
, &checks
, explain_p
);
16414 pop_tinst_level ();
16418 /* Now that we have bindings for all of the template arguments,
16419 ensure that the arguments deduced for the template template
16420 parameters have compatible template parameter lists. We cannot
16421 check this property before we have deduced all template
16422 arguments, because the template parameter types of a template
16423 template parameter might depend on prior template parameters
16424 deduced after the template template parameter. The following
16425 ill-formed example illustrates this issue:
16427 template<typename T, template<T> class C> void f(C<5>, T);
16429 template<int N> struct X {};
16432 f(X<5>(), 5l); // error: template argument deduction fails
16435 The template parameter list of 'C' depends on the template type
16436 parameter 'T', but 'C' is deduced to 'X' before 'T' is deduced to
16437 'long'. Thus, we can't check that 'C' cannot bind to 'X' at the
16438 time that we deduce 'C'. */
16439 if (!template_template_parm_bindings_ok_p
16440 (DECL_INNERMOST_TEMPLATE_PARMS (fn
), targs
))
16442 unify_inconsistent_template_template_parameters (explain_p
);
16446 /* All is well so far. Now, check:
16450 When all template arguments have been deduced, all uses of
16451 template parameters in nondeduced contexts are replaced with
16452 the corresponding deduced argument values. If the
16453 substitution results in an invalid type, as described above,
16454 type deduction fails. */
16455 TREE_VALUE (tinst
) = targs
;
16456 if (!push_tinst_level (tinst
))
16458 excessive_deduction_depth
= true;
16462 /* Also collect access checks from the instantiation. */
16463 reopen_deferring_access_checks (checks
);
16465 decl
= instantiate_template (fn
, targs
, complain
);
16467 checks
= get_deferred_access_checks ();
16468 pop_deferring_access_checks ();
16470 pop_tinst_level ();
16472 if (decl
== error_mark_node
)
16475 /* Now perform any access checks encountered during substitution. */
16476 push_access_scope (decl
);
16477 ok
= perform_access_checks (checks
, complain
);
16478 pop_access_scope (decl
);
16482 /* If we're looking for an exact match, check that what we got
16483 is indeed an exact match. It might not be if some template
16484 parameters are used in non-deduced contexts. But don't check
16485 for an exact match if we have dependent template arguments;
16486 in that case we're doing partial ordering, and we already know
16487 that we have two candidates that will provide the actual type. */
16488 if (strict
== DEDUCE_EXACT
&& !any_dependent_template_arguments_p (targs
))
16490 tree substed
= TREE_TYPE (decl
);
16494 = skip_artificial_parms_for (decl
, TYPE_ARG_TYPES (substed
));
16496 sarg
= tree_cons (NULL_TREE
, TREE_TYPE (substed
), sarg
);
16497 for (i
= 0; i
< nargs
&& sarg
; ++i
, sarg
= TREE_CHAIN (sarg
))
16498 if (!same_type_p (args
[i
], TREE_VALUE (sarg
)))
16500 unify_type_mismatch (explain_p
, args
[i
],
16501 TREE_VALUE (sarg
));
16510 if (excessive_deduction_depth
)
16512 if (deduction_depth
== 0)
16513 /* Reset once we're all the way out. */
16514 excessive_deduction_depth
= false;
16517 /* We can't free this if a pending_template entry or last_error_tinst_level
16518 is pointing at it. */
16519 if (last_pending_template
== old_last_pend
16520 && last_error_tinst_level
== old_error_tinst
)
16526 /* Adjust types before performing type deduction, as described in
16527 [temp.deduct.call] and [temp.deduct.conv]. The rules in these two
16528 sections are symmetric. PARM is the type of a function parameter
16529 or the return type of the conversion function. ARG is the type of
16530 the argument passed to the call, or the type of the value
16531 initialized with the result of the conversion function.
16532 ARG_EXPR is the original argument expression, which may be null. */
16535 maybe_adjust_types_for_deduction (unification_kind_t strict
,
16548 /* Swap PARM and ARG throughout the remainder of this
16549 function; the handling is precisely symmetric since PARM
16550 will initialize ARG rather than vice versa. */
16551 std::swap (parm
, arg
);
16555 /* Core issue #873: Do the DR606 thing (see below) for these cases,
16556 too, but here handle it by stripping the reference from PARM
16557 rather than by adding it to ARG. */
16558 if (TREE_CODE (*parm
) == REFERENCE_TYPE
16559 && TYPE_REF_IS_RVALUE (*parm
)
16560 && TREE_CODE (TREE_TYPE (*parm
)) == TEMPLATE_TYPE_PARM
16561 && cp_type_quals (TREE_TYPE (*parm
)) == TYPE_UNQUALIFIED
16562 && TREE_CODE (*arg
) == REFERENCE_TYPE
16563 && !TYPE_REF_IS_RVALUE (*arg
))
16564 *parm
= TREE_TYPE (*parm
);
16565 /* Nothing else to do in this case. */
16569 gcc_unreachable ();
16572 if (TREE_CODE (*parm
) != REFERENCE_TYPE
)
16574 /* [temp.deduct.call]
16576 If P is not a reference type:
16578 --If A is an array type, the pointer type produced by the
16579 array-to-pointer standard conversion (_conv.array_) is
16580 used in place of A for type deduction; otherwise,
16582 --If A is a function type, the pointer type produced by
16583 the function-to-pointer standard conversion
16584 (_conv.func_) is used in place of A for type deduction;
16587 --If A is a cv-qualified type, the top level
16588 cv-qualifiers of A's type are ignored for type
16590 if (TREE_CODE (*arg
) == ARRAY_TYPE
)
16591 *arg
= build_pointer_type (TREE_TYPE (*arg
));
16592 else if (TREE_CODE (*arg
) == FUNCTION_TYPE
)
16593 *arg
= build_pointer_type (*arg
);
16595 *arg
= TYPE_MAIN_VARIANT (*arg
);
16598 /* From C++0x [14.8.2.1/3 temp.deduct.call] (after DR606), "If P is
16599 of the form T&&, where T is a template parameter, and the argument
16600 is an lvalue, T is deduced as A& */
16601 if (TREE_CODE (*parm
) == REFERENCE_TYPE
16602 && TYPE_REF_IS_RVALUE (*parm
)
16603 && TREE_CODE (TREE_TYPE (*parm
)) == TEMPLATE_TYPE_PARM
16604 && cp_type_quals (TREE_TYPE (*parm
)) == TYPE_UNQUALIFIED
16605 && (arg_expr
? real_lvalue_p (arg_expr
)
16606 /* try_one_overload doesn't provide an arg_expr, but
16607 functions are always lvalues. */
16608 : TREE_CODE (*arg
) == FUNCTION_TYPE
))
16609 *arg
= build_reference_type (*arg
);
16611 /* [temp.deduct.call]
16613 If P is a cv-qualified type, the top level cv-qualifiers
16614 of P's type are ignored for type deduction. If P is a
16615 reference type, the type referred to by P is used for
16617 *parm
= TYPE_MAIN_VARIANT (*parm
);
16618 if (TREE_CODE (*parm
) == REFERENCE_TYPE
)
16620 *parm
= TREE_TYPE (*parm
);
16621 result
|= UNIFY_ALLOW_OUTER_MORE_CV_QUAL
;
16624 /* DR 322. For conversion deduction, remove a reference type on parm
16625 too (which has been swapped into ARG). */
16626 if (strict
== DEDUCE_CONV
&& TREE_CODE (*arg
) == REFERENCE_TYPE
)
16627 *arg
= TREE_TYPE (*arg
);
16632 /* Subroutine of unify_one_argument. PARM is a function parameter of a
16633 template which does contain any deducible template parameters; check if
16634 ARG is a suitable match for it. STRICT, FLAGS and EXPLAIN_P are as in
16635 unify_one_argument. */
16638 check_non_deducible_conversion (tree parm
, tree arg
, int strict
,
16639 int flags
, bool explain_p
)
16644 type
= TREE_TYPE (arg
);
16648 if (same_type_p (parm
, type
))
16649 return unify_success (explain_p
);
16651 if (strict
== DEDUCE_CONV
)
16653 if (can_convert_arg (type
, parm
, NULL_TREE
, flags
,
16654 explain_p
? tf_warning_or_error
: tf_none
))
16655 return unify_success (explain_p
);
16657 else if (strict
!= DEDUCE_EXACT
)
16659 if (can_convert_arg (parm
, type
,
16660 TYPE_P (arg
) ? NULL_TREE
: arg
,
16661 flags
, explain_p
? tf_warning_or_error
: tf_none
))
16662 return unify_success (explain_p
);
16665 if (strict
== DEDUCE_EXACT
)
16666 return unify_type_mismatch (explain_p
, parm
, arg
);
16668 return unify_arg_conversion (explain_p
, parm
, type
, arg
);
16671 static bool uses_deducible_template_parms (tree type
);
16673 /* Returns true iff the expression EXPR is one from which a template
16674 argument can be deduced. In other words, if it's an undecorated
16675 use of a template non-type parameter. */
16678 deducible_expression (tree expr
)
16680 return (TREE_CODE (expr
) == TEMPLATE_PARM_INDEX
);
16683 /* Returns true iff the array domain DOMAIN uses a template parameter in a
16684 deducible way; that is, if it has a max value of <PARM> - 1. */
16687 deducible_array_bound (tree domain
)
16689 if (domain
== NULL_TREE
)
16692 tree max
= TYPE_MAX_VALUE (domain
);
16693 if (TREE_CODE (max
) != MINUS_EXPR
)
16696 return deducible_expression (TREE_OPERAND (max
, 0));
16699 /* Returns true iff the template arguments ARGS use a template parameter
16700 in a deducible way. */
16703 deducible_template_args (tree args
)
16705 for (int i
= 0; i
< TREE_VEC_LENGTH (args
); ++i
)
16708 tree elt
= TREE_VEC_ELT (args
, i
);
16709 if (ARGUMENT_PACK_P (elt
))
16710 deducible
= deducible_template_args (ARGUMENT_PACK_ARGS (elt
));
16713 if (PACK_EXPANSION_P (elt
))
16714 elt
= PACK_EXPANSION_PATTERN (elt
);
16715 if (TREE_CODE (elt
) == TEMPLATE_TEMPLATE_PARM
)
16717 else if (TYPE_P (elt
))
16718 deducible
= uses_deducible_template_parms (elt
);
16720 deducible
= deducible_expression (elt
);
16728 /* Returns true iff TYPE contains any deducible references to template
16729 parameters, as per 14.8.2.5. */
16732 uses_deducible_template_parms (tree type
)
16734 if (PACK_EXPANSION_P (type
))
16735 type
= PACK_EXPANSION_PATTERN (type
);
16742 if (TREE_CODE (type
) == TEMPLATE_TYPE_PARM
16743 || TREE_CODE (type
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
16749 if (POINTER_TYPE_P (type
))
16750 return uses_deducible_template_parms (TREE_TYPE (type
));
16752 /* T[integer-constant ]
16754 if (TREE_CODE (type
) == ARRAY_TYPE
)
16755 return (uses_deducible_template_parms (TREE_TYPE (type
))
16756 || deducible_array_bound (TYPE_DOMAIN (type
)));
16768 if (TYPE_PTRMEM_P (type
))
16769 return (uses_deducible_template_parms (TYPE_PTRMEM_CLASS_TYPE (type
))
16770 || (uses_deducible_template_parms
16771 (TYPE_PTRMEM_POINTED_TO_TYPE (type
))));
16773 /* template-name <T> (where template-name refers to a class template)
16774 template-name <i> (where template-name refers to a class template) */
16775 if (CLASS_TYPE_P (type
)
16776 && CLASSTYPE_TEMPLATE_INFO (type
)
16777 && PRIMARY_TEMPLATE_P (CLASSTYPE_TI_TEMPLATE (type
)))
16778 return deducible_template_args (INNERMOST_TEMPLATE_ARGS
16779 (CLASSTYPE_TI_ARGS (type
)));
16784 if (TREE_CODE (type
) == FUNCTION_TYPE
16785 || TREE_CODE (type
) == METHOD_TYPE
)
16787 if (uses_deducible_template_parms (TREE_TYPE (type
)))
16789 tree parm
= TYPE_ARG_TYPES (type
);
16790 if (TREE_CODE (type
) == METHOD_TYPE
)
16791 parm
= TREE_CHAIN (parm
);
16792 for (; parm
; parm
= TREE_CHAIN (parm
))
16793 if (uses_deducible_template_parms (TREE_VALUE (parm
)))
16800 /* Subroutine of type_unification_real and unify_pack_expansion to
16801 handle unification of a single P/A pair. Parameters are as
16802 for those functions. */
16805 unify_one_argument (tree tparms
, tree targs
, tree parm
, tree arg
,
16806 int subr
, unification_kind_t strict
,
16809 tree arg_expr
= NULL_TREE
;
16812 if (arg
== error_mark_node
|| parm
== error_mark_node
)
16813 return unify_invalid (explain_p
);
16814 if (arg
== unknown_type_node
)
16815 /* We can't deduce anything from this, but we might get all the
16816 template args from other function args. */
16817 return unify_success (explain_p
);
16819 /* Implicit conversions (Clause 4) will be performed on a function
16820 argument to convert it to the type of the corresponding function
16821 parameter if the parameter type contains no template-parameters that
16822 participate in template argument deduction. */
16823 if (strict
!= DEDUCE_EXACT
16824 && TYPE_P (parm
) && !uses_deducible_template_parms (parm
))
16825 /* For function parameters with no deducible template parameters,
16826 just return. We'll check non-dependent conversions later. */
16827 return unify_success (explain_p
);
16832 arg_strict
= (UNIFY_ALLOW_OUTER_LEVEL
16833 | UNIFY_ALLOW_MORE_CV_QUAL
16834 | UNIFY_ALLOW_DERIVED
);
16838 arg_strict
= UNIFY_ALLOW_LESS_CV_QUAL
;
16842 arg_strict
= UNIFY_ALLOW_NONE
;
16846 gcc_unreachable ();
16849 /* We only do these transformations if this is the top-level
16850 parameter_type_list in a call or declaration matching; in other
16851 situations (nested function declarators, template argument lists) we
16852 won't be comparing a type to an expression, and we don't do any type
16858 gcc_assert (TREE_TYPE (arg
) != NULL_TREE
);
16859 if (type_unknown_p (arg
))
16861 /* [temp.deduct.type] A template-argument can be
16862 deduced from a pointer to function or pointer
16863 to member function argument if the set of
16864 overloaded functions does not contain function
16865 templates and at most one of a set of
16866 overloaded functions provides a unique
16869 if (resolve_overloaded_unification
16870 (tparms
, targs
, parm
, arg
, strict
,
16871 arg_strict
, explain_p
))
16872 return unify_success (explain_p
);
16873 return unify_overload_resolution_failure (explain_p
, arg
);
16877 arg
= unlowered_expr_type (arg
);
16878 if (arg
== error_mark_node
)
16879 return unify_invalid (explain_p
);
16883 maybe_adjust_types_for_deduction (strict
, &parm
, &arg
, arg_expr
);
16886 if ((TYPE_P (parm
) || TREE_CODE (parm
) == TEMPLATE_DECL
)
16887 != (TYPE_P (arg
) || TREE_CODE (arg
) == TEMPLATE_DECL
))
16888 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
16890 /* For deduction from an init-list we need the actual list. */
16891 if (arg_expr
&& BRACE_ENCLOSED_INITIALIZER_P (arg_expr
))
16893 return unify (tparms
, targs
, parm
, arg
, arg_strict
, explain_p
);
16896 /* Most parms like fn_type_unification.
16898 If SUBR is 1, we're being called recursively (to unify the
16899 arguments of a function or method parameter of a function
16902 CHECKS is a pointer to a vector of access checks encountered while
16903 substituting default template arguments. */
16906 type_unification_real (tree tparms
,
16910 unsigned int xnargs
,
16912 unification_kind_t strict
,
16914 vec
<deferred_access_check
, va_gc
> **checks
,
16919 int ntparms
= TREE_VEC_LENGTH (tparms
);
16920 int saw_undeduced
= 0;
16923 unsigned int nargs
;
16926 gcc_assert (TREE_CODE (tparms
) == TREE_VEC
);
16927 gcc_assert (xparms
== NULL_TREE
|| TREE_CODE (xparms
) == TREE_LIST
);
16928 gcc_assert (ntparms
> 0);
16930 /* Reset the number of non-defaulted template arguments contained
16932 NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
) = NULL_TREE
;
16940 while (parms
&& parms
!= void_list_node
16943 parm
= TREE_VALUE (parms
);
16945 if (TREE_CODE (parm
) == TYPE_PACK_EXPANSION
16946 && (!TREE_CHAIN (parms
) || TREE_CHAIN (parms
) == void_list_node
))
16947 /* For a function parameter pack that occurs at the end of the
16948 parameter-declaration-list, the type A of each remaining
16949 argument of the call is compared with the type P of the
16950 declarator-id of the function parameter pack. */
16953 parms
= TREE_CHAIN (parms
);
16955 if (TREE_CODE (parm
) == TYPE_PACK_EXPANSION
)
16956 /* For a function parameter pack that does not occur at the
16957 end of the parameter-declaration-list, the type of the
16958 parameter pack is a non-deduced context. */
16964 if (unify_one_argument (tparms
, targs
, parm
, arg
, subr
, strict
,
16970 && parms
!= void_list_node
16971 && TREE_CODE (TREE_VALUE (parms
)) == TYPE_PACK_EXPANSION
)
16973 /* Unify the remaining arguments with the pack expansion type. */
16975 tree parmvec
= make_tree_vec (1);
16977 /* Allocate a TREE_VEC and copy in all of the arguments */
16978 argvec
= make_tree_vec (nargs
- ia
);
16979 for (i
= 0; ia
< nargs
; ++ia
, ++i
)
16980 TREE_VEC_ELT (argvec
, i
) = args
[ia
];
16982 /* Copy the parameter into parmvec. */
16983 TREE_VEC_ELT (parmvec
, 0) = TREE_VALUE (parms
);
16984 if (unify_pack_expansion (tparms
, targs
, parmvec
, argvec
, strict
,
16985 /*subr=*/subr
, explain_p
))
16988 /* Advance to the end of the list of parameters. */
16989 parms
= TREE_CHAIN (parms
);
16992 /* Fail if we've reached the end of the parm list, and more args
16993 are present, and the parm list isn't variadic. */
16994 if (ia
< nargs
&& parms
== void_list_node
)
16995 return unify_too_many_arguments (explain_p
, nargs
, ia
);
16996 /* Fail if parms are left and they don't have default values and
16997 they aren't all deduced as empty packs (c++/57397). This is
16998 consistent with sufficient_parms_p. */
16999 if (parms
&& parms
!= void_list_node
17000 && TREE_PURPOSE (parms
) == NULL_TREE
)
17002 unsigned int count
= nargs
;
17007 type_pack_p
= TREE_CODE (TREE_VALUE (p
)) == TYPE_PACK_EXPANSION
;
17010 p
= TREE_CHAIN (p
);
17012 while (p
&& p
!= void_list_node
);
17013 if (count
!= nargs
)
17014 return unify_too_few_arguments (explain_p
, ia
, count
,
17020 tsubst_flags_t complain
= (explain_p
17021 ? tf_warning_or_error
17024 for (i
= 0; i
< ntparms
; i
++)
17026 tree targ
= TREE_VEC_ELT (targs
, i
);
17027 tree tparm
= TREE_VEC_ELT (tparms
, i
);
17029 /* Clear the "incomplete" flags on all argument packs now so that
17030 substituting them into later default arguments works. */
17031 if (targ
&& ARGUMENT_PACK_P (targ
))
17033 ARGUMENT_PACK_INCOMPLETE_P (targ
) = 0;
17034 ARGUMENT_PACK_EXPLICIT_ARGS (targ
) = NULL_TREE
;
17037 if (targ
|| tparm
== error_mark_node
)
17039 tparm
= TREE_VALUE (tparm
);
17041 /* If this is an undeduced nontype parameter that depends on
17042 a type parameter, try another pass; its type may have been
17043 deduced from a later argument than the one from which
17044 this parameter can be deduced. */
17045 if (TREE_CODE (tparm
) == PARM_DECL
17046 && uses_template_parms (TREE_TYPE (tparm
))
17047 && saw_undeduced
< 2)
17053 /* Core issue #226 (C++0x) [temp.deduct]:
17055 If a template argument has not been deduced, its
17056 default template argument, if any, is used.
17058 When we are in C++98 mode, TREE_PURPOSE will either
17059 be NULL_TREE or ERROR_MARK_NODE, so we do not need
17060 to explicitly check cxx_dialect here. */
17061 if (TREE_PURPOSE (TREE_VEC_ELT (tparms
, i
)))
17062 /* OK, there is a default argument. Wait until after the
17063 conversion check to do substitution. */
17066 /* If the type parameter is a parameter pack, then it will
17067 be deduced to an empty parameter pack. */
17068 if (template_parameter_pack_p (tparm
))
17072 if (TREE_CODE (tparm
) == TEMPLATE_PARM_INDEX
)
17074 arg
= make_node (NONTYPE_ARGUMENT_PACK
);
17075 TREE_TYPE (arg
) = TREE_TYPE (TEMPLATE_PARM_DECL (tparm
));
17076 TREE_CONSTANT (arg
) = 1;
17079 arg
= cxx_make_type (TYPE_ARGUMENT_PACK
);
17081 SET_ARGUMENT_PACK_ARGS (arg
, make_tree_vec (0));
17083 TREE_VEC_ELT (targs
, i
) = arg
;
17087 return unify_parameter_deduction_failure (explain_p
, tparm
);
17090 /* DR 1391: All parameters have args, now check non-dependent parms for
17092 if (saw_undeduced
< 2)
17093 for (ia
= 0, parms
= xparms
, args
= xargs
, nargs
= xnargs
;
17094 parms
&& parms
!= void_list_node
&& ia
< nargs
; )
17096 parm
= TREE_VALUE (parms
);
17098 if (TREE_CODE (parm
) == TYPE_PACK_EXPANSION
17099 && (!TREE_CHAIN (parms
)
17100 || TREE_CHAIN (parms
) == void_list_node
))
17101 /* For a function parameter pack that occurs at the end of the
17102 parameter-declaration-list, the type A of each remaining
17103 argument of the call is compared with the type P of the
17104 declarator-id of the function parameter pack. */
17107 parms
= TREE_CHAIN (parms
);
17109 if (TREE_CODE (parm
) == TYPE_PACK_EXPANSION
)
17110 /* For a function parameter pack that does not occur at the
17111 end of the parameter-declaration-list, the type of the
17112 parameter pack is a non-deduced context. */
17118 if (uses_template_parms (parm
))
17120 if (check_non_deducible_conversion (parm
, arg
, strict
, flags
,
17125 /* Now substitute into the default template arguments. */
17126 for (i
= 0; i
< ntparms
; i
++)
17128 tree targ
= TREE_VEC_ELT (targs
, i
);
17129 tree tparm
= TREE_VEC_ELT (tparms
, i
);
17131 if (targ
|| tparm
== error_mark_node
)
17133 tree parm
= TREE_VALUE (tparm
);
17135 if (TREE_CODE (parm
) == PARM_DECL
17136 && uses_template_parms (TREE_TYPE (parm
))
17137 && saw_undeduced
< 2)
17140 tree arg
= TREE_PURPOSE (tparm
);
17141 reopen_deferring_access_checks (*checks
);
17142 location_t save_loc
= input_location
;
17144 input_location
= DECL_SOURCE_LOCATION (parm
);
17145 arg
= tsubst_template_arg (arg
, targs
, complain
, NULL_TREE
);
17146 arg
= convert_template_argument (parm
, arg
, targs
, complain
,
17148 input_location
= save_loc
;
17149 *checks
= get_deferred_access_checks ();
17150 pop_deferring_access_checks ();
17151 if (arg
== error_mark_node
)
17155 TREE_VEC_ELT (targs
, i
) = arg
;
17156 /* The position of the first default template argument,
17157 is also the number of non-defaulted arguments in TARGS.
17159 if (!NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
))
17160 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
, i
);
17165 if (saw_undeduced
++ == 1)
17168 #ifdef ENABLE_CHECKING
17169 if (!NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
))
17170 SET_NON_DEFAULT_TEMPLATE_ARGS_COUNT (targs
, TREE_VEC_LENGTH (targs
));
17173 return unify_success (explain_p
);
17176 /* Subroutine of type_unification_real. Args are like the variables
17177 at the call site. ARG is an overloaded function (or template-id);
17178 we try deducing template args from each of the overloads, and if
17179 only one succeeds, we go with that. Modifies TARGS and returns
17180 true on success. */
17183 resolve_overloaded_unification (tree tparms
,
17187 unification_kind_t strict
,
17191 tree tempargs
= copy_node (targs
);
17193 tree goodfn
= NULL_TREE
;
17196 if (TREE_CODE (arg
) == ADDR_EXPR
)
17198 arg
= TREE_OPERAND (arg
, 0);
17204 if (TREE_CODE (arg
) == COMPONENT_REF
)
17205 /* Handle `&x' where `x' is some static or non-static member
17207 arg
= TREE_OPERAND (arg
, 1);
17209 if (TREE_CODE (arg
) == OFFSET_REF
)
17210 arg
= TREE_OPERAND (arg
, 1);
17212 /* Strip baselink information. */
17213 if (BASELINK_P (arg
))
17214 arg
= BASELINK_FUNCTIONS (arg
);
17216 if (TREE_CODE (arg
) == TEMPLATE_ID_EXPR
)
17218 /* If we got some explicit template args, we need to plug them into
17219 the affected templates before we try to unify, in case the
17220 explicit args will completely resolve the templates in question. */
17223 tree expl_subargs
= TREE_OPERAND (arg
, 1);
17224 arg
= TREE_OPERAND (arg
, 0);
17226 for (; arg
; arg
= OVL_NEXT (arg
))
17228 tree fn
= OVL_CURRENT (arg
);
17229 tree subargs
, elem
;
17231 if (TREE_CODE (fn
) != TEMPLATE_DECL
)
17234 subargs
= coerce_template_parms (DECL_INNERMOST_TEMPLATE_PARMS (fn
),
17235 expl_subargs
, NULL_TREE
, tf_none
,
17236 /*require_all_args=*/true,
17237 /*use_default_args=*/true);
17238 if (subargs
!= error_mark_node
17239 && !any_dependent_template_arguments_p (subargs
))
17241 elem
= TREE_TYPE (instantiate_template (fn
, subargs
, tf_none
));
17242 if (try_one_overload (tparms
, targs
, tempargs
, parm
,
17243 elem
, strict
, sub_strict
, addr_p
, explain_p
)
17244 && (!goodfn
|| !same_type_p (goodfn
, elem
)))
17253 /* If no templates (or more than one) are fully resolved by the
17254 explicit arguments, this template-id is a non-deduced context; it
17255 could still be OK if we deduce all template arguments for the
17256 enclosing call through other arguments. */
17260 else if (TREE_CODE (arg
) != OVERLOAD
17261 && TREE_CODE (arg
) != FUNCTION_DECL
)
17262 /* If ARG is, for example, "(0, &f)" then its type will be unknown
17263 -- but the deduction does not succeed because the expression is
17264 not just the function on its own. */
17267 for (; arg
; arg
= OVL_NEXT (arg
))
17268 if (try_one_overload (tparms
, targs
, tempargs
, parm
,
17269 TREE_TYPE (OVL_CURRENT (arg
)),
17270 strict
, sub_strict
, addr_p
, explain_p
)
17271 && (!goodfn
|| !decls_match (goodfn
, OVL_CURRENT (arg
))))
17273 goodfn
= OVL_CURRENT (arg
);
17277 /* [temp.deduct.type] A template-argument can be deduced from a pointer
17278 to function or pointer to member function argument if the set of
17279 overloaded functions does not contain function templates and at most
17280 one of a set of overloaded functions provides a unique match.
17282 So if we found multiple possibilities, we return success but don't
17283 deduce anything. */
17287 int i
= TREE_VEC_LENGTH (targs
);
17289 if (TREE_VEC_ELT (tempargs
, i
))
17291 tree old
= TREE_VEC_ELT (targs
, i
);
17292 tree new_
= TREE_VEC_ELT (tempargs
, i
);
17293 if (new_
&& old
&& ARGUMENT_PACK_P (old
)
17294 && ARGUMENT_PACK_EXPLICIT_ARGS (old
))
17295 /* Don't forget explicit template arguments in a pack. */
17296 ARGUMENT_PACK_EXPLICIT_ARGS (new_
)
17297 = ARGUMENT_PACK_EXPLICIT_ARGS (old
);
17298 TREE_VEC_ELT (targs
, i
) = new_
;
17307 /* Core DR 115: In contexts where deduction is done and fails, or in
17308 contexts where deduction is not done, if a template argument list is
17309 specified and it, along with any default template arguments, identifies
17310 a single function template specialization, then the template-id is an
17311 lvalue for the function template specialization. */
17314 resolve_nondeduced_context (tree orig_expr
)
17316 tree expr
, offset
, baselink
;
17319 if (!type_unknown_p (orig_expr
))
17324 offset
= NULL_TREE
;
17325 baselink
= NULL_TREE
;
17327 if (TREE_CODE (expr
) == ADDR_EXPR
)
17329 expr
= TREE_OPERAND (expr
, 0);
17332 if (TREE_CODE (expr
) == OFFSET_REF
)
17335 expr
= TREE_OPERAND (expr
, 1);
17337 if (BASELINK_P (expr
))
17340 expr
= BASELINK_FUNCTIONS (expr
);
17343 if (TREE_CODE (expr
) == TEMPLATE_ID_EXPR
)
17346 tree goodfn
= NULL_TREE
;
17348 /* If we got some explicit template args, we need to plug them into
17349 the affected templates before we try to unify, in case the
17350 explicit args will completely resolve the templates in question. */
17352 tree expl_subargs
= TREE_OPERAND (expr
, 1);
17353 tree arg
= TREE_OPERAND (expr
, 0);
17354 tree badfn
= NULL_TREE
;
17355 tree badargs
= NULL_TREE
;
17357 for (; arg
; arg
= OVL_NEXT (arg
))
17359 tree fn
= OVL_CURRENT (arg
);
17360 tree subargs
, elem
;
17362 if (TREE_CODE (fn
) != TEMPLATE_DECL
)
17365 subargs
= coerce_template_parms (DECL_INNERMOST_TEMPLATE_PARMS (fn
),
17366 expl_subargs
, NULL_TREE
, tf_none
,
17367 /*require_all_args=*/true,
17368 /*use_default_args=*/true);
17369 if (subargs
!= error_mark_node
17370 && !any_dependent_template_arguments_p (subargs
))
17372 elem
= instantiate_template (fn
, subargs
, tf_none
);
17373 if (elem
== error_mark_node
)
17378 else if (elem
&& (!goodfn
|| !decls_match (goodfn
, elem
)))
17387 mark_used (goodfn
);
17390 expr
= build_baselink (BASELINK_BINFO (baselink
),
17391 BASELINK_ACCESS_BINFO (baselink
),
17392 expr
, BASELINK_OPTYPE (baselink
));
17396 = TYPE_MAIN_VARIANT (TREE_TYPE (TREE_OPERAND (offset
, 0)));
17397 expr
= build_offset_ref (base
, expr
, addr
, tf_warning_or_error
);
17400 expr
= cp_build_addr_expr (expr
, tf_warning_or_error
);
17403 else if (good
== 0 && badargs
)
17404 /* There were no good options and at least one bad one, so let the
17405 user know what the problem is. */
17406 instantiate_template (badfn
, badargs
, tf_warning_or_error
);
17411 /* Subroutine of resolve_overloaded_unification; does deduction for a single
17412 overload. Fills TARGS with any deduced arguments, or error_mark_node if
17413 different overloads deduce different arguments for a given parm.
17414 ADDR_P is true if the expression for which deduction is being
17415 performed was of the form "& fn" rather than simply "fn".
17417 Returns 1 on success. */
17420 try_one_overload (tree tparms
,
17425 unification_kind_t strict
,
17434 if (arg
== error_mark_node
)
17437 /* [temp.deduct.type] A template-argument can be deduced from a pointer
17438 to function or pointer to member function argument if the set of
17439 overloaded functions does not contain function templates and at most
17440 one of a set of overloaded functions provides a unique match.
17442 So if this is a template, just return success. */
17444 if (uses_template_parms (arg
))
17447 if (TREE_CODE (arg
) == METHOD_TYPE
)
17448 arg
= build_ptrmemfunc_type (build_pointer_type (arg
));
17450 arg
= build_pointer_type (arg
);
17452 sub_strict
|= maybe_adjust_types_for_deduction (strict
, &parm
, &arg
, NULL
);
17454 /* We don't copy orig_targs for this because if we have already deduced
17455 some template args from previous args, unify would complain when we
17456 try to deduce a template parameter for the same argument, even though
17457 there isn't really a conflict. */
17458 nargs
= TREE_VEC_LENGTH (targs
);
17459 tempargs
= make_tree_vec (nargs
);
17461 if (unify (tparms
, tempargs
, parm
, arg
, sub_strict
, explain_p
))
17464 /* First make sure we didn't deduce anything that conflicts with
17465 explicitly specified args. */
17466 for (i
= nargs
; i
--; )
17468 tree elt
= TREE_VEC_ELT (tempargs
, i
);
17469 tree oldelt
= TREE_VEC_ELT (orig_targs
, i
);
17473 else if (uses_template_parms (elt
))
17474 /* Since we're unifying against ourselves, we will fill in
17475 template args used in the function parm list with our own
17476 template parms. Discard them. */
17477 TREE_VEC_ELT (tempargs
, i
) = NULL_TREE
;
17478 else if (oldelt
&& !template_args_equal (oldelt
, elt
))
17482 for (i
= nargs
; i
--; )
17484 tree elt
= TREE_VEC_ELT (tempargs
, i
);
17487 TREE_VEC_ELT (targs
, i
) = elt
;
17493 /* PARM is a template class (perhaps with unbound template
17494 parameters). ARG is a fully instantiated type. If ARG can be
17495 bound to PARM, return ARG, otherwise return NULL_TREE. TPARMS and
17496 TARGS are as for unify. */
17499 try_class_unification (tree tparms
, tree targs
, tree parm
, tree arg
,
17502 tree copy_of_targs
;
17504 if (!CLASSTYPE_TEMPLATE_INFO (arg
)
17505 || (most_general_template (CLASSTYPE_TI_TEMPLATE (arg
))
17506 != most_general_template (CLASSTYPE_TI_TEMPLATE (parm
))))
17509 /* We need to make a new template argument vector for the call to
17510 unify. If we used TARGS, we'd clutter it up with the result of
17511 the attempted unification, even if this class didn't work out.
17512 We also don't want to commit ourselves to all the unifications
17513 we've already done, since unification is supposed to be done on
17514 an argument-by-argument basis. In other words, consider the
17515 following pathological case:
17517 template <int I, int J, int K>
17520 template <int I, int J>
17521 struct S<I, J, 2> : public S<I, I, I>, S<J, J, J> {};
17523 template <int I, int J, int K>
17524 void f(S<I, J, K>, S<I, I, I>);
17533 Now, by the time we consider the unification involving `s2', we
17534 already know that we must have `f<0, 0, 0>'. But, even though
17535 `S<0, 1, 2>' is derived from `S<0, 0, 0>', the code is invalid
17536 because there are two ways to unify base classes of S<0, 1, 2>
17537 with S<I, I, I>. If we kept the already deduced knowledge, we
17538 would reject the possibility I=1. */
17539 copy_of_targs
= make_tree_vec (TREE_VEC_LENGTH (targs
));
17541 /* If unification failed, we're done. */
17542 if (unify (tparms
, copy_of_targs
, CLASSTYPE_TI_ARGS (parm
),
17543 CLASSTYPE_TI_ARGS (arg
), UNIFY_ALLOW_NONE
, explain_p
))
17549 /* Given a template type PARM and a class type ARG, find the unique
17550 base type in ARG that is an instance of PARM. We do not examine
17551 ARG itself; only its base-classes. If there is not exactly one
17552 appropriate base class, return NULL_TREE. PARM may be the type of
17553 a partial specialization, as well as a plain template type. Used
17556 static enum template_base_result
17557 get_template_base (tree tparms
, tree targs
, tree parm
, tree arg
,
17558 bool explain_p
, tree
*result
)
17560 tree rval
= NULL_TREE
;
17563 gcc_assert (RECORD_OR_UNION_CODE_P (TREE_CODE (arg
)));
17565 binfo
= TYPE_BINFO (complete_type (arg
));
17568 /* The type could not be completed. */
17569 *result
= NULL_TREE
;
17570 return tbr_incomplete_type
;
17573 /* Walk in inheritance graph order. The search order is not
17574 important, and this avoids multiple walks of virtual bases. */
17575 for (binfo
= TREE_CHAIN (binfo
); binfo
; binfo
= TREE_CHAIN (binfo
))
17577 tree r
= try_class_unification (tparms
, targs
, parm
,
17578 BINFO_TYPE (binfo
), explain_p
);
17582 /* If there is more than one satisfactory baseclass, then:
17586 If they yield more than one possible deduced A, the type
17590 if (rval
&& !same_type_p (r
, rval
))
17592 *result
= NULL_TREE
;
17593 return tbr_ambiguous_baseclass
;
17601 return tbr_success
;
17604 /* Returns the level of DECL, which declares a template parameter. */
17607 template_decl_level (tree decl
)
17609 switch (TREE_CODE (decl
))
17612 case TEMPLATE_DECL
:
17613 return TEMPLATE_TYPE_LEVEL (TREE_TYPE (decl
));
17616 return TEMPLATE_PARM_LEVEL (DECL_INITIAL (decl
));
17619 gcc_unreachable ();
17624 /* Decide whether ARG can be unified with PARM, considering only the
17625 cv-qualifiers of each type, given STRICT as documented for unify.
17626 Returns nonzero iff the unification is OK on that basis. */
17629 check_cv_quals_for_unify (int strict
, tree arg
, tree parm
)
17631 int arg_quals
= cp_type_quals (arg
);
17632 int parm_quals
= cp_type_quals (parm
);
17634 if (TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
17635 && !(strict
& UNIFY_ALLOW_OUTER_MORE_CV_QUAL
))
17637 /* Although a CVR qualifier is ignored when being applied to a
17638 substituted template parameter ([8.3.2]/1 for example), that
17639 does not allow us to unify "const T" with "int&" because both
17640 types are not of the form "cv-list T" [14.8.2.5 temp.deduct.type].
17641 It is ok when we're allowing additional CV qualifiers
17642 at the outer level [14.8.2.1]/3,1st bullet. */
17643 if ((TREE_CODE (arg
) == REFERENCE_TYPE
17644 || TREE_CODE (arg
) == FUNCTION_TYPE
17645 || TREE_CODE (arg
) == METHOD_TYPE
)
17646 && (parm_quals
& (TYPE_QUAL_CONST
| TYPE_QUAL_VOLATILE
)))
17649 if ((!POINTER_TYPE_P (arg
) && TREE_CODE (arg
) != TEMPLATE_TYPE_PARM
)
17650 && (parm_quals
& TYPE_QUAL_RESTRICT
))
17654 if (!(strict
& (UNIFY_ALLOW_MORE_CV_QUAL
| UNIFY_ALLOW_OUTER_MORE_CV_QUAL
))
17655 && (arg_quals
& parm_quals
) != parm_quals
)
17658 if (!(strict
& (UNIFY_ALLOW_LESS_CV_QUAL
| UNIFY_ALLOW_OUTER_LESS_CV_QUAL
))
17659 && (parm_quals
& arg_quals
) != arg_quals
)
17665 /* Determines the LEVEL and INDEX for the template parameter PARM. */
17667 template_parm_level_and_index (tree parm
, int* level
, int* index
)
17669 if (TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
17670 || TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
17671 || TREE_CODE (parm
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
17673 *index
= TEMPLATE_TYPE_IDX (parm
);
17674 *level
= TEMPLATE_TYPE_LEVEL (parm
);
17678 *index
= TEMPLATE_PARM_IDX (parm
);
17679 *level
= TEMPLATE_PARM_LEVEL (parm
);
17683 #define RECUR_AND_CHECK_FAILURE(TP, TA, P, A, S, EP) \
17685 if (unify (TP, TA, P, A, S, EP)) \
17689 /* Unifies the remaining arguments in PACKED_ARGS with the pack
17690 expansion at the end of PACKED_PARMS. Returns 0 if the type
17691 deduction succeeds, 1 otherwise. STRICT is the same as in
17692 unify. CALL_ARGS_P is true iff PACKED_ARGS is actually a function
17693 call argument list. We'll need to adjust the arguments to make them
17694 types. SUBR tells us if this is from a recursive call to
17695 type_unification_real, or for comparing two template argument
17699 unify_pack_expansion (tree tparms
, tree targs
, tree packed_parms
,
17700 tree packed_args
, unification_kind_t strict
,
17701 bool subr
, bool explain_p
)
17704 = TREE_VEC_ELT (packed_parms
, TREE_VEC_LENGTH (packed_parms
) - 1);
17705 tree pattern
= PACK_EXPANSION_PATTERN (parm
);
17706 tree pack
, packs
= NULL_TREE
;
17707 int i
, start
= TREE_VEC_LENGTH (packed_parms
) - 1;
17709 packed_args
= expand_template_argument_pack (packed_args
);
17711 int len
= TREE_VEC_LENGTH (packed_args
);
17713 /* Determine the parameter packs we will be deducing from the
17714 pattern, and record their current deductions. */
17715 for (pack
= PACK_EXPANSION_PARAMETER_PACKS (parm
);
17716 pack
; pack
= TREE_CHAIN (pack
))
17718 tree parm_pack
= TREE_VALUE (pack
);
17721 /* Determine the index and level of this parameter pack. */
17722 template_parm_level_and_index (parm_pack
, &level
, &idx
);
17724 /* Keep track of the parameter packs and their corresponding
17726 packs
= tree_cons (parm_pack
, TMPL_ARG (targs
, level
, idx
), packs
);
17727 TREE_TYPE (packs
) = make_tree_vec (len
- start
);
17730 /* Loop through all of the arguments that have not yet been
17731 unified and unify each with the pattern. */
17732 for (i
= start
; i
< len
; i
++)
17735 bool any_explicit
= false;
17736 tree arg
= TREE_VEC_ELT (packed_args
, i
);
17738 /* For each parameter pack, set its TMPL_ARG to either NULL_TREE
17739 or the element of its argument pack at the current index if
17740 this argument was explicitly specified. */
17741 for (pack
= packs
; pack
; pack
= TREE_CHAIN (pack
))
17745 template_parm_level_and_index (TREE_PURPOSE (pack
), &level
, &idx
);
17748 if (TREE_VALUE (pack
)
17749 && (pargs
= ARGUMENT_PACK_EXPLICIT_ARGS (TREE_VALUE (pack
)))
17750 && (i
- start
< TREE_VEC_LENGTH (pargs
)))
17752 any_explicit
= true;
17753 arg
= TREE_VEC_ELT (pargs
, i
- start
);
17755 TMPL_ARG (targs
, level
, idx
) = arg
;
17758 /* If we had explicit template arguments, substitute them into the
17759 pattern before deduction. */
17762 /* Some arguments might still be unspecified or dependent. */
17764 ++processing_template_decl
;
17765 dependent
= any_dependent_template_arguments_p (targs
);
17767 --processing_template_decl
;
17768 parm
= tsubst (pattern
, targs
,
17769 explain_p
? tf_warning_or_error
: tf_none
,
17772 --processing_template_decl
;
17773 if (parm
== error_mark_node
)
17779 /* Unify the pattern with the current argument. */
17780 if (unify_one_argument (tparms
, targs
, parm
, arg
, subr
, strict
,
17784 /* For each parameter pack, collect the deduced value. */
17785 for (pack
= packs
; pack
; pack
= TREE_CHAIN (pack
))
17788 template_parm_level_and_index (TREE_PURPOSE (pack
), &level
, &idx
);
17790 TREE_VEC_ELT (TREE_TYPE (pack
), i
- start
) =
17791 TMPL_ARG (targs
, level
, idx
);
17795 /* Verify that the results of unification with the parameter packs
17796 produce results consistent with what we've seen before, and make
17797 the deduced argument packs available. */
17798 for (pack
= packs
; pack
; pack
= TREE_CHAIN (pack
))
17800 tree old_pack
= TREE_VALUE (pack
);
17801 tree new_args
= TREE_TYPE (pack
);
17802 int i
, len
= TREE_VEC_LENGTH (new_args
);
17804 bool nondeduced_p
= false;
17806 /* By default keep the original deduced argument pack.
17807 If necessary, more specific code is going to update the
17808 resulting deduced argument later down in this function. */
17809 template_parm_level_and_index (TREE_PURPOSE (pack
), &level
, &idx
);
17810 TMPL_ARG (targs
, level
, idx
) = old_pack
;
17812 /* If NEW_ARGS contains any NULL_TREE entries, we didn't
17813 actually deduce anything. */
17814 for (i
= 0; i
< len
&& !nondeduced_p
; ++i
)
17815 if (TREE_VEC_ELT (new_args
, i
) == NULL_TREE
)
17816 nondeduced_p
= true;
17820 if (old_pack
&& ARGUMENT_PACK_INCOMPLETE_P (old_pack
))
17822 /* If we had fewer function args than explicit template args,
17823 just use the explicits. */
17824 tree explicit_args
= ARGUMENT_PACK_EXPLICIT_ARGS (old_pack
);
17825 int explicit_len
= TREE_VEC_LENGTH (explicit_args
);
17826 if (len
< explicit_len
)
17827 new_args
= explicit_args
;
17833 /* Build the deduced *_ARGUMENT_PACK. */
17834 if (TREE_CODE (TREE_PURPOSE (pack
)) == TEMPLATE_PARM_INDEX
)
17836 result
= make_node (NONTYPE_ARGUMENT_PACK
);
17837 TREE_TYPE (result
) =
17838 TREE_TYPE (TEMPLATE_PARM_DECL (TREE_PURPOSE (pack
)));
17839 TREE_CONSTANT (result
) = 1;
17842 result
= cxx_make_type (TYPE_ARGUMENT_PACK
);
17844 SET_ARGUMENT_PACK_ARGS (result
, new_args
);
17846 /* Note the deduced argument packs for this parameter
17848 TMPL_ARG (targs
, level
, idx
) = result
;
17850 else if (ARGUMENT_PACK_INCOMPLETE_P (old_pack
)
17851 && (ARGUMENT_PACK_ARGS (old_pack
)
17852 == ARGUMENT_PACK_EXPLICIT_ARGS (old_pack
)))
17854 /* We only had the explicitly-provided arguments before, but
17855 now we have a complete set of arguments. */
17856 tree explicit_args
= ARGUMENT_PACK_EXPLICIT_ARGS (old_pack
);
17858 SET_ARGUMENT_PACK_ARGS (old_pack
, new_args
);
17859 ARGUMENT_PACK_INCOMPLETE_P (old_pack
) = 1;
17860 ARGUMENT_PACK_EXPLICIT_ARGS (old_pack
) = explicit_args
;
17864 tree bad_old_arg
= NULL_TREE
, bad_new_arg
= NULL_TREE
;
17865 tree old_args
= ARGUMENT_PACK_ARGS (old_pack
);
17867 if (!comp_template_args_with_info (old_args
, new_args
,
17868 &bad_old_arg
, &bad_new_arg
))
17869 /* Inconsistent unification of this parameter pack. */
17870 return unify_parameter_pack_inconsistent (explain_p
,
17876 return unify_success (explain_p
);
17879 /* Handle unification of the domain of an array. PARM_DOM and ARG_DOM are
17880 INTEGER_TYPEs representing the TYPE_DOMAIN of ARRAY_TYPEs. The other
17881 parameters and return value are as for unify. */
17884 unify_array_domain (tree tparms
, tree targs
,
17885 tree parm_dom
, tree arg_dom
,
17893 /* Our representation of array types uses "N - 1" as the
17894 TYPE_MAX_VALUE for an array with "N" elements, if "N" is
17895 not an integer constant. We cannot unify arbitrarily
17896 complex expressions, so we eliminate the MINUS_EXPRs
17898 parm_max
= TYPE_MAX_VALUE (parm_dom
);
17899 parm_cst
= TREE_CODE (parm_max
) == INTEGER_CST
;
17902 gcc_assert (TREE_CODE (parm_max
) == MINUS_EXPR
);
17903 parm_max
= TREE_OPERAND (parm_max
, 0);
17905 arg_max
= TYPE_MAX_VALUE (arg_dom
);
17906 arg_cst
= TREE_CODE (arg_max
) == INTEGER_CST
;
17909 /* The ARG_MAX may not be a simple MINUS_EXPR, if we are
17910 trying to unify the type of a variable with the type
17911 of a template parameter. For example:
17913 template <unsigned int N>
17914 void f (char (&) [N]);
17921 Here, the type of the ARG will be "int [g(i)]", and
17922 may be a SAVE_EXPR, etc. */
17923 if (TREE_CODE (arg_max
) != MINUS_EXPR
)
17924 return unify_vla_arg (explain_p
, arg_dom
);
17925 arg_max
= TREE_OPERAND (arg_max
, 0);
17928 /* If only one of the bounds used a MINUS_EXPR, compensate
17929 by adding one to the other bound. */
17930 if (parm_cst
&& !arg_cst
)
17931 parm_max
= fold_build2_loc (input_location
, PLUS_EXPR
,
17935 else if (arg_cst
&& !parm_cst
)
17936 arg_max
= fold_build2_loc (input_location
, PLUS_EXPR
,
17941 return unify (tparms
, targs
, parm_max
, arg_max
,
17942 UNIFY_ALLOW_INTEGER
, explain_p
);
17945 /* Deduce the value of template parameters. TPARMS is the (innermost)
17946 set of template parameters to a template. TARGS is the bindings
17947 for those template parameters, as determined thus far; TARGS may
17948 include template arguments for outer levels of template parameters
17949 as well. PARM is a parameter to a template function, or a
17950 subcomponent of that parameter; ARG is the corresponding argument.
17951 This function attempts to match PARM with ARG in a manner
17952 consistent with the existing assignments in TARGS. If more values
17953 are deduced, then TARGS is updated.
17955 Returns 0 if the type deduction succeeds, 1 otherwise. The
17956 parameter STRICT is a bitwise or of the following flags:
17959 Require an exact match between PARM and ARG.
17960 UNIFY_ALLOW_MORE_CV_QUAL:
17961 Allow the deduced ARG to be more cv-qualified (by qualification
17962 conversion) than ARG.
17963 UNIFY_ALLOW_LESS_CV_QUAL:
17964 Allow the deduced ARG to be less cv-qualified than ARG.
17965 UNIFY_ALLOW_DERIVED:
17966 Allow the deduced ARG to be a template base class of ARG,
17967 or a pointer to a template base class of the type pointed to by
17969 UNIFY_ALLOW_INTEGER:
17970 Allow any integral type to be deduced. See the TEMPLATE_PARM_INDEX
17971 case for more information.
17972 UNIFY_ALLOW_OUTER_LEVEL:
17973 This is the outermost level of a deduction. Used to determine validity
17974 of qualification conversions. A valid qualification conversion must
17975 have const qualified pointers leading up to the inner type which
17976 requires additional CV quals, except at the outer level, where const
17977 is not required [conv.qual]. It would be normal to set this flag in
17978 addition to setting UNIFY_ALLOW_MORE_CV_QUAL.
17979 UNIFY_ALLOW_OUTER_MORE_CV_QUAL:
17980 This is the outermost level of a deduction, and PARM can be more CV
17981 qualified at this point.
17982 UNIFY_ALLOW_OUTER_LESS_CV_QUAL:
17983 This is the outermost level of a deduction, and PARM can be less CV
17984 qualified at this point. */
17987 unify (tree tparms
, tree targs
, tree parm
, tree arg
, int strict
,
17993 int strict_in
= strict
;
17995 /* I don't think this will do the right thing with respect to types.
17996 But the only case I've seen it in so far has been array bounds, where
17997 signedness is the only information lost, and I think that will be
17999 while (TREE_CODE (parm
) == NOP_EXPR
)
18000 parm
= TREE_OPERAND (parm
, 0);
18002 if (arg
== error_mark_node
)
18003 return unify_invalid (explain_p
);
18004 if (arg
== unknown_type_node
18005 || arg
== init_list_type_node
)
18006 /* We can't deduce anything from this, but we might get all the
18007 template args from other function args. */
18008 return unify_success (explain_p
);
18010 /* If PARM uses template parameters, then we can't bail out here,
18011 even if ARG == PARM, since we won't record unifications for the
18012 template parameters. We might need them if we're trying to
18013 figure out which of two things is more specialized. */
18014 if (arg
== parm
&& !uses_template_parms (parm
))
18015 return unify_success (explain_p
);
18017 /* Handle init lists early, so the rest of the function can assume
18018 we're dealing with a type. */
18019 if (BRACE_ENCLOSED_INITIALIZER_P (arg
))
18023 tree orig_parm
= parm
;
18025 /* Replace T with std::initializer_list<T> for deduction. */
18026 if (TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
18027 && flag_deduce_init_list
)
18028 parm
= listify (parm
);
18030 if (!is_std_init_list (parm
)
18031 && TREE_CODE (parm
) != ARRAY_TYPE
)
18032 /* We can only deduce from an initializer list argument if the
18033 parameter is std::initializer_list or an array; otherwise this
18034 is a non-deduced context. */
18035 return unify_success (explain_p
);
18037 if (TREE_CODE (parm
) == ARRAY_TYPE
)
18038 elttype
= TREE_TYPE (parm
);
18041 elttype
= TREE_VEC_ELT (CLASSTYPE_TI_ARGS (parm
), 0);
18042 /* Deduction is defined in terms of a single type, so just punt
18043 on the (bizarre) std::initializer_list<T...>. */
18044 if (PACK_EXPANSION_P (elttype
))
18045 return unify_success (explain_p
);
18048 FOR_EACH_CONSTRUCTOR_VALUE (CONSTRUCTOR_ELTS (arg
), i
, elt
)
18050 int elt_strict
= strict
;
18052 if (elt
== error_mark_node
)
18053 return unify_invalid (explain_p
);
18055 if (!BRACE_ENCLOSED_INITIALIZER_P (elt
))
18057 tree type
= TREE_TYPE (elt
);
18058 if (type
== error_mark_node
)
18059 return unify_invalid (explain_p
);
18060 /* It should only be possible to get here for a call. */
18061 gcc_assert (elt_strict
& UNIFY_ALLOW_OUTER_LEVEL
);
18062 elt_strict
|= maybe_adjust_types_for_deduction
18063 (DEDUCE_CALL
, &elttype
, &type
, elt
);
18067 RECUR_AND_CHECK_FAILURE (tparms
, targs
, elttype
, elt
, elt_strict
,
18071 if (TREE_CODE (parm
) == ARRAY_TYPE
18072 && deducible_array_bound (TYPE_DOMAIN (parm
)))
18074 /* Also deduce from the length of the initializer list. */
18075 tree max
= size_int (CONSTRUCTOR_NELTS (arg
));
18076 tree idx
= compute_array_index_type (NULL_TREE
, max
, tf_none
);
18077 if (idx
== error_mark_node
)
18078 return unify_invalid (explain_p
);
18079 return unify_array_domain (tparms
, targs
, TYPE_DOMAIN (parm
),
18083 /* If the std::initializer_list<T> deduction worked, replace the
18084 deduced A with std::initializer_list<A>. */
18085 if (orig_parm
!= parm
)
18087 idx
= TEMPLATE_TYPE_IDX (orig_parm
);
18088 targ
= TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
);
18089 targ
= listify (targ
);
18090 TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
) = targ
;
18092 return unify_success (explain_p
);
18095 /* Immediately reject some pairs that won't unify because of
18096 cv-qualification mismatches. */
18097 if (TREE_CODE (arg
) == TREE_CODE (parm
)
18099 /* It is the elements of the array which hold the cv quals of an array
18100 type, and the elements might be template type parms. We'll check
18101 when we recurse. */
18102 && TREE_CODE (arg
) != ARRAY_TYPE
18103 /* We check the cv-qualifiers when unifying with template type
18104 parameters below. We want to allow ARG `const T' to unify with
18105 PARM `T' for example, when computing which of two templates
18106 is more specialized, for example. */
18107 && TREE_CODE (arg
) != TEMPLATE_TYPE_PARM
18108 && !check_cv_quals_for_unify (strict_in
, arg
, parm
))
18109 return unify_cv_qual_mismatch (explain_p
, parm
, arg
);
18111 if (!(strict
& UNIFY_ALLOW_OUTER_LEVEL
)
18112 && TYPE_P (parm
) && !CP_TYPE_CONST_P (parm
))
18113 strict
&= ~UNIFY_ALLOW_MORE_CV_QUAL
;
18114 strict
&= ~UNIFY_ALLOW_OUTER_LEVEL
;
18115 strict
&= ~UNIFY_ALLOW_DERIVED
;
18116 strict
&= ~UNIFY_ALLOW_OUTER_MORE_CV_QUAL
;
18117 strict
&= ~UNIFY_ALLOW_OUTER_LESS_CV_QUAL
;
18119 switch (TREE_CODE (parm
))
18121 case TYPENAME_TYPE
:
18123 case UNBOUND_CLASS_TEMPLATE
:
18124 /* In a type which contains a nested-name-specifier, template
18125 argument values cannot be deduced for template parameters used
18126 within the nested-name-specifier. */
18127 return unify_success (explain_p
);
18129 case TEMPLATE_TYPE_PARM
:
18130 case TEMPLATE_TEMPLATE_PARM
:
18131 case BOUND_TEMPLATE_TEMPLATE_PARM
:
18132 tparm
= TREE_VALUE (TREE_VEC_ELT (tparms
, 0));
18133 if (error_operand_p (tparm
))
18134 return unify_invalid (explain_p
);
18136 if (TEMPLATE_TYPE_LEVEL (parm
)
18137 != template_decl_level (tparm
))
18138 /* The PARM is not one we're trying to unify. Just check
18139 to see if it matches ARG. */
18141 if (TREE_CODE (arg
) == TREE_CODE (parm
)
18142 && (is_auto (parm
) ? is_auto (arg
)
18143 : same_type_p (parm
, arg
)))
18144 return unify_success (explain_p
);
18146 return unify_type_mismatch (explain_p
, parm
, arg
);
18148 idx
= TEMPLATE_TYPE_IDX (parm
);
18149 targ
= TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
);
18150 tparm
= TREE_VALUE (TREE_VEC_ELT (tparms
, idx
));
18151 if (error_operand_p (tparm
))
18152 return unify_invalid (explain_p
);
18154 /* Check for mixed types and values. */
18155 if ((TREE_CODE (parm
) == TEMPLATE_TYPE_PARM
18156 && TREE_CODE (tparm
) != TYPE_DECL
)
18157 || (TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
18158 && TREE_CODE (tparm
) != TEMPLATE_DECL
))
18159 gcc_unreachable ();
18161 if (TREE_CODE (parm
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
18163 /* ARG must be constructed from a template class or a template
18164 template parameter. */
18165 if (TREE_CODE (arg
) != BOUND_TEMPLATE_TEMPLATE_PARM
18166 && !CLASSTYPE_SPECIALIZATION_OF_PRIMARY_TEMPLATE_P (arg
))
18167 return unify_template_deduction_failure (explain_p
, parm
, arg
);
18169 tree parmvec
= TYPE_TI_ARGS (parm
);
18170 /* An alias template name is never deduced. */
18171 if (TYPE_ALIAS_P (arg
))
18172 arg
= strip_typedefs (arg
);
18173 tree argvec
= INNERMOST_TEMPLATE_ARGS (TYPE_TI_ARGS (arg
));
18174 tree full_argvec
= add_to_template_args (targs
, argvec
);
18176 = DECL_INNERMOST_TEMPLATE_PARMS
18177 (TEMPLATE_TEMPLATE_PARM_TEMPLATE_DECL (parm
));
18179 int parm_variadic_p
= 0;
18181 /* The resolution to DR150 makes clear that default
18182 arguments for an N-argument may not be used to bind T
18183 to a template template parameter with fewer than N
18184 parameters. It is not safe to permit the binding of
18185 default arguments as an extension, as that may change
18186 the meaning of a conforming program. Consider:
18188 struct Dense { static const unsigned int dim = 1; };
18190 template <template <typename> class View,
18192 void operator+(float, View<Block> const&);
18194 template <typename Block,
18195 unsigned int Dim = Block::dim>
18196 struct Lvalue_proxy { operator float() const; };
18200 Lvalue_proxy<Dense> p;
18205 Here, if Lvalue_proxy is permitted to bind to View, then
18206 the global operator+ will be used; if they are not, the
18207 Lvalue_proxy will be converted to float. */
18208 if (coerce_template_parms (parm_parms
,
18210 TYPE_TI_TEMPLATE (parm
),
18212 ? tf_warning_or_error
18214 /*require_all_args=*/true,
18215 /*use_default_args=*/false)
18216 == error_mark_node
)
18219 /* Deduce arguments T, i from TT<T> or TT<i>.
18220 We check each element of PARMVEC and ARGVEC individually
18221 rather than the whole TREE_VEC since they can have
18222 different number of elements. */
18224 parmvec
= expand_template_argument_pack (parmvec
);
18225 argvec
= expand_template_argument_pack (argvec
);
18227 len
= TREE_VEC_LENGTH (parmvec
);
18229 /* Check if the parameters end in a pack, making them
18232 && PACK_EXPANSION_P (TREE_VEC_ELT (parmvec
, len
- 1)))
18233 parm_variadic_p
= 1;
18235 for (i
= 0; i
< len
- parm_variadic_p
; ++i
)
18236 /* If the template argument list of P contains a pack
18237 expansion that is not the last template argument, the
18238 entire template argument list is a non-deduced
18240 if (PACK_EXPANSION_P (TREE_VEC_ELT (parmvec
, i
)))
18241 return unify_success (explain_p
);
18243 if (TREE_VEC_LENGTH (argvec
) < len
- parm_variadic_p
)
18244 return unify_too_few_arguments (explain_p
,
18245 TREE_VEC_LENGTH (argvec
), len
);
18247 for (i
= 0; i
< len
- parm_variadic_p
; ++i
)
18249 RECUR_AND_CHECK_FAILURE (tparms
, targs
,
18250 TREE_VEC_ELT (parmvec
, i
),
18251 TREE_VEC_ELT (argvec
, i
),
18252 UNIFY_ALLOW_NONE
, explain_p
);
18255 if (parm_variadic_p
18256 && unify_pack_expansion (tparms
, targs
,
18259 /*subr=*/true, explain_p
))
18262 arg
= TYPE_TI_TEMPLATE (arg
);
18264 /* Fall through to deduce template name. */
18267 if (TREE_CODE (parm
) == TEMPLATE_TEMPLATE_PARM
18268 || TREE_CODE (parm
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
18270 /* Deduce template name TT from TT, TT<>, TT<T> and TT<i>. */
18272 /* Simple cases: Value already set, does match or doesn't. */
18273 if (targ
!= NULL_TREE
&& template_args_equal (targ
, arg
))
18274 return unify_success (explain_p
);
18276 return unify_inconsistency (explain_p
, parm
, targ
, arg
);
18280 /* If PARM is `const T' and ARG is only `int', we don't have
18281 a match unless we are allowing additional qualification.
18282 If ARG is `const int' and PARM is just `T' that's OK;
18283 that binds `const int' to `T'. */
18284 if (!check_cv_quals_for_unify (strict_in
| UNIFY_ALLOW_LESS_CV_QUAL
,
18286 return unify_cv_qual_mismatch (explain_p
, parm
, arg
);
18288 /* Consider the case where ARG is `const volatile int' and
18289 PARM is `const T'. Then, T should be `volatile int'. */
18290 arg
= cp_build_qualified_type_real
18291 (arg
, cp_type_quals (arg
) & ~cp_type_quals (parm
), tf_none
);
18292 if (arg
== error_mark_node
)
18293 return unify_invalid (explain_p
);
18295 /* Simple cases: Value already set, does match or doesn't. */
18296 if (targ
!= NULL_TREE
&& same_type_p (targ
, arg
))
18297 return unify_success (explain_p
);
18299 return unify_inconsistency (explain_p
, parm
, targ
, arg
);
18301 /* Make sure that ARG is not a variable-sized array. (Note
18302 that were talking about variable-sized arrays (like
18303 `int[n]'), rather than arrays of unknown size (like
18304 `int[]').) We'll get very confused by such a type since
18305 the bound of the array is not constant, and therefore
18306 not mangleable. Besides, such types are not allowed in
18307 ISO C++, so we can do as we please here. We do allow
18308 them for 'auto' deduction, since that isn't ABI-exposed. */
18309 if (!is_auto (parm
) && variably_modified_type_p (arg
, NULL_TREE
))
18310 return unify_vla_arg (explain_p
, arg
);
18312 /* Strip typedefs as in convert_template_argument. */
18313 arg
= canonicalize_type_argument (arg
, tf_none
);
18316 /* If ARG is a parameter pack or an expansion, we cannot unify
18317 against it unless PARM is also a parameter pack. */
18318 if ((template_parameter_pack_p (arg
) || PACK_EXPANSION_P (arg
))
18319 && !template_parameter_pack_p (parm
))
18320 return unify_parameter_pack_mismatch (explain_p
, parm
, arg
);
18322 /* If the argument deduction results is a METHOD_TYPE,
18323 then there is a problem.
18324 METHOD_TYPE doesn't map to any real C++ type the result of
18325 the deduction can not be of that type. */
18326 if (TREE_CODE (arg
) == METHOD_TYPE
)
18327 return unify_method_type_error (explain_p
, arg
);
18329 TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
) = arg
;
18330 return unify_success (explain_p
);
18332 case TEMPLATE_PARM_INDEX
:
18333 tparm
= TREE_VALUE (TREE_VEC_ELT (tparms
, 0));
18334 if (error_operand_p (tparm
))
18335 return unify_invalid (explain_p
);
18337 if (TEMPLATE_PARM_LEVEL (parm
)
18338 != template_decl_level (tparm
))
18340 /* The PARM is not one we're trying to unify. Just check
18341 to see if it matches ARG. */
18342 int result
= !(TREE_CODE (arg
) == TREE_CODE (parm
)
18343 && cp_tree_equal (parm
, arg
));
18345 unify_expression_unequal (explain_p
, parm
, arg
);
18349 idx
= TEMPLATE_PARM_IDX (parm
);
18350 targ
= TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
);
18354 int x
= !cp_tree_equal (targ
, arg
);
18356 unify_inconsistency (explain_p
, parm
, targ
, arg
);
18360 /* [temp.deduct.type] If, in the declaration of a function template
18361 with a non-type template-parameter, the non-type
18362 template-parameter is used in an expression in the function
18363 parameter-list and, if the corresponding template-argument is
18364 deduced, the template-argument type shall match the type of the
18365 template-parameter exactly, except that a template-argument
18366 deduced from an array bound may be of any integral type.
18367 The non-type parameter might use already deduced type parameters. */
18368 tparm
= tsubst (TREE_TYPE (parm
), targs
, 0, NULL_TREE
);
18369 if (!TREE_TYPE (arg
))
18370 /* Template-parameter dependent expression. Just accept it for now.
18371 It will later be processed in convert_template_argument. */
18373 else if (same_type_p (TREE_TYPE (arg
), tparm
))
18375 else if ((strict
& UNIFY_ALLOW_INTEGER
)
18376 && CP_INTEGRAL_TYPE_P (tparm
))
18377 /* Convert the ARG to the type of PARM; the deduced non-type
18378 template argument must exactly match the types of the
18379 corresponding parameter. */
18380 arg
= fold (build_nop (tparm
, arg
));
18381 else if (uses_template_parms (tparm
))
18382 /* We haven't deduced the type of this parameter yet. Try again
18384 return unify_success (explain_p
);
18386 return unify_type_mismatch (explain_p
, tparm
, TREE_TYPE (arg
));
18388 /* If ARG is a parameter pack or an expansion, we cannot unify
18389 against it unless PARM is also a parameter pack. */
18390 if ((template_parameter_pack_p (arg
) || PACK_EXPANSION_P (arg
))
18391 && !TEMPLATE_PARM_PARAMETER_PACK (parm
))
18392 return unify_parameter_pack_mismatch (explain_p
, parm
, arg
);
18395 bool removed_attr
= false;
18396 arg
= strip_typedefs_expr (arg
, &removed_attr
);
18398 TREE_VEC_ELT (INNERMOST_TEMPLATE_ARGS (targs
), idx
) = arg
;
18399 return unify_success (explain_p
);
18403 /* A pointer-to-member constant can be unified only with
18404 another constant. */
18405 if (TREE_CODE (arg
) != PTRMEM_CST
)
18406 return unify_ptrmem_cst_mismatch (explain_p
, parm
, arg
);
18408 /* Just unify the class member. It would be useless (and possibly
18409 wrong, depending on the strict flags) to unify also
18410 PTRMEM_CST_CLASS, because we want to be sure that both parm and
18411 arg refer to the same variable, even if through different
18412 classes. For instance:
18414 struct A { int x; };
18417 Unification of &A::x and &B::x must succeed. */
18418 return unify (tparms
, targs
, PTRMEM_CST_MEMBER (parm
),
18419 PTRMEM_CST_MEMBER (arg
), strict
, explain_p
);
18424 if (!TYPE_PTR_P (arg
))
18425 return unify_type_mismatch (explain_p
, parm
, arg
);
18427 /* [temp.deduct.call]
18429 A can be another pointer or pointer to member type that can
18430 be converted to the deduced A via a qualification
18431 conversion (_conv.qual_).
18433 We pass down STRICT here rather than UNIFY_ALLOW_NONE.
18434 This will allow for additional cv-qualification of the
18435 pointed-to types if appropriate. */
18437 if (TREE_CODE (TREE_TYPE (arg
)) == RECORD_TYPE
)
18438 /* The derived-to-base conversion only persists through one
18439 level of pointers. */
18440 strict
|= (strict_in
& UNIFY_ALLOW_DERIVED
);
18442 return unify (tparms
, targs
, TREE_TYPE (parm
),
18443 TREE_TYPE (arg
), strict
, explain_p
);
18446 case REFERENCE_TYPE
:
18447 if (TREE_CODE (arg
) != REFERENCE_TYPE
)
18448 return unify_type_mismatch (explain_p
, parm
, arg
);
18449 return unify (tparms
, targs
, TREE_TYPE (parm
), TREE_TYPE (arg
),
18450 strict
& UNIFY_ALLOW_MORE_CV_QUAL
, explain_p
);
18453 if (TREE_CODE (arg
) != ARRAY_TYPE
)
18454 return unify_type_mismatch (explain_p
, parm
, arg
);
18455 if ((TYPE_DOMAIN (parm
) == NULL_TREE
)
18456 != (TYPE_DOMAIN (arg
) == NULL_TREE
))
18457 return unify_type_mismatch (explain_p
, parm
, arg
);
18458 RECUR_AND_CHECK_FAILURE (tparms
, targs
, TREE_TYPE (parm
), TREE_TYPE (arg
),
18459 strict
& UNIFY_ALLOW_MORE_CV_QUAL
, explain_p
);
18460 if (TYPE_DOMAIN (parm
) != NULL_TREE
)
18461 return unify_array_domain (tparms
, targs
, TYPE_DOMAIN (parm
),
18462 TYPE_DOMAIN (arg
), explain_p
);
18463 return unify_success (explain_p
);
18470 case ENUMERAL_TYPE
:
18473 if (TREE_CODE (arg
) != TREE_CODE (parm
))
18474 return unify_type_mismatch (explain_p
, parm
, arg
);
18476 /* We have already checked cv-qualification at the top of the
18478 if (!same_type_ignoring_top_level_qualifiers_p (arg
, parm
))
18479 return unify_type_mismatch (explain_p
, parm
, arg
);
18481 /* As far as unification is concerned, this wins. Later checks
18482 will invalidate it if necessary. */
18483 return unify_success (explain_p
);
18485 /* Types INTEGER_CST and MINUS_EXPR can come from array bounds. */
18486 /* Type INTEGER_CST can come from ordinary constant template args. */
18488 while (TREE_CODE (arg
) == NOP_EXPR
)
18489 arg
= TREE_OPERAND (arg
, 0);
18491 if (TREE_CODE (arg
) != INTEGER_CST
)
18492 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
18493 return (tree_int_cst_equal (parm
, arg
)
18494 ? unify_success (explain_p
)
18495 : unify_template_argument_mismatch (explain_p
, parm
, arg
));
18499 int i
, len
, argslen
;
18500 int parm_variadic_p
= 0;
18502 if (TREE_CODE (arg
) != TREE_VEC
)
18503 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
18505 len
= TREE_VEC_LENGTH (parm
);
18506 argslen
= TREE_VEC_LENGTH (arg
);
18508 /* Check for pack expansions in the parameters. */
18509 for (i
= 0; i
< len
; ++i
)
18511 if (PACK_EXPANSION_P (TREE_VEC_ELT (parm
, i
)))
18514 /* We can unify against something with a trailing
18516 parm_variadic_p
= 1;
18518 /* [temp.deduct.type]/9: If the template argument list of
18519 P contains a pack expansion that is not the last
18520 template argument, the entire template argument list
18521 is a non-deduced context. */
18522 return unify_success (explain_p
);
18526 /* If we don't have enough arguments to satisfy the parameters
18527 (not counting the pack expression at the end), or we have
18528 too many arguments for a parameter list that doesn't end in
18529 a pack expression, we can't unify. */
18530 if (parm_variadic_p
18531 ? argslen
< len
- parm_variadic_p
18533 return unify_arity (explain_p
, TREE_VEC_LENGTH (arg
), len
);
18535 /* Unify all of the parameters that precede the (optional)
18536 pack expression. */
18537 for (i
= 0; i
< len
- parm_variadic_p
; ++i
)
18539 RECUR_AND_CHECK_FAILURE (tparms
, targs
,
18540 TREE_VEC_ELT (parm
, i
),
18541 TREE_VEC_ELT (arg
, i
),
18542 UNIFY_ALLOW_NONE
, explain_p
);
18544 if (parm_variadic_p
)
18545 return unify_pack_expansion (tparms
, targs
, parm
, arg
,
18547 /*subr=*/true, explain_p
);
18548 return unify_success (explain_p
);
18553 if (TREE_CODE (arg
) != TREE_CODE (parm
))
18554 return unify_type_mismatch (explain_p
, parm
, arg
);
18556 if (TYPE_PTRMEMFUNC_P (parm
))
18558 if (!TYPE_PTRMEMFUNC_P (arg
))
18559 return unify_type_mismatch (explain_p
, parm
, arg
);
18561 return unify (tparms
, targs
,
18562 TYPE_PTRMEMFUNC_FN_TYPE (parm
),
18563 TYPE_PTRMEMFUNC_FN_TYPE (arg
),
18564 strict
, explain_p
);
18566 else if (TYPE_PTRMEMFUNC_P (arg
))
18567 return unify_type_mismatch (explain_p
, parm
, arg
);
18569 if (CLASSTYPE_TEMPLATE_INFO (parm
))
18571 tree t
= NULL_TREE
;
18573 if (strict_in
& UNIFY_ALLOW_DERIVED
)
18575 /* First, we try to unify the PARM and ARG directly. */
18576 t
= try_class_unification (tparms
, targs
,
18577 parm
, arg
, explain_p
);
18581 /* Fallback to the special case allowed in
18582 [temp.deduct.call]:
18584 If P is a class, and P has the form
18585 template-id, then A can be a derived class of
18586 the deduced A. Likewise, if P is a pointer to
18587 a class of the form template-id, A can be a
18588 pointer to a derived class pointed to by the
18590 enum template_base_result r
;
18591 r
= get_template_base (tparms
, targs
, parm
, arg
,
18595 return unify_no_common_base (explain_p
, r
, parm
, arg
);
18598 else if (CLASSTYPE_TEMPLATE_INFO (arg
)
18599 && (CLASSTYPE_TI_TEMPLATE (parm
)
18600 == CLASSTYPE_TI_TEMPLATE (arg
)))
18601 /* Perhaps PARM is something like S<U> and ARG is S<int>.
18602 Then, we should unify `int' and `U'. */
18605 /* There's no chance of unification succeeding. */
18606 return unify_type_mismatch (explain_p
, parm
, arg
);
18608 return unify (tparms
, targs
, CLASSTYPE_TI_ARGS (parm
),
18609 CLASSTYPE_TI_ARGS (t
), UNIFY_ALLOW_NONE
, explain_p
);
18611 else if (!same_type_ignoring_top_level_qualifiers_p (parm
, arg
))
18612 return unify_type_mismatch (explain_p
, parm
, arg
);
18613 return unify_success (explain_p
);
18616 case FUNCTION_TYPE
:
18618 unsigned int nargs
;
18623 if (TREE_CODE (arg
) != TREE_CODE (parm
))
18624 return unify_type_mismatch (explain_p
, parm
, arg
);
18626 /* CV qualifications for methods can never be deduced, they must
18627 match exactly. We need to check them explicitly here,
18628 because type_unification_real treats them as any other
18629 cv-qualified parameter. */
18630 if (TREE_CODE (parm
) == METHOD_TYPE
18631 && (!check_cv_quals_for_unify
18633 class_of_this_parm (arg
),
18634 class_of_this_parm (parm
))))
18635 return unify_cv_qual_mismatch (explain_p
, parm
, arg
);
18637 RECUR_AND_CHECK_FAILURE (tparms
, targs
, TREE_TYPE (parm
),
18638 TREE_TYPE (arg
), UNIFY_ALLOW_NONE
, explain_p
);
18640 nargs
= list_length (TYPE_ARG_TYPES (arg
));
18641 args
= XALLOCAVEC (tree
, nargs
);
18642 for (a
= TYPE_ARG_TYPES (arg
), i
= 0;
18643 a
!= NULL_TREE
&& a
!= void_list_node
;
18644 a
= TREE_CHAIN (a
), ++i
)
18645 args
[i
] = TREE_VALUE (a
);
18648 return type_unification_real (tparms
, targs
, TYPE_ARG_TYPES (parm
),
18649 args
, nargs
, 1, DEDUCE_EXACT
,
18650 LOOKUP_NORMAL
, NULL
, explain_p
);
18654 /* Unify a pointer to member with a pointer to member function, which
18655 deduces the type of the member as a function type. */
18656 if (TYPE_PTRMEMFUNC_P (arg
))
18658 /* Check top-level cv qualifiers */
18659 if (!check_cv_quals_for_unify (UNIFY_ALLOW_NONE
, arg
, parm
))
18660 return unify_cv_qual_mismatch (explain_p
, parm
, arg
);
18662 RECUR_AND_CHECK_FAILURE (tparms
, targs
, TYPE_OFFSET_BASETYPE (parm
),
18663 TYPE_PTRMEMFUNC_OBJECT_TYPE (arg
),
18664 UNIFY_ALLOW_NONE
, explain_p
);
18666 /* Determine the type of the function we are unifying against. */
18667 tree fntype
= static_fn_type (arg
);
18669 return unify (tparms
, targs
, TREE_TYPE (parm
), fntype
, strict
, explain_p
);
18672 if (TREE_CODE (arg
) != OFFSET_TYPE
)
18673 return unify_type_mismatch (explain_p
, parm
, arg
);
18674 RECUR_AND_CHECK_FAILURE (tparms
, targs
, TYPE_OFFSET_BASETYPE (parm
),
18675 TYPE_OFFSET_BASETYPE (arg
),
18676 UNIFY_ALLOW_NONE
, explain_p
);
18677 return unify (tparms
, targs
, TREE_TYPE (parm
), TREE_TYPE (arg
),
18678 strict
, explain_p
);
18681 if (DECL_TEMPLATE_PARM_P (parm
))
18682 return unify (tparms
, targs
, DECL_INITIAL (parm
), arg
, strict
, explain_p
);
18683 if (arg
!= scalar_constant_value (parm
))
18684 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
18685 return unify_success (explain_p
);
18688 case TEMPLATE_DECL
:
18689 /* Matched cases are handled by the ARG == PARM test above. */
18690 return unify_template_argument_mismatch (explain_p
, parm
, arg
);
18693 /* A non-type template parameter that is a variable should be a
18694 an integral constant, in which case, it whould have been
18695 folded into its (constant) value. So we should not be getting
18696 a variable here. */
18697 gcc_unreachable ();
18699 case TYPE_ARGUMENT_PACK
:
18700 case NONTYPE_ARGUMENT_PACK
:
18701 return unify (tparms
, targs
, ARGUMENT_PACK_ARGS (parm
),
18702 ARGUMENT_PACK_ARGS (arg
), strict
, explain_p
);
18705 case DECLTYPE_TYPE
:
18706 case UNDERLYING_TYPE
:
18707 /* Cannot deduce anything from TYPEOF_TYPE, DECLTYPE_TYPE,
18708 or UNDERLYING_TYPE nodes. */
18709 return unify_success (explain_p
);
18712 /* Unification fails if we hit an error node. */
18713 return unify_invalid (explain_p
);
18716 if (REFERENCE_REF_P (parm
))
18718 if (REFERENCE_REF_P (arg
))
18719 arg
= TREE_OPERAND (arg
, 0);
18720 return unify (tparms
, targs
, TREE_OPERAND (parm
, 0), arg
,
18721 strict
, explain_p
);
18726 /* An unresolved overload is a nondeduced context. */
18727 if (is_overloaded_fn (parm
) || type_unknown_p (parm
))
18728 return unify_success (explain_p
);
18729 gcc_assert (EXPR_P (parm
));
18731 /* We must be looking at an expression. This can happen with
18735 void foo(S<I>, S<I + 2>);
18737 This is a "nondeduced context":
18741 The nondeduced contexts are:
18743 --A type that is a template-id in which one or more of
18744 the template-arguments is an expression that references
18745 a template-parameter.
18747 In these cases, we assume deduction succeeded, but don't
18748 actually infer any unifications. */
18750 if (!uses_template_parms (parm
)
18751 && !template_args_equal (parm
, arg
))
18752 return unify_expression_unequal (explain_p
, parm
, arg
);
18754 return unify_success (explain_p
);
18757 #undef RECUR_AND_CHECK_FAILURE
18759 /* Note that DECL can be defined in this translation unit, if
18763 mark_definable (tree decl
)
18766 DECL_NOT_REALLY_EXTERN (decl
) = 1;
18767 FOR_EACH_CLONE (clone
, decl
)
18768 DECL_NOT_REALLY_EXTERN (clone
) = 1;
18771 /* Called if RESULT is explicitly instantiated, or is a member of an
18772 explicitly instantiated class. */
18775 mark_decl_instantiated (tree result
, int extern_p
)
18777 SET_DECL_EXPLICIT_INSTANTIATION (result
);
18779 /* If this entity has already been written out, it's too late to
18780 make any modifications. */
18781 if (TREE_ASM_WRITTEN (result
))
18784 /* For anonymous namespace we don't need to do anything. */
18785 if (decl_anon_ns_mem_p (result
))
18787 gcc_assert (!TREE_PUBLIC (result
));
18791 if (TREE_CODE (result
) != FUNCTION_DECL
)
18792 /* The TREE_PUBLIC flag for function declarations will have been
18793 set correctly by tsubst. */
18794 TREE_PUBLIC (result
) = 1;
18796 /* This might have been set by an earlier implicit instantiation. */
18797 DECL_COMDAT (result
) = 0;
18800 DECL_NOT_REALLY_EXTERN (result
) = 0;
18803 mark_definable (result
);
18804 mark_needed (result
);
18805 /* Always make artificials weak. */
18806 if (DECL_ARTIFICIAL (result
) && flag_weak
)
18807 comdat_linkage (result
);
18808 /* For WIN32 we also want to put explicit instantiations in
18809 linkonce sections. */
18810 else if (TREE_PUBLIC (result
))
18811 maybe_make_one_only (result
);
18814 /* If EXTERN_P, then this function will not be emitted -- unless
18815 followed by an explicit instantiation, at which point its linkage
18816 will be adjusted. If !EXTERN_P, then this function will be
18817 emitted here. In neither circumstance do we want
18818 import_export_decl to adjust the linkage. */
18819 DECL_INTERFACE_KNOWN (result
) = 1;
18822 /* Subroutine of more_specialized_fn: check whether TARGS is missing any
18823 important template arguments. If any are missing, we check whether
18824 they're important by using error_mark_node for substituting into any
18825 args that were used for partial ordering (the ones between ARGS and END)
18826 and seeing if it bubbles up. */
18829 check_undeduced_parms (tree targs
, tree args
, tree end
)
18831 bool found
= false;
18833 for (i
= TREE_VEC_LENGTH (targs
) - 1; i
>= 0; --i
)
18834 if (TREE_VEC_ELT (targs
, i
) == NULL_TREE
)
18837 TREE_VEC_ELT (targs
, i
) = error_mark_node
;
18841 tree substed
= tsubst_arg_types (args
, targs
, end
, tf_none
, NULL_TREE
);
18842 if (substed
== error_mark_node
)
18848 /* Given two function templates PAT1 and PAT2, return:
18850 1 if PAT1 is more specialized than PAT2 as described in [temp.func.order].
18851 -1 if PAT2 is more specialized than PAT1.
18852 0 if neither is more specialized.
18854 LEN indicates the number of parameters we should consider
18855 (defaulted parameters should not be considered).
18857 The 1998 std underspecified function template partial ordering, and
18858 DR214 addresses the issue. We take pairs of arguments, one from
18859 each of the templates, and deduce them against each other. One of
18860 the templates will be more specialized if all the *other*
18861 template's arguments deduce against its arguments and at least one
18862 of its arguments *does* *not* deduce against the other template's
18863 corresponding argument. Deduction is done as for class templates.
18864 The arguments used in deduction have reference and top level cv
18865 qualifiers removed. Iff both arguments were originally reference
18866 types *and* deduction succeeds in both directions, an lvalue reference
18867 wins against an rvalue reference and otherwise the template
18868 with the more cv-qualified argument wins for that pairing (if
18869 neither is more cv-qualified, they both are equal). Unlike regular
18870 deduction, after all the arguments have been deduced in this way,
18871 we do *not* verify the deduced template argument values can be
18872 substituted into non-deduced contexts.
18874 The logic can be a bit confusing here, because we look at deduce1 and
18875 targs1 to see if pat2 is at least as specialized, and vice versa; if we
18876 can find template arguments for pat1 to make arg1 look like arg2, that
18877 means that arg2 is at least as specialized as arg1. */
18880 more_specialized_fn (tree pat1
, tree pat2
, int len
)
18882 tree decl1
= DECL_TEMPLATE_RESULT (pat1
);
18883 tree decl2
= DECL_TEMPLATE_RESULT (pat2
);
18884 tree targs1
= make_tree_vec (DECL_NTPARMS (pat1
));
18885 tree targs2
= make_tree_vec (DECL_NTPARMS (pat2
));
18886 tree tparms1
= DECL_INNERMOST_TEMPLATE_PARMS (pat1
);
18887 tree tparms2
= DECL_INNERMOST_TEMPLATE_PARMS (pat2
);
18888 tree args1
= TYPE_ARG_TYPES (TREE_TYPE (decl1
));
18889 tree args2
= TYPE_ARG_TYPES (TREE_TYPE (decl2
));
18890 tree origs1
, origs2
;
18891 bool lose1
= false;
18892 bool lose2
= false;
18894 /* Remove the this parameter from non-static member functions. If
18895 one is a non-static member function and the other is not a static
18896 member function, remove the first parameter from that function
18897 also. This situation occurs for operator functions where we
18898 locate both a member function (with this pointer) and non-member
18899 operator (with explicit first operand). */
18900 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (decl1
))
18902 len
--; /* LEN is the number of significant arguments for DECL1 */
18903 args1
= TREE_CHAIN (args1
);
18904 if (!DECL_STATIC_FUNCTION_P (decl2
))
18905 args2
= TREE_CHAIN (args2
);
18907 else if (DECL_NONSTATIC_MEMBER_FUNCTION_P (decl2
))
18909 args2
= TREE_CHAIN (args2
);
18910 if (!DECL_STATIC_FUNCTION_P (decl1
))
18913 args1
= TREE_CHAIN (args1
);
18917 /* If only one is a conversion operator, they are unordered. */
18918 if (DECL_CONV_FN_P (decl1
) != DECL_CONV_FN_P (decl2
))
18921 /* Consider the return type for a conversion function */
18922 if (DECL_CONV_FN_P (decl1
))
18924 args1
= tree_cons (NULL_TREE
, TREE_TYPE (TREE_TYPE (decl1
)), args1
);
18925 args2
= tree_cons (NULL_TREE
, TREE_TYPE (TREE_TYPE (decl2
)), args2
);
18929 processing_template_decl
++;
18935 /* Stop when an ellipsis is seen. */
18936 && args1
!= NULL_TREE
&& args2
!= NULL_TREE
)
18938 tree arg1
= TREE_VALUE (args1
);
18939 tree arg2
= TREE_VALUE (args2
);
18940 int deduce1
, deduce2
;
18946 if (TREE_CODE (arg1
) == TYPE_PACK_EXPANSION
18947 && TREE_CODE (arg2
) == TYPE_PACK_EXPANSION
)
18949 /* When both arguments are pack expansions, we need only
18950 unify the patterns themselves. */
18951 arg1
= PACK_EXPANSION_PATTERN (arg1
);
18952 arg2
= PACK_EXPANSION_PATTERN (arg2
);
18954 /* This is the last comparison we need to do. */
18958 if (TREE_CODE (arg1
) == REFERENCE_TYPE
)
18960 ref1
= TYPE_REF_IS_RVALUE (arg1
) + 1;
18961 arg1
= TREE_TYPE (arg1
);
18962 quals1
= cp_type_quals (arg1
);
18965 if (TREE_CODE (arg2
) == REFERENCE_TYPE
)
18967 ref2
= TYPE_REF_IS_RVALUE (arg2
) + 1;
18968 arg2
= TREE_TYPE (arg2
);
18969 quals2
= cp_type_quals (arg2
);
18972 arg1
= TYPE_MAIN_VARIANT (arg1
);
18973 arg2
= TYPE_MAIN_VARIANT (arg2
);
18975 if (TREE_CODE (arg1
) == TYPE_PACK_EXPANSION
)
18977 int i
, len2
= list_length (args2
);
18978 tree parmvec
= make_tree_vec (1);
18979 tree argvec
= make_tree_vec (len2
);
18982 /* Setup the parameter vector, which contains only ARG1. */
18983 TREE_VEC_ELT (parmvec
, 0) = arg1
;
18985 /* Setup the argument vector, which contains the remaining
18987 for (i
= 0; i
< len2
; i
++, ta
= TREE_CHAIN (ta
))
18988 TREE_VEC_ELT (argvec
, i
) = TREE_VALUE (ta
);
18990 deduce1
= (unify_pack_expansion (tparms1
, targs1
, parmvec
,
18991 argvec
, DEDUCE_EXACT
,
18992 /*subr=*/true, /*explain_p=*/false)
18995 /* We cannot deduce in the other direction, because ARG1 is
18996 a pack expansion but ARG2 is not. */
18999 else if (TREE_CODE (arg2
) == TYPE_PACK_EXPANSION
)
19001 int i
, len1
= list_length (args1
);
19002 tree parmvec
= make_tree_vec (1);
19003 tree argvec
= make_tree_vec (len1
);
19006 /* Setup the parameter vector, which contains only ARG1. */
19007 TREE_VEC_ELT (parmvec
, 0) = arg2
;
19009 /* Setup the argument vector, which contains the remaining
19011 for (i
= 0; i
< len1
; i
++, ta
= TREE_CHAIN (ta
))
19012 TREE_VEC_ELT (argvec
, i
) = TREE_VALUE (ta
);
19014 deduce2
= (unify_pack_expansion (tparms2
, targs2
, parmvec
,
19015 argvec
, DEDUCE_EXACT
,
19016 /*subr=*/true, /*explain_p=*/false)
19019 /* We cannot deduce in the other direction, because ARG2 is
19020 a pack expansion but ARG1 is not.*/
19026 /* The normal case, where neither argument is a pack
19028 deduce1
= (unify (tparms1
, targs1
, arg1
, arg2
,
19029 UNIFY_ALLOW_NONE
, /*explain_p=*/false)
19031 deduce2
= (unify (tparms2
, targs2
, arg2
, arg1
,
19032 UNIFY_ALLOW_NONE
, /*explain_p=*/false)
19036 /* If we couldn't deduce arguments for tparms1 to make arg1 match
19037 arg2, then arg2 is not as specialized as arg1. */
19043 /* "If, for a given type, deduction succeeds in both directions
19044 (i.e., the types are identical after the transformations above)
19045 and both P and A were reference types (before being replaced with
19046 the type referred to above):
19047 - if the type from the argument template was an lvalue reference and
19048 the type from the parameter template was not, the argument type is
19049 considered to be more specialized than the other; otherwise,
19050 - if the type from the argument template is more cv-qualified
19051 than the type from the parameter template (as described above),
19052 the argument type is considered to be more specialized than the other;
19054 - neither type is more specialized than the other." */
19056 if (deduce1
&& deduce2
)
19058 if (ref1
&& ref2
&& ref1
!= ref2
)
19065 else if (quals1
!= quals2
&& quals1
>= 0 && quals2
>= 0)
19067 if ((quals1
& quals2
) == quals2
)
19069 if ((quals1
& quals2
) == quals1
)
19074 if (lose1
&& lose2
)
19075 /* We've failed to deduce something in either direction.
19076 These must be unordered. */
19079 if (TREE_CODE (arg1
) == TYPE_PACK_EXPANSION
19080 || TREE_CODE (arg2
) == TYPE_PACK_EXPANSION
)
19081 /* We have already processed all of the arguments in our
19082 handing of the pack expansion type. */
19085 args1
= TREE_CHAIN (args1
);
19086 args2
= TREE_CHAIN (args2
);
19089 /* "In most cases, all template parameters must have values in order for
19090 deduction to succeed, but for partial ordering purposes a template
19091 parameter may remain without a value provided it is not used in the
19092 types being used for partial ordering."
19094 Thus, if we are missing any of the targs1 we need to substitute into
19095 origs1, then pat2 is not as specialized as pat1. This can happen when
19096 there is a nondeduced context. */
19097 if (!lose2
&& check_undeduced_parms (targs1
, origs1
, args1
))
19099 if (!lose1
&& check_undeduced_parms (targs2
, origs2
, args2
))
19102 processing_template_decl
--;
19104 /* All things being equal, if the next argument is a pack expansion
19105 for one function but not for the other, prefer the
19106 non-variadic function. FIXME this is bogus; see c++/41958. */
19108 && args1
&& TREE_VALUE (args1
)
19109 && args2
&& TREE_VALUE (args2
))
19111 lose1
= TREE_CODE (TREE_VALUE (args1
)) == TYPE_PACK_EXPANSION
;
19112 lose2
= TREE_CODE (TREE_VALUE (args2
)) == TYPE_PACK_EXPANSION
;
19115 if (lose1
== lose2
)
19123 /* Determine which of two partial specializations of TMPL is more
19126 PAT1 is a TREE_LIST whose TREE_VALUE is the TEMPLATE_DECL corresponding
19127 to the first partial specialization. The TREE_PURPOSE is the
19128 innermost set of template parameters for the partial
19129 specialization. PAT2 is similar, but for the second template.
19131 Return 1 if the first partial specialization is more specialized;
19132 -1 if the second is more specialized; 0 if neither is more
19135 See [temp.class.order] for information about determining which of
19136 two templates is more specialized. */
19139 more_specialized_partial_spec (tree tmpl
, tree pat1
, tree pat2
)
19143 bool any_deductions
= false;
19145 tree tmpl1
= TREE_VALUE (pat1
);
19146 tree tmpl2
= TREE_VALUE (pat2
);
19147 tree parms1
= DECL_INNERMOST_TEMPLATE_PARMS (tmpl1
);
19148 tree parms2
= DECL_INNERMOST_TEMPLATE_PARMS (tmpl2
);
19149 tree specargs1
= TI_ARGS (get_template_info (DECL_TEMPLATE_RESULT (tmpl1
)));
19150 tree specargs2
= TI_ARGS (get_template_info (DECL_TEMPLATE_RESULT (tmpl2
)));
19152 /* Just like what happens for functions, if we are ordering between
19153 different template specializations, we may encounter dependent
19154 types in the arguments, and we need our dependency check functions
19155 to behave correctly. */
19156 ++processing_template_decl
;
19157 targs
= get_partial_spec_bindings (tmpl
, parms1
, specargs1
, specargs2
);
19161 any_deductions
= true;
19164 targs
= get_partial_spec_bindings (tmpl
, parms2
, specargs2
, specargs1
);
19168 any_deductions
= true;
19170 --processing_template_decl
;
19172 /* In the case of a tie where at least one of the templates
19173 has a parameter pack at the end, the template with the most
19174 non-packed parameters wins. */
19177 && (template_args_variadic_p (TREE_PURPOSE (pat1
))
19178 || template_args_variadic_p (TREE_PURPOSE (pat2
))))
19180 tree args1
= INNERMOST_TEMPLATE_ARGS (TREE_PURPOSE (pat1
));
19181 tree args2
= INNERMOST_TEMPLATE_ARGS (TREE_PURPOSE (pat2
));
19182 int len1
= TREE_VEC_LENGTH (args1
);
19183 int len2
= TREE_VEC_LENGTH (args2
);
19185 /* We don't count the pack expansion at the end. */
19186 if (template_args_variadic_p (TREE_PURPOSE (pat1
)))
19188 if (template_args_variadic_p (TREE_PURPOSE (pat2
)))
19193 else if (len1
< len2
)
19200 /* Return the template arguments that will produce the function signature
19201 DECL from the function template FN, with the explicit template
19202 arguments EXPLICIT_ARGS. If CHECK_RETTYPE is true, the return type must
19203 also match. Return NULL_TREE if no satisfactory arguments could be
19207 get_bindings (tree fn
, tree decl
, tree explicit_args
, bool check_rettype
)
19209 int ntparms
= DECL_NTPARMS (fn
);
19210 tree targs
= make_tree_vec (ntparms
);
19211 tree decl_type
= TREE_TYPE (decl
);
19212 tree decl_arg_types
;
19214 unsigned int nargs
, ix
;
19217 gcc_assert (decl
!= DECL_TEMPLATE_RESULT (fn
));
19219 /* Never do unification on the 'this' parameter. */
19220 decl_arg_types
= skip_artificial_parms_for (decl
,
19221 TYPE_ARG_TYPES (decl_type
));
19223 nargs
= list_length (decl_arg_types
);
19224 args
= XALLOCAVEC (tree
, nargs
);
19225 for (arg
= decl_arg_types
, ix
= 0;
19226 arg
!= NULL_TREE
&& arg
!= void_list_node
;
19227 arg
= TREE_CHAIN (arg
), ++ix
)
19228 args
[ix
] = TREE_VALUE (arg
);
19230 if (fn_type_unification (fn
, explicit_args
, targs
,
19232 (check_rettype
|| DECL_CONV_FN_P (fn
)
19233 ? TREE_TYPE (decl_type
) : NULL_TREE
),
19234 DEDUCE_EXACT
, LOOKUP_NORMAL
, /*explain_p=*/false,
19236 == error_mark_node
)
19242 /* Return the innermost template arguments that, when applied to a partial
19243 specialization of TMPL whose innermost template parameters are
19244 TPARMS, and whose specialization arguments are SPEC_ARGS, yield the
19247 For example, suppose we have:
19249 template <class T, class U> struct S {};
19250 template <class T> struct S<T*, int> {};
19252 Then, suppose we want to get `S<double*, int>'. The TPARMS will be
19253 {T}, the SPEC_ARGS will be {T*, int} and the ARGS will be {double*,
19254 int}. The resulting vector will be {double}, indicating that `T'
19255 is bound to `double'. */
19258 get_partial_spec_bindings (tree tmpl
, tree tparms
, tree spec_args
, tree args
)
19260 int i
, ntparms
= TREE_VEC_LENGTH (tparms
);
19262 tree innermost_deduced_args
;
19264 innermost_deduced_args
= make_tree_vec (ntparms
);
19265 if (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (args
))
19267 deduced_args
= copy_node (args
);
19268 SET_TMPL_ARGS_LEVEL (deduced_args
,
19269 TMPL_ARGS_DEPTH (deduced_args
),
19270 innermost_deduced_args
);
19273 deduced_args
= innermost_deduced_args
;
19275 if (unify (tparms
, deduced_args
,
19276 INNERMOST_TEMPLATE_ARGS (spec_args
),
19277 INNERMOST_TEMPLATE_ARGS (args
),
19278 UNIFY_ALLOW_NONE
, /*explain_p=*/false))
19281 for (i
= 0; i
< ntparms
; ++i
)
19282 if (! TREE_VEC_ELT (innermost_deduced_args
, i
))
19285 /* Verify that nondeduced template arguments agree with the type
19286 obtained from argument deduction.
19290 struct A { typedef int X; };
19291 template <class T, class U> struct C {};
19292 template <class T> struct C<T, typename T::X> {};
19294 Then with the instantiation `C<A, int>', we can deduce that
19295 `T' is `A' but unify () does not check whether `typename T::X'
19297 spec_args
= tsubst (spec_args
, deduced_args
, tf_none
, NULL_TREE
);
19298 spec_args
= coerce_template_parms (DECL_INNERMOST_TEMPLATE_PARMS (tmpl
),
19300 tf_none
, false, false);
19301 if (spec_args
== error_mark_node
19302 /* We only need to check the innermost arguments; the other
19303 arguments will always agree. */
19304 || !comp_template_args (INNERMOST_TEMPLATE_ARGS (spec_args
),
19305 INNERMOST_TEMPLATE_ARGS (args
)))
19308 /* Now that we have bindings for all of the template arguments,
19309 ensure that the arguments deduced for the template template
19310 parameters have compatible template parameter lists. See the use
19311 of template_template_parm_bindings_ok_p in fn_type_unification
19312 for more information. */
19313 if (!template_template_parm_bindings_ok_p (tparms
, deduced_args
))
19316 return deduced_args
;
19319 /* TEMPLATES is a TREE_LIST. Each TREE_VALUE is a TEMPLATE_DECL.
19320 Return the TREE_LIST node with the most specialized template, if
19321 any. If there is no most specialized template, the error_mark_node
19324 Note that this function does not look at, or modify, the
19325 TREE_PURPOSE or TREE_TYPE of any of the nodes. Since the node
19326 returned is one of the elements of INSTANTIATIONS, callers may
19327 store information in the TREE_PURPOSE or TREE_TYPE of the nodes,
19328 and retrieve it from the value returned. */
19331 most_specialized_instantiation (tree templates
)
19335 ++processing_template_decl
;
19338 for (fn
= TREE_CHAIN (templates
); fn
; fn
= TREE_CHAIN (fn
))
19342 if (get_bindings (TREE_VALUE (champ
),
19343 DECL_TEMPLATE_RESULT (TREE_VALUE (fn
)),
19344 NULL_TREE
, /*check_ret=*/true))
19347 if (get_bindings (TREE_VALUE (fn
),
19348 DECL_TEMPLATE_RESULT (TREE_VALUE (champ
)),
19349 NULL_TREE
, /*check_ret=*/true))
19356 /* Equally specialized, move to next function. If there
19357 is no next function, nothing's most specialized. */
19358 fn
= TREE_CHAIN (fn
);
19366 /* Now verify that champ is better than everything earlier in the
19367 instantiation list. */
19368 for (fn
= templates
; fn
!= champ
; fn
= TREE_CHAIN (fn
))
19369 if (get_bindings (TREE_VALUE (champ
),
19370 DECL_TEMPLATE_RESULT (TREE_VALUE (fn
)),
19371 NULL_TREE
, /*check_ret=*/true)
19372 || !get_bindings (TREE_VALUE (fn
),
19373 DECL_TEMPLATE_RESULT (TREE_VALUE (champ
)),
19374 NULL_TREE
, /*check_ret=*/true))
19380 processing_template_decl
--;
19383 return error_mark_node
;
19388 /* If DECL is a specialization of some template, return the most
19389 general such template. Otherwise, returns NULL_TREE.
19391 For example, given:
19393 template <class T> struct S { template <class U> void f(U); };
19395 if TMPL is `template <class U> void S<int>::f(U)' this will return
19396 the full template. This function will not trace past partial
19397 specializations, however. For example, given in addition:
19399 template <class T> struct S<T*> { template <class U> void f(U); };
19401 if TMPL is `template <class U> void S<int*>::f(U)' this will return
19402 `template <class T> template <class U> S<T*>::f(U)'. */
19405 most_general_template (tree decl
)
19407 if (TREE_CODE (decl
) != TEMPLATE_DECL
)
19409 if (tree tinfo
= get_template_info (decl
))
19410 decl
= TI_TEMPLATE (tinfo
);
19411 /* The TI_TEMPLATE can be an IDENTIFIER_NODE for a
19412 template friend, or a FIELD_DECL for a capture pack. */
19413 if (TREE_CODE (decl
) != TEMPLATE_DECL
)
19417 /* Look for more and more general templates. */
19418 while (DECL_LANG_SPECIFIC (decl
) && DECL_TEMPLATE_INFO (decl
))
19420 /* The DECL_TI_TEMPLATE can be an IDENTIFIER_NODE in some cases.
19421 (See cp-tree.h for details.) */
19422 if (TREE_CODE (DECL_TI_TEMPLATE (decl
)) != TEMPLATE_DECL
)
19425 if (CLASS_TYPE_P (TREE_TYPE (decl
))
19426 && !TYPE_DECL_ALIAS_P (TYPE_NAME (TREE_TYPE (decl
)))
19427 && CLASSTYPE_TEMPLATE_SPECIALIZATION (TREE_TYPE (decl
)))
19430 /* Stop if we run into an explicitly specialized class template. */
19431 if (!DECL_NAMESPACE_SCOPE_P (decl
)
19432 && DECL_CONTEXT (decl
)
19433 && CLASSTYPE_TEMPLATE_SPECIALIZATION (DECL_CONTEXT (decl
)))
19436 decl
= DECL_TI_TEMPLATE (decl
);
19442 /* Return the most specialized of the template partial specializations
19443 which can produce TARGET, a specialization of some class or variable
19444 template. The value returned is actually a TREE_LIST; the TREE_VALUE is
19445 a TEMPLATE_DECL node corresponding to the partial specialization, while
19446 the TREE_PURPOSE is the set of template arguments that must be
19447 substituted into the template pattern in order to generate TARGET.
19449 If the choice of partial specialization is ambiguous, a diagnostic
19450 is issued, and the error_mark_node is returned. If there are no
19451 partial specializations matching TARGET, then NULL_TREE is
19452 returned, indicating that the primary template should be used. */
19455 most_specialized_partial_spec (tree target
, tsubst_flags_t complain
)
19457 tree list
= NULL_TREE
;
19462 tree outer_args
= NULL_TREE
;
19465 if (TYPE_P (target
))
19467 tree tinfo
= CLASSTYPE_TEMPLATE_INFO (target
);
19468 tmpl
= TI_TEMPLATE (tinfo
);
19469 args
= TI_ARGS (tinfo
);
19471 else if (TREE_CODE (target
) == TEMPLATE_ID_EXPR
)
19473 tmpl
= TREE_OPERAND (target
, 0);
19474 args
= TREE_OPERAND (target
, 1);
19476 else if (VAR_P (target
))
19478 tree tinfo
= DECL_TEMPLATE_INFO (target
);
19479 tmpl
= TI_TEMPLATE (tinfo
);
19480 args
= TI_ARGS (tinfo
);
19483 gcc_unreachable ();
19485 tree main_tmpl
= most_general_template (tmpl
);
19487 /* For determining which partial specialization to use, only the
19488 innermost args are interesting. */
19489 if (TMPL_ARGS_HAVE_MULTIPLE_LEVELS (args
))
19491 outer_args
= strip_innermost_template_args (args
, 1);
19492 args
= INNERMOST_TEMPLATE_ARGS (args
);
19495 for (t
= DECL_TEMPLATE_SPECIALIZATIONS (main_tmpl
); t
; t
= TREE_CHAIN (t
))
19497 tree partial_spec_args
;
19499 tree spec_tmpl
= TREE_VALUE (t
);
19501 partial_spec_args
= TREE_PURPOSE (t
);
19503 ++processing_template_decl
;
19507 /* Discard the outer levels of args, and then substitute in the
19508 template args from the enclosing class. */
19509 partial_spec_args
= INNERMOST_TEMPLATE_ARGS (partial_spec_args
);
19510 partial_spec_args
= tsubst_template_args
19511 (partial_spec_args
, outer_args
, tf_none
, NULL_TREE
);
19513 /* And the same for the partial specialization TEMPLATE_DECL. */
19514 spec_tmpl
= tsubst (spec_tmpl
, outer_args
, tf_none
, NULL_TREE
);
19517 partial_spec_args
=
19518 coerce_template_parms (DECL_INNERMOST_TEMPLATE_PARMS (tmpl
),
19521 /*require_all_args=*/true,
19522 /*use_default_args=*/true);
19524 --processing_template_decl
;
19526 if (partial_spec_args
== error_mark_node
)
19527 return error_mark_node
;
19528 if (spec_tmpl
== error_mark_node
)
19529 return error_mark_node
;
19531 tree parms
= DECL_INNERMOST_TEMPLATE_PARMS (spec_tmpl
);
19532 spec_args
= get_partial_spec_bindings (tmpl
, parms
,
19538 spec_args
= add_to_template_args (outer_args
, spec_args
);
19539 list
= tree_cons (spec_args
, TREE_VALUE (t
), list
);
19540 TREE_TYPE (list
) = TREE_TYPE (t
);
19547 ambiguous_p
= false;
19550 t
= TREE_CHAIN (t
);
19551 for (; t
; t
= TREE_CHAIN (t
))
19553 fate
= more_specialized_partial_spec (tmpl
, champ
, t
);
19560 t
= TREE_CHAIN (t
);
19563 ambiguous_p
= true;
19572 for (t
= list
; t
&& t
!= champ
; t
= TREE_CHAIN (t
))
19574 fate
= more_specialized_partial_spec (tmpl
, champ
, t
);
19577 ambiguous_p
= true;
19585 char *spaces
= NULL
;
19586 if (!(complain
& tf_error
))
19587 return error_mark_node
;
19588 if (TYPE_P (target
))
19589 error ("ambiguous template instantiation for %q#T", target
);
19591 error ("ambiguous template instantiation for %q#D", target
);
19592 str
= ngettext ("candidate is:", "candidates are:", list_length (list
));
19593 for (t
= list
; t
; t
= TREE_CHAIN (t
))
19595 tree subst
= build_tree_list (TREE_VALUE (t
), TREE_PURPOSE (t
));
19596 inform (DECL_SOURCE_LOCATION (TREE_VALUE (t
)),
19597 "%s %#S", spaces
? spaces
: str
, subst
);
19598 spaces
= spaces
? spaces
: get_spaces (str
);
19601 return error_mark_node
;
19607 /* Explicitly instantiate DECL. */
19610 do_decl_instantiation (tree decl
, tree storage
)
19612 tree result
= NULL_TREE
;
19615 if (!decl
|| decl
== error_mark_node
)
19616 /* An error occurred, for which grokdeclarator has already issued
19617 an appropriate message. */
19619 else if (! DECL_LANG_SPECIFIC (decl
))
19621 error ("explicit instantiation of non-template %q#D", decl
);
19625 bool var_templ
= (DECL_TEMPLATE_INFO (decl
)
19626 && variable_template_p (DECL_TI_TEMPLATE (decl
)));
19628 if (VAR_P (decl
) && !var_templ
)
19630 /* There is an asymmetry here in the way VAR_DECLs and
19631 FUNCTION_DECLs are handled by grokdeclarator. In the case of
19632 the latter, the DECL we get back will be marked as a
19633 template instantiation, and the appropriate
19634 DECL_TEMPLATE_INFO will be set up. This does not happen for
19635 VAR_DECLs so we do the lookup here. Probably, grokdeclarator
19636 should handle VAR_DECLs as it currently handles
19638 if (!DECL_CLASS_SCOPE_P (decl
))
19640 error ("%qD is not a static data member of a class template", decl
);
19643 result
= lookup_field (DECL_CONTEXT (decl
), DECL_NAME (decl
), 0, false);
19644 if (!result
|| !VAR_P (result
))
19646 error ("no matching template for %qD found", decl
);
19649 if (!same_type_p (TREE_TYPE (result
), TREE_TYPE (decl
)))
19651 error ("type %qT for explicit instantiation %qD does not match "
19652 "declared type %qT", TREE_TYPE (result
), decl
,
19657 else if (TREE_CODE (decl
) != FUNCTION_DECL
&& !var_templ
)
19659 error ("explicit instantiation of %q#D", decl
);
19665 /* Check for various error cases. Note that if the explicit
19666 instantiation is valid the RESULT will currently be marked as an
19667 *implicit* instantiation; DECL_EXPLICIT_INSTANTIATION is not set
19668 until we get here. */
19670 if (DECL_TEMPLATE_SPECIALIZATION (result
))
19672 /* DR 259 [temp.spec].
19674 Both an explicit instantiation and a declaration of an explicit
19675 specialization shall not appear in a program unless the explicit
19676 instantiation follows a declaration of the explicit specialization.
19678 For a given set of template parameters, if an explicit
19679 instantiation of a template appears after a declaration of an
19680 explicit specialization for that template, the explicit
19681 instantiation has no effect. */
19684 else if (DECL_EXPLICIT_INSTANTIATION (result
))
19688 No program shall explicitly instantiate any template more
19691 We check DECL_NOT_REALLY_EXTERN so as not to complain when
19692 the first instantiation was `extern' and the second is not,
19693 and EXTERN_P for the opposite case. */
19694 if (DECL_NOT_REALLY_EXTERN (result
) && !extern_p
)
19695 permerror (input_location
, "duplicate explicit instantiation of %q#D", result
);
19696 /* If an "extern" explicit instantiation follows an ordinary
19697 explicit instantiation, the template is instantiated. */
19701 else if (!DECL_IMPLICIT_INSTANTIATION (result
))
19703 error ("no matching template for %qD found", result
);
19706 else if (!DECL_TEMPLATE_INFO (result
))
19708 permerror (input_location
, "explicit instantiation of non-template %q#D", result
);
19712 if (storage
== NULL_TREE
)
19714 else if (storage
== ridpointers
[(int) RID_EXTERN
])
19716 if (!in_system_header_at (input_location
) && (cxx_dialect
== cxx98
))
19717 pedwarn (input_location
, OPT_Wpedantic
,
19718 "ISO C++ 1998 forbids the use of %<extern%> on explicit "
19723 error ("storage class %qD applied to template instantiation", storage
);
19725 check_explicit_instantiation_namespace (result
);
19726 mark_decl_instantiated (result
, extern_p
);
19728 instantiate_decl (result
, /*defer_ok=*/1,
19729 /*expl_inst_class_mem_p=*/false);
19733 mark_class_instantiated (tree t
, int extern_p
)
19735 SET_CLASSTYPE_EXPLICIT_INSTANTIATION (t
);
19736 SET_CLASSTYPE_INTERFACE_KNOWN (t
);
19737 CLASSTYPE_INTERFACE_ONLY (t
) = extern_p
;
19738 TYPE_DECL_SUPPRESS_DEBUG (TYPE_NAME (t
)) = extern_p
;
19741 CLASSTYPE_DEBUG_REQUESTED (t
) = 1;
19742 rest_of_type_compilation (t
, 1);
19746 /* Called from do_type_instantiation through binding_table_foreach to
19747 do recursive instantiation for the type bound in ENTRY. */
19749 bt_instantiate_type_proc (binding_entry entry
, void *data
)
19751 tree storage
= *(tree
*) data
;
19753 if (MAYBE_CLASS_TYPE_P (entry
->type
)
19754 && !uses_template_parms (CLASSTYPE_TI_ARGS (entry
->type
)))
19755 do_type_instantiation (TYPE_MAIN_DECL (entry
->type
), storage
, 0);
19758 /* Called from do_type_instantiation to instantiate a member
19759 (a member function or a static member variable) of an
19760 explicitly instantiated class template. */
19762 instantiate_class_member (tree decl
, int extern_p
)
19764 mark_decl_instantiated (decl
, extern_p
);
19766 instantiate_decl (decl
, /*defer_ok=*/1,
19767 /*expl_inst_class_mem_p=*/true);
19770 /* Perform an explicit instantiation of template class T. STORAGE, if
19771 non-null, is the RID for extern, inline or static. COMPLAIN is
19772 nonzero if this is called from the parser, zero if called recursively,
19773 since the standard is unclear (as detailed below). */
19776 do_type_instantiation (tree t
, tree storage
, tsubst_flags_t complain
)
19781 int previous_instantiation_extern_p
= 0;
19783 if (TREE_CODE (t
) == TYPE_DECL
)
19786 if (! CLASS_TYPE_P (t
) || ! CLASSTYPE_TEMPLATE_INFO (t
))
19789 (TYPE_TEMPLATE_INFO (t
)) ? TYPE_TI_TEMPLATE (t
) : NULL
;
19791 error ("explicit instantiation of non-class template %qD", tmpl
);
19793 error ("explicit instantiation of non-template type %qT", t
);
19799 if (!COMPLETE_TYPE_P (t
))
19801 if (complain
& tf_error
)
19802 error ("explicit instantiation of %q#T before definition of template",
19807 if (storage
!= NULL_TREE
)
19809 if (!in_system_header_at (input_location
))
19811 if (storage
== ridpointers
[(int) RID_EXTERN
])
19813 if (cxx_dialect
== cxx98
)
19814 pedwarn (input_location
, OPT_Wpedantic
,
19815 "ISO C++ 1998 forbids the use of %<extern%> on "
19816 "explicit instantiations");
19819 pedwarn (input_location
, OPT_Wpedantic
,
19820 "ISO C++ forbids the use of %qE"
19821 " on explicit instantiations", storage
);
19824 if (storage
== ridpointers
[(int) RID_INLINE
])
19826 else if (storage
== ridpointers
[(int) RID_EXTERN
])
19828 else if (storage
== ridpointers
[(int) RID_STATIC
])
19832 error ("storage class %qD applied to template instantiation",
19838 if (CLASSTYPE_TEMPLATE_SPECIALIZATION (t
))
19840 /* DR 259 [temp.spec].
19842 Both an explicit instantiation and a declaration of an explicit
19843 specialization shall not appear in a program unless the explicit
19844 instantiation follows a declaration of the explicit specialization.
19846 For a given set of template parameters, if an explicit
19847 instantiation of a template appears after a declaration of an
19848 explicit specialization for that template, the explicit
19849 instantiation has no effect. */
19852 else if (CLASSTYPE_EXPLICIT_INSTANTIATION (t
))
19856 No program shall explicitly instantiate any template more
19859 If PREVIOUS_INSTANTIATION_EXTERN_P, then the first explicit
19860 instantiation was `extern'. If EXTERN_P then the second is.
19861 These cases are OK. */
19862 previous_instantiation_extern_p
= CLASSTYPE_INTERFACE_ONLY (t
);
19864 if (!previous_instantiation_extern_p
&& !extern_p
19865 && (complain
& tf_error
))
19866 permerror (input_location
, "duplicate explicit instantiation of %q#T", t
);
19868 /* If we've already instantiated the template, just return now. */
19869 if (!CLASSTYPE_INTERFACE_ONLY (t
))
19873 check_explicit_instantiation_namespace (TYPE_NAME (t
));
19874 mark_class_instantiated (t
, extern_p
);
19882 /* In contrast to implicit instantiation, where only the
19883 declarations, and not the definitions, of members are
19884 instantiated, we have here:
19888 The explicit instantiation of a class template specialization
19889 implies the instantiation of all of its members not
19890 previously explicitly specialized in the translation unit
19891 containing the explicit instantiation.
19893 Of course, we can't instantiate member template classes, since
19894 we don't have any arguments for them. Note that the standard
19895 is unclear on whether the instantiation of the members are
19896 *explicit* instantiations or not. However, the most natural
19897 interpretation is that it should be an explicit instantiation. */
19900 for (tmp
= TYPE_METHODS (t
); tmp
; tmp
= DECL_CHAIN (tmp
))
19901 if (TREE_CODE (tmp
) == FUNCTION_DECL
19902 && DECL_TEMPLATE_INSTANTIATION (tmp
))
19903 instantiate_class_member (tmp
, extern_p
);
19905 for (tmp
= TYPE_FIELDS (t
); tmp
; tmp
= DECL_CHAIN (tmp
))
19906 if (VAR_P (tmp
) && DECL_TEMPLATE_INSTANTIATION (tmp
))
19907 instantiate_class_member (tmp
, extern_p
);
19909 if (CLASSTYPE_NESTED_UTDS (t
))
19910 binding_table_foreach (CLASSTYPE_NESTED_UTDS (t
),
19911 bt_instantiate_type_proc
, &storage
);
19915 /* Given a function DECL, which is a specialization of TMPL, modify
19916 DECL to be a re-instantiation of TMPL with the same template
19917 arguments. TMPL should be the template into which tsubst'ing
19918 should occur for DECL, not the most general template.
19920 One reason for doing this is a scenario like this:
19923 void f(const T&, int i);
19925 void g() { f(3, 7); }
19928 void f(const T& t, const int i) { }
19930 Note that when the template is first instantiated, with
19931 instantiate_template, the resulting DECL will have no name for the
19932 first parameter, and the wrong type for the second. So, when we go
19933 to instantiate the DECL, we regenerate it. */
19936 regenerate_decl_from_template (tree decl
, tree tmpl
)
19938 /* The arguments used to instantiate DECL, from the most general
19943 args
= DECL_TI_ARGS (decl
);
19944 code_pattern
= DECL_TEMPLATE_RESULT (tmpl
);
19946 /* Make sure that we can see identifiers, and compute access
19948 push_access_scope (decl
);
19950 if (TREE_CODE (decl
) == FUNCTION_DECL
)
19958 args_depth
= TMPL_ARGS_DEPTH (args
);
19959 parms_depth
= TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (tmpl
));
19960 if (args_depth
> parms_depth
)
19961 args
= get_innermost_template_args (args
, parms_depth
);
19963 specs
= tsubst_exception_specification (TREE_TYPE (code_pattern
),
19964 args
, tf_error
, NULL_TREE
,
19965 /*defer_ok*/false);
19966 if (specs
&& specs
!= error_mark_node
)
19967 TREE_TYPE (decl
) = build_exception_variant (TREE_TYPE (decl
),
19970 /* Merge parameter declarations. */
19971 decl_parm
= skip_artificial_parms_for (decl
,
19972 DECL_ARGUMENTS (decl
));
19974 = skip_artificial_parms_for (code_pattern
,
19975 DECL_ARGUMENTS (code_pattern
));
19976 while (decl_parm
&& !DECL_PACK_P (pattern_parm
))
19981 if (DECL_NAME (decl_parm
) != DECL_NAME (pattern_parm
))
19982 DECL_NAME (decl_parm
) = DECL_NAME (pattern_parm
);
19983 parm_type
= tsubst (TREE_TYPE (pattern_parm
), args
, tf_error
,
19985 parm_type
= type_decays_to (parm_type
);
19986 if (!same_type_p (TREE_TYPE (decl_parm
), parm_type
))
19987 TREE_TYPE (decl_parm
) = parm_type
;
19988 attributes
= DECL_ATTRIBUTES (pattern_parm
);
19989 if (DECL_ATTRIBUTES (decl_parm
) != attributes
)
19991 DECL_ATTRIBUTES (decl_parm
) = attributes
;
19992 cplus_decl_attributes (&decl_parm
, attributes
, /*flags=*/0);
19994 decl_parm
= DECL_CHAIN (decl_parm
);
19995 pattern_parm
= DECL_CHAIN (pattern_parm
);
19997 /* Merge any parameters that match with the function parameter
19999 if (pattern_parm
&& DECL_PACK_P (pattern_parm
))
20002 tree expanded_types
;
20003 /* Expand the TYPE_PACK_EXPANSION that provides the types for
20004 the parameters in this function parameter pack. */
20005 expanded_types
= tsubst_pack_expansion (TREE_TYPE (pattern_parm
),
20006 args
, tf_error
, NULL_TREE
);
20007 len
= TREE_VEC_LENGTH (expanded_types
);
20008 for (i
= 0; i
< len
; i
++)
20013 if (DECL_NAME (decl_parm
) != DECL_NAME (pattern_parm
))
20014 /* Rename the parameter to include the index. */
20015 DECL_NAME (decl_parm
) =
20016 make_ith_pack_parameter_name (DECL_NAME (pattern_parm
), i
);
20017 parm_type
= TREE_VEC_ELT (expanded_types
, i
);
20018 parm_type
= type_decays_to (parm_type
);
20019 if (!same_type_p (TREE_TYPE (decl_parm
), parm_type
))
20020 TREE_TYPE (decl_parm
) = parm_type
;
20021 attributes
= DECL_ATTRIBUTES (pattern_parm
);
20022 if (DECL_ATTRIBUTES (decl_parm
) != attributes
)
20024 DECL_ATTRIBUTES (decl_parm
) = attributes
;
20025 cplus_decl_attributes (&decl_parm
, attributes
, /*flags=*/0);
20027 decl_parm
= DECL_CHAIN (decl_parm
);
20030 /* Merge additional specifiers from the CODE_PATTERN. */
20031 if (DECL_DECLARED_INLINE_P (code_pattern
)
20032 && !DECL_DECLARED_INLINE_P (decl
))
20033 DECL_DECLARED_INLINE_P (decl
) = 1;
20035 else if (VAR_P (decl
))
20037 DECL_INITIAL (decl
) =
20038 tsubst_expr (DECL_INITIAL (code_pattern
), args
,
20039 tf_error
, DECL_TI_TEMPLATE (decl
),
20040 /*integral_constant_expression_p=*/false);
20041 if (VAR_HAD_UNKNOWN_BOUND (decl
))
20042 TREE_TYPE (decl
) = tsubst (TREE_TYPE (code_pattern
), args
,
20043 tf_error
, DECL_TI_TEMPLATE (decl
));
20046 gcc_unreachable ();
20048 pop_access_scope (decl
);
20051 /* Return the TEMPLATE_DECL into which DECL_TI_ARGS(DECL) should be
20052 substituted to get DECL. */
20055 template_for_substitution (tree decl
)
20057 tree tmpl
= DECL_TI_TEMPLATE (decl
);
20059 /* Set TMPL to the template whose DECL_TEMPLATE_RESULT is the pattern
20060 for the instantiation. This is not always the most general
20061 template. Consider, for example:
20064 struct S { template <class U> void f();
20065 template <> void f<int>(); };
20067 and an instantiation of S<double>::f<int>. We want TD to be the
20068 specialization S<T>::f<int>, not the more general S<T>::f<U>. */
20069 while (/* An instantiation cannot have a definition, so we need a
20070 more general template. */
20071 DECL_TEMPLATE_INSTANTIATION (tmpl
)
20072 /* We must also deal with friend templates. Given:
20074 template <class T> struct S {
20075 template <class U> friend void f() {};
20078 S<int>::f<U> say, is not an instantiation of S<T>::f<U>,
20079 so far as the language is concerned, but that's still
20080 where we get the pattern for the instantiation from. On
20081 other hand, if the definition comes outside the class, say:
20083 template <class T> struct S {
20084 template <class U> friend void f();
20086 template <class U> friend void f() {}
20088 we don't need to look any further. That's what the check for
20089 DECL_INITIAL is for. */
20090 || (TREE_CODE (decl
) == FUNCTION_DECL
20091 && DECL_FRIEND_PSEUDO_TEMPLATE_INSTANTIATION (tmpl
)
20092 && !DECL_INITIAL (DECL_TEMPLATE_RESULT (tmpl
))))
20094 /* The present template, TD, should not be a definition. If it
20095 were a definition, we should be using it! Note that we
20096 cannot restructure the loop to just keep going until we find
20097 a template with a definition, since that might go too far if
20098 a specialization was declared, but not defined. */
20100 /* Fetch the more general template. */
20101 tmpl
= DECL_TI_TEMPLATE (tmpl
);
20107 /* Returns true if we need to instantiate this template instance even if we
20108 know we aren't going to emit it.. */
20111 always_instantiate_p (tree decl
)
20113 /* We always instantiate inline functions so that we can inline them. An
20114 explicit instantiation declaration prohibits implicit instantiation of
20115 non-inline functions. With high levels of optimization, we would
20116 normally inline non-inline functions -- but we're not allowed to do
20117 that for "extern template" functions. Therefore, we check
20118 DECL_DECLARED_INLINE_P, rather than possibly_inlined_p. */
20119 return ((TREE_CODE (decl
) == FUNCTION_DECL
20120 && (DECL_DECLARED_INLINE_P (decl
)
20121 || type_uses_auto (TREE_TYPE (TREE_TYPE (decl
)))))
20122 /* And we need to instantiate static data members so that
20123 their initializers are available in integral constant
20126 && decl_maybe_constant_var_p (decl
)));
20129 /* If FN has a noexcept-specifier that hasn't been instantiated yet,
20130 instantiate it now, modifying TREE_TYPE (fn). */
20133 maybe_instantiate_noexcept (tree fn
)
20135 tree fntype
, spec
, noex
, clone
;
20137 /* Don't instantiate a noexcept-specification from template context. */
20138 if (processing_template_decl
)
20141 if (DECL_CLONED_FUNCTION_P (fn
))
20142 fn
= DECL_CLONED_FUNCTION (fn
);
20143 fntype
= TREE_TYPE (fn
);
20144 spec
= TYPE_RAISES_EXCEPTIONS (fntype
);
20146 if (!spec
|| !TREE_PURPOSE (spec
))
20149 noex
= TREE_PURPOSE (spec
);
20151 if (TREE_CODE (noex
) == DEFERRED_NOEXCEPT
)
20153 if (DEFERRED_NOEXCEPT_PATTERN (noex
) == NULL_TREE
)
20154 spec
= get_defaulted_eh_spec (fn
);
20155 else if (push_tinst_level (fn
))
20157 push_access_scope (fn
);
20158 push_deferring_access_checks (dk_no_deferred
);
20159 input_location
= DECL_SOURCE_LOCATION (fn
);
20160 noex
= tsubst_copy_and_build (DEFERRED_NOEXCEPT_PATTERN (noex
),
20161 DEFERRED_NOEXCEPT_ARGS (noex
),
20162 tf_warning_or_error
, fn
,
20163 /*function_p=*/false,
20164 /*integral_constant_expression_p=*/true);
20165 pop_deferring_access_checks ();
20166 pop_access_scope (fn
);
20167 pop_tinst_level ();
20168 spec
= build_noexcept_spec (noex
, tf_warning_or_error
);
20169 if (spec
== error_mark_node
)
20170 spec
= noexcept_false_spec
;
20173 spec
= noexcept_false_spec
;
20175 TREE_TYPE (fn
) = build_exception_variant (fntype
, spec
);
20178 FOR_EACH_CLONE (clone
, fn
)
20180 if (TREE_TYPE (clone
) == fntype
)
20181 TREE_TYPE (clone
) = TREE_TYPE (fn
);
20183 TREE_TYPE (clone
) = build_exception_variant (TREE_TYPE (clone
), spec
);
20187 /* Produce the definition of D, a _DECL generated from a template. If
20188 DEFER_OK is nonzero, then we don't have to actually do the
20189 instantiation now; we just have to do it sometime. Normally it is
20190 an error if this is an explicit instantiation but D is undefined.
20191 EXPL_INST_CLASS_MEM_P is true iff D is a member of an
20192 explicitly instantiated class template. */
20195 instantiate_decl (tree d
, int defer_ok
,
20196 bool expl_inst_class_mem_p
)
20198 tree tmpl
= DECL_TI_TEMPLATE (d
);
20205 bool pattern_defined
;
20206 location_t saved_loc
= input_location
;
20207 int saved_unevaluated_operand
= cp_unevaluated_operand
;
20208 int saved_inhibit_evaluation_warnings
= c_inhibit_evaluation_warnings
;
20214 /* This function should only be used to instantiate templates for
20215 functions and static member variables. */
20216 gcc_assert (VAR_OR_FUNCTION_DECL_P (d
));
20218 /* Variables are never deferred; if instantiation is required, they
20219 are instantiated right away. That allows for better code in the
20220 case that an expression refers to the value of the variable --
20221 if the variable has a constant value the referring expression can
20222 take advantage of that fact. */
20224 || DECL_DECLARED_CONSTEXPR_P (d
))
20227 /* Don't instantiate cloned functions. Instead, instantiate the
20228 functions they cloned. */
20229 if (TREE_CODE (d
) == FUNCTION_DECL
&& DECL_CLONED_FUNCTION_P (d
))
20230 d
= DECL_CLONED_FUNCTION (d
);
20232 if (DECL_TEMPLATE_INSTANTIATED (d
)
20233 || (TREE_CODE (d
) == FUNCTION_DECL
20234 && DECL_DEFAULTED_FN (d
) && DECL_INITIAL (d
))
20235 || DECL_TEMPLATE_SPECIALIZATION (d
))
20236 /* D has already been instantiated or explicitly specialized, so
20237 there's nothing for us to do here.
20239 It might seem reasonable to check whether or not D is an explicit
20240 instantiation, and, if so, stop here. But when an explicit
20241 instantiation is deferred until the end of the compilation,
20242 DECL_EXPLICIT_INSTANTIATION is set, even though we still need to do
20243 the instantiation. */
20246 /* Check to see whether we know that this template will be
20247 instantiated in some other file, as with "extern template"
20249 external_p
= (DECL_INTERFACE_KNOWN (d
) && DECL_REALLY_EXTERN (d
));
20251 /* In general, we do not instantiate such templates. */
20252 if (external_p
&& !always_instantiate_p (d
))
20255 gen_tmpl
= most_general_template (tmpl
);
20256 gen_args
= DECL_TI_ARGS (d
);
20258 if (tmpl
!= gen_tmpl
)
20259 /* We should already have the extra args. */
20260 gcc_assert (TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (gen_tmpl
))
20261 == TMPL_ARGS_DEPTH (gen_args
));
20262 /* And what's in the hash table should match D. */
20263 gcc_assert ((spec
= retrieve_specialization (gen_tmpl
, gen_args
, 0)) == d
20264 || spec
== NULL_TREE
);
20266 /* This needs to happen before any tsubsting. */
20267 if (! push_tinst_level (d
))
20270 timevar_push (TV_TEMPLATE_INST
);
20272 /* Set TD to the template whose DECL_TEMPLATE_RESULT is the pattern
20273 for the instantiation. */
20274 td
= template_for_substitution (d
);
20275 code_pattern
= DECL_TEMPLATE_RESULT (td
);
20277 /* We should never be trying to instantiate a member of a class
20278 template or partial specialization. */
20279 gcc_assert (d
!= code_pattern
);
20281 if ((DECL_NAMESPACE_SCOPE_P (d
) && !DECL_INITIALIZED_IN_CLASS_P (d
))
20282 || DECL_TEMPLATE_SPECIALIZATION (td
))
20283 /* In the case of a friend template whose definition is provided
20284 outside the class, we may have too many arguments. Drop the
20285 ones we don't need. The same is true for specializations. */
20286 args
= get_innermost_template_args
20287 (gen_args
, TMPL_PARMS_DEPTH (DECL_TEMPLATE_PARMS (td
)));
20291 if (TREE_CODE (d
) == FUNCTION_DECL
)
20293 deleted_p
= DECL_DELETED_FN (code_pattern
);
20294 pattern_defined
= (DECL_SAVED_TREE (code_pattern
) != NULL_TREE
20295 || DECL_DEFAULTED_OUTSIDE_CLASS_P (code_pattern
)
20301 pattern_defined
= ! DECL_IN_AGGR_P (code_pattern
);
20304 /* We may be in the middle of deferred access check. Disable it now. */
20305 push_deferring_access_checks (dk_no_deferred
);
20307 /* Unless an explicit instantiation directive has already determined
20308 the linkage of D, remember that a definition is available for
20310 if (pattern_defined
20311 && !DECL_INTERFACE_KNOWN (d
)
20312 && !DECL_NOT_REALLY_EXTERN (d
))
20313 mark_definable (d
);
20315 DECL_SOURCE_LOCATION (td
) = DECL_SOURCE_LOCATION (code_pattern
);
20316 DECL_SOURCE_LOCATION (d
) = DECL_SOURCE_LOCATION (code_pattern
);
20317 input_location
= DECL_SOURCE_LOCATION (d
);
20319 /* If D is a member of an explicitly instantiated class template,
20320 and no definition is available, treat it like an implicit
20322 if (!pattern_defined
&& expl_inst_class_mem_p
20323 && DECL_EXPLICIT_INSTANTIATION (d
))
20325 /* Leave linkage flags alone on instantiations with anonymous
20327 if (TREE_PUBLIC (d
))
20329 DECL_NOT_REALLY_EXTERN (d
) = 0;
20330 DECL_INTERFACE_KNOWN (d
) = 0;
20332 SET_DECL_IMPLICIT_INSTANTIATION (d
);
20335 /* Defer all other templates, unless we have been explicitly
20336 forbidden from doing so. */
20337 if (/* If there is no definition, we cannot instantiate the
20340 /* If it's OK to postpone instantiation, do so. */
20342 /* If this is a static data member that will be defined
20343 elsewhere, we don't want to instantiate the entire data
20344 member, but we do want to instantiate the initializer so that
20345 we can substitute that elsewhere. */
20346 || (external_p
&& VAR_P (d
))
20347 /* Handle here a deleted function too, avoid generating
20348 its body (c++/61080). */
20351 /* The definition of the static data member is now required so
20352 we must substitute the initializer. */
20354 && !DECL_INITIAL (d
)
20355 && DECL_INITIAL (code_pattern
))
20359 bool const_init
= false;
20360 bool enter_context
= DECL_CLASS_SCOPE_P (d
);
20362 ns
= decl_namespace_context (d
);
20363 push_nested_namespace (ns
);
20365 push_nested_class (DECL_CONTEXT (d
));
20366 init
= tsubst_expr (DECL_INITIAL (code_pattern
),
20368 tf_warning_or_error
, NULL_TREE
,
20369 /*integral_constant_expression_p=*/false);
20370 /* If instantiating the initializer involved instantiating this
20371 again, don't call cp_finish_decl twice. */
20372 if (!DECL_INITIAL (d
))
20374 /* Make sure the initializer is still constant, in case of
20375 circular dependency (template/instantiate6.C). */
20377 = DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (code_pattern
);
20378 cp_finish_decl (d
, init
, /*init_const_expr_p=*/const_init
,
20379 /*asmspec_tree=*/NULL_TREE
,
20380 LOOKUP_ONLYCONVERTING
);
20383 pop_nested_class ();
20384 pop_nested_namespace (ns
);
20387 /* We restore the source position here because it's used by
20388 add_pending_template. */
20389 input_location
= saved_loc
;
20391 if (at_eof
&& !pattern_defined
20392 && DECL_EXPLICIT_INSTANTIATION (d
)
20393 && DECL_NOT_REALLY_EXTERN (d
))
20396 The definition of a non-exported function template, a
20397 non-exported member function template, or a non-exported
20398 member function or static data member of a class template
20399 shall be present in every translation unit in which it is
20400 explicitly instantiated. */
20401 permerror (input_location
, "explicit instantiation of %qD "
20402 "but no definition available", d
);
20404 /* If we're in unevaluated context, we just wanted to get the
20405 constant value; this isn't an odr use, so don't queue
20406 a full instantiation. */
20407 if (cp_unevaluated_operand
!= 0)
20409 /* ??? Historically, we have instantiated inline functions, even
20410 when marked as "extern template". */
20411 if (!(external_p
&& VAR_P (d
)))
20412 add_pending_template (d
);
20415 /* Tell the repository that D is available in this translation unit
20416 -- and see if it is supposed to be instantiated here. */
20417 if (TREE_PUBLIC (d
) && !DECL_REALLY_EXTERN (d
) && !repo_emit_p (d
))
20419 /* In a PCH file, despite the fact that the repository hasn't
20420 requested instantiation in the PCH it is still possible that
20421 an instantiation will be required in a file that includes the
20424 add_pending_template (d
);
20425 /* Instantiate inline functions so that the inliner can do its
20426 job, even though we'll not be emitting a copy of this
20428 if (!(TREE_CODE (d
) == FUNCTION_DECL
&& possibly_inlined_p (d
)))
20432 fn_context
= decl_function_context (d
);
20433 nested
= (current_function_decl
!= NULL_TREE
);
20435 push_to_top_level ();
20439 push_function_context ();
20440 cp_unevaluated_operand
= 0;
20441 c_inhibit_evaluation_warnings
= 0;
20444 /* Mark D as instantiated so that recursive calls to
20445 instantiate_decl do not try to instantiate it again. */
20446 DECL_TEMPLATE_INSTANTIATED (d
) = 1;
20448 /* Regenerate the declaration in case the template has been modified
20449 by a subsequent redeclaration. */
20450 regenerate_decl_from_template (d
, td
);
20452 /* We already set the file and line above. Reset them now in case
20453 they changed as a result of calling regenerate_decl_from_template. */
20454 input_location
= DECL_SOURCE_LOCATION (d
);
20459 bool const_init
= false;
20461 /* Clear out DECL_RTL; whatever was there before may not be right
20462 since we've reset the type of the declaration. */
20463 SET_DECL_RTL (d
, NULL
);
20464 DECL_IN_AGGR_P (d
) = 0;
20466 /* The initializer is placed in DECL_INITIAL by
20467 regenerate_decl_from_template so we don't need to
20468 push/pop_access_scope again here. Pull it out so that
20469 cp_finish_decl can process it. */
20470 init
= DECL_INITIAL (d
);
20471 DECL_INITIAL (d
) = NULL_TREE
;
20472 DECL_INITIALIZED_P (d
) = 0;
20474 /* Clear DECL_EXTERNAL so that cp_finish_decl will process the
20475 initializer. That function will defer actual emission until
20476 we have a chance to determine linkage. */
20477 DECL_EXTERNAL (d
) = 0;
20479 /* Enter the scope of D so that access-checking works correctly. */
20480 bool enter_context
= DECL_CLASS_SCOPE_P (d
);
20482 push_nested_class (DECL_CONTEXT (d
));
20484 const_init
= DECL_INITIALIZED_BY_CONSTANT_EXPRESSION_P (code_pattern
);
20485 cp_finish_decl (d
, init
, const_init
, NULL_TREE
, 0);
20488 pop_nested_class ();
20490 if (variable_template_p (td
))
20491 note_variable_template_instantiation (d
);
20493 else if (TREE_CODE (d
) == FUNCTION_DECL
&& DECL_DEFAULTED_FN (code_pattern
))
20494 synthesize_method (d
);
20495 else if (TREE_CODE (d
) == FUNCTION_DECL
)
20497 hash_map
<tree
, tree
> *saved_local_specializations
;
20501 tree block
= NULL_TREE
;
20503 /* Save away the current list, in case we are instantiating one
20504 template from within the body of another. */
20505 saved_local_specializations
= local_specializations
;
20507 /* Set up the list of local specializations. */
20508 local_specializations
= new hash_map
<tree
, tree
>;
20510 /* Set up context. */
20511 if (DECL_OMP_DECLARE_REDUCTION_P (code_pattern
)
20512 && TREE_CODE (DECL_CONTEXT (code_pattern
)) == FUNCTION_DECL
)
20513 block
= push_stmt_list ();
20515 start_preparsed_function (d
, NULL_TREE
, SF_PRE_PARSED
);
20517 /* Some typedefs referenced from within the template code need to be
20518 access checked at template instantiation time, i.e now. These
20519 types were added to the template at parsing time. Let's get those
20520 and perform the access checks then. */
20521 perform_typedefs_access_check (DECL_TEMPLATE_RESULT (gen_tmpl
),
20524 /* Create substitution entries for the parameters. */
20525 subst_decl
= DECL_TEMPLATE_RESULT (template_for_substitution (d
));
20526 tmpl_parm
= DECL_ARGUMENTS (subst_decl
);
20527 spec_parm
= DECL_ARGUMENTS (d
);
20528 if (DECL_NONSTATIC_MEMBER_FUNCTION_P (d
))
20530 register_local_specialization (spec_parm
, tmpl_parm
);
20531 spec_parm
= skip_artificial_parms_for (d
, spec_parm
);
20532 tmpl_parm
= skip_artificial_parms_for (subst_decl
, tmpl_parm
);
20534 for (; tmpl_parm
; tmpl_parm
= DECL_CHAIN (tmpl_parm
))
20536 if (!DECL_PACK_P (tmpl_parm
))
20538 register_local_specialization (spec_parm
, tmpl_parm
);
20539 spec_parm
= DECL_CHAIN (spec_parm
);
20543 /* Register the (value) argument pack as a specialization of
20544 TMPL_PARM, then move on. */
20545 tree argpack
= extract_fnparm_pack (tmpl_parm
, &spec_parm
);
20546 register_local_specialization (argpack
, tmpl_parm
);
20549 gcc_assert (!spec_parm
);
20551 /* Substitute into the body of the function. */
20552 if (DECL_OMP_DECLARE_REDUCTION_P (code_pattern
))
20553 tsubst_omp_udr (DECL_SAVED_TREE (code_pattern
), args
,
20554 tf_warning_or_error
, tmpl
);
20557 tsubst_expr (DECL_SAVED_TREE (code_pattern
), args
,
20558 tf_warning_or_error
, tmpl
,
20559 /*integral_constant_expression_p=*/false);
20561 /* Set the current input_location to the end of the function
20562 so that finish_function knows where we are. */
20564 = DECL_STRUCT_FUNCTION (code_pattern
)->function_end_locus
;
20566 /* Remember if we saw an infinite loop in the template. */
20567 current_function_infinite_loop
20568 = DECL_STRUCT_FUNCTION (code_pattern
)->language
->infinite_loop
;
20571 /* We don't need the local specializations any more. */
20572 delete local_specializations
;
20573 local_specializations
= saved_local_specializations
;
20575 /* Finish the function. */
20576 if (DECL_OMP_DECLARE_REDUCTION_P (code_pattern
)
20577 && TREE_CODE (DECL_CONTEXT (code_pattern
)) == FUNCTION_DECL
)
20578 DECL_SAVED_TREE (d
) = pop_stmt_list (block
);
20581 d
= finish_function (0);
20582 expand_or_defer_fn (d
);
20585 if (DECL_OMP_DECLARE_REDUCTION_P (code_pattern
))
20586 cp_check_omp_declare_reduction (d
);
20589 /* We're not deferring instantiation any more. */
20590 TI_PENDING_TEMPLATE_FLAG (DECL_TEMPLATE_INFO (d
)) = 0;
20593 pop_from_top_level ();
20595 pop_function_context ();
20598 input_location
= saved_loc
;
20599 cp_unevaluated_operand
= saved_unevaluated_operand
;
20600 c_inhibit_evaluation_warnings
= saved_inhibit_evaluation_warnings
;
20601 pop_deferring_access_checks ();
20602 pop_tinst_level ();
20604 timevar_pop (TV_TEMPLATE_INST
);
20609 /* Run through the list of templates that we wish we could
20610 instantiate, and instantiate any we can. RETRIES is the
20611 number of times we retry pending template instantiation. */
20614 instantiate_pending_templates (int retries
)
20617 location_t saved_loc
= input_location
;
20619 /* Instantiating templates may trigger vtable generation. This in turn
20620 may require further template instantiations. We place a limit here
20621 to avoid infinite loop. */
20622 if (pending_templates
&& retries
>= max_tinst_depth
)
20624 tree decl
= pending_templates
->tinst
->decl
;
20626 fatal_error (input_location
,
20627 "template instantiation depth exceeds maximum of %d"
20628 " instantiating %q+D, possibly from virtual table generation"
20629 " (use -ftemplate-depth= to increase the maximum)",
20630 max_tinst_depth
, decl
);
20631 if (TREE_CODE (decl
) == FUNCTION_DECL
)
20632 /* Pretend that we defined it. */
20633 DECL_INITIAL (decl
) = error_mark_node
;
20639 struct pending_template
**t
= &pending_templates
;
20640 struct pending_template
*last
= NULL
;
20644 tree instantiation
= reopen_tinst_level ((*t
)->tinst
);
20645 bool complete
= false;
20647 if (TYPE_P (instantiation
))
20651 if (!COMPLETE_TYPE_P (instantiation
))
20653 instantiate_class_template (instantiation
);
20654 if (CLASSTYPE_TEMPLATE_INSTANTIATION (instantiation
))
20655 for (fn
= TYPE_METHODS (instantiation
);
20657 fn
= TREE_CHAIN (fn
))
20658 if (! DECL_ARTIFICIAL (fn
))
20659 instantiate_decl (fn
,
20661 /*expl_inst_class_mem_p=*/false);
20662 if (COMPLETE_TYPE_P (instantiation
))
20666 complete
= COMPLETE_TYPE_P (instantiation
);
20670 if (!DECL_TEMPLATE_SPECIALIZATION (instantiation
)
20671 && !DECL_TEMPLATE_INSTANTIATED (instantiation
))
20674 = instantiate_decl (instantiation
,
20676 /*expl_inst_class_mem_p=*/false);
20677 if (DECL_TEMPLATE_INSTANTIATED (instantiation
))
20681 complete
= (DECL_TEMPLATE_SPECIALIZATION (instantiation
)
20682 || DECL_TEMPLATE_INSTANTIATED (instantiation
));
20686 /* If INSTANTIATION has been instantiated, then we don't
20687 need to consider it again in the future. */
20695 current_tinst_level
= NULL
;
20697 last_pending_template
= last
;
20699 while (reconsider
);
20701 input_location
= saved_loc
;
20704 /* Substitute ARGVEC into T, which is a list of initializers for
20705 either base class or a non-static data member. The TREE_PURPOSEs
20706 are DECLs, and the TREE_VALUEs are the initializer values. Used by
20707 instantiate_decl. */
20710 tsubst_initializer_list (tree t
, tree argvec
)
20712 tree inits
= NULL_TREE
;
20714 for (; t
; t
= TREE_CHAIN (t
))
20718 tree expanded_bases
= NULL_TREE
;
20719 tree expanded_arguments
= NULL_TREE
;
20722 if (TREE_CODE (TREE_PURPOSE (t
)) == TYPE_PACK_EXPANSION
)
20727 /* Expand the base class expansion type into separate base
20729 expanded_bases
= tsubst_pack_expansion (TREE_PURPOSE (t
), argvec
,
20730 tf_warning_or_error
,
20732 if (expanded_bases
== error_mark_node
)
20735 /* We'll be building separate TREE_LISTs of arguments for
20737 len
= TREE_VEC_LENGTH (expanded_bases
);
20738 expanded_arguments
= make_tree_vec (len
);
20739 for (i
= 0; i
< len
; i
++)
20740 TREE_VEC_ELT (expanded_arguments
, i
) = NULL_TREE
;
20742 /* Build a dummy EXPR_PACK_EXPANSION that will be used to
20743 expand each argument in the TREE_VALUE of t. */
20744 expr
= make_node (EXPR_PACK_EXPANSION
);
20745 PACK_EXPANSION_LOCAL_P (expr
) = true;
20746 PACK_EXPANSION_PARAMETER_PACKS (expr
) =
20747 PACK_EXPANSION_PARAMETER_PACKS (TREE_PURPOSE (t
));
20749 if (TREE_VALUE (t
) == void_type_node
)
20750 /* VOID_TYPE_NODE is used to indicate
20751 value-initialization. */
20753 for (i
= 0; i
< len
; i
++)
20754 TREE_VEC_ELT (expanded_arguments
, i
) = void_type_node
;
20758 /* Substitute parameter packs into each argument in the
20760 in_base_initializer
= 1;
20761 for (arg
= TREE_VALUE (t
); arg
; arg
= TREE_CHAIN (arg
))
20763 tree expanded_exprs
;
20765 /* Expand the argument. */
20766 SET_PACK_EXPANSION_PATTERN (expr
, TREE_VALUE (arg
));
20768 = tsubst_pack_expansion (expr
, argvec
,
20769 tf_warning_or_error
,
20771 if (expanded_exprs
== error_mark_node
)
20774 /* Prepend each of the expanded expressions to the
20775 corresponding TREE_LIST in EXPANDED_ARGUMENTS. */
20776 for (i
= 0; i
< len
; i
++)
20778 TREE_VEC_ELT (expanded_arguments
, i
) =
20779 tree_cons (NULL_TREE
,
20780 TREE_VEC_ELT (expanded_exprs
, i
),
20781 TREE_VEC_ELT (expanded_arguments
, i
));
20784 in_base_initializer
= 0;
20786 /* Reverse all of the TREE_LISTs in EXPANDED_ARGUMENTS,
20787 since we built them backwards. */
20788 for (i
= 0; i
< len
; i
++)
20790 TREE_VEC_ELT (expanded_arguments
, i
) =
20791 nreverse (TREE_VEC_ELT (expanded_arguments
, i
));
20796 for (i
= 0; i
< len
; ++i
)
20798 if (expanded_bases
)
20800 decl
= TREE_VEC_ELT (expanded_bases
, i
);
20801 decl
= expand_member_init (decl
);
20802 init
= TREE_VEC_ELT (expanded_arguments
, i
);
20807 decl
= tsubst_copy (TREE_PURPOSE (t
), argvec
,
20808 tf_warning_or_error
, NULL_TREE
);
20810 decl
= expand_member_init (decl
);
20811 if (decl
&& !DECL_P (decl
))
20812 in_base_initializer
= 1;
20814 init
= TREE_VALUE (t
);
20816 if (init
!= void_type_node
)
20817 init
= tsubst_expr (init
, argvec
,
20818 tf_warning_or_error
, NULL_TREE
,
20819 /*integral_constant_expression_p=*/false);
20820 if (init
== NULL_TREE
&& tmp
!= NULL_TREE
)
20821 /* If we had an initializer but it instantiated to nothing,
20822 value-initialize the object. This will only occur when
20823 the initializer was a pack expansion where the parameter
20824 packs used in that expansion were of length zero. */
20825 init
= void_type_node
;
20826 in_base_initializer
= 0;
20831 init
= build_tree_list (decl
, init
);
20832 TREE_CHAIN (init
) = inits
;
20840 /* Set CURRENT_ACCESS_SPECIFIER based on the protection of DECL. */
20843 set_current_access_from_decl (tree decl
)
20845 if (TREE_PRIVATE (decl
))
20846 current_access_specifier
= access_private_node
;
20847 else if (TREE_PROTECTED (decl
))
20848 current_access_specifier
= access_protected_node
;
20850 current_access_specifier
= access_public_node
;
20853 /* Instantiate an enumerated type. TAG is the template type, NEWTAG
20854 is the instantiation (which should have been created with
20855 start_enum) and ARGS are the template arguments to use. */
20858 tsubst_enum (tree tag
, tree newtag
, tree args
)
20862 if (SCOPED_ENUM_P (newtag
))
20863 begin_scope (sk_scoped_enum
, newtag
);
20865 for (e
= TYPE_VALUES (tag
); e
; e
= TREE_CHAIN (e
))
20870 decl
= TREE_VALUE (e
);
20871 /* Note that in a template enum, the TREE_VALUE is the
20872 CONST_DECL, not the corresponding INTEGER_CST. */
20873 value
= tsubst_expr (DECL_INITIAL (decl
),
20874 args
, tf_warning_or_error
, NULL_TREE
,
20875 /*integral_constant_expression_p=*/true);
20877 /* Give this enumeration constant the correct access. */
20878 set_current_access_from_decl (decl
);
20880 /* Actually build the enumerator itself. Here we're assuming that
20881 enumerators can't have dependent attributes. */
20882 build_enumerator (DECL_NAME (decl
), value
, newtag
,
20883 DECL_ATTRIBUTES (decl
), DECL_SOURCE_LOCATION (decl
));
20886 if (SCOPED_ENUM_P (newtag
))
20889 finish_enum_value_list (newtag
);
20890 finish_enum (newtag
);
20892 DECL_SOURCE_LOCATION (TYPE_NAME (newtag
))
20893 = DECL_SOURCE_LOCATION (TYPE_NAME (tag
));
20896 /* DECL is a FUNCTION_DECL that is a template specialization. Return
20897 its type -- but without substituting the innermost set of template
20898 arguments. So, innermost set of template parameters will appear in
20902 get_mostly_instantiated_function_type (tree decl
)
20904 /* For a function, DECL_TI_TEMPLATE is partially instantiated. */
20905 return TREE_TYPE (DECL_TI_TEMPLATE (decl
));
20908 /* Return truthvalue if we're processing a template different from
20909 the last one involved in diagnostics. */
20911 problematic_instantiation_changed (void)
20913 return current_tinst_level
!= last_error_tinst_level
;
20916 /* Remember current template involved in diagnostics. */
20918 record_last_problematic_instantiation (void)
20920 last_error_tinst_level
= current_tinst_level
;
20923 struct tinst_level
*
20924 current_instantiation (void)
20926 return current_tinst_level
;
20929 /* Return TRUE if current_function_decl is being instantiated, false
20933 instantiating_current_function_p (void)
20935 return (current_instantiation ()
20936 && current_instantiation ()->decl
== current_function_decl
);
20939 /* [temp.param] Check that template non-type parm TYPE is of an allowable
20940 type. Return zero for ok, nonzero for disallowed. Issue error and
20941 warning messages under control of COMPLAIN. */
20944 invalid_nontype_parm_type_p (tree type
, tsubst_flags_t complain
)
20946 if (INTEGRAL_OR_ENUMERATION_TYPE_P (type
))
20948 else if (POINTER_TYPE_P (type
))
20950 else if (TYPE_PTRMEM_P (type
))
20952 else if (TREE_CODE (type
) == TEMPLATE_TYPE_PARM
)
20954 else if (TREE_CODE (type
) == TYPENAME_TYPE
)
20956 else if (TREE_CODE (type
) == DECLTYPE_TYPE
)
20958 else if (TREE_CODE (type
) == NULLPTR_TYPE
)
20961 if (complain
& tf_error
)
20963 if (type
== error_mark_node
)
20964 inform (input_location
, "invalid template non-type parameter");
20966 error ("%q#T is not a valid type for a template non-type parameter",
20972 /* Returns TRUE if TYPE is dependent, in the sense of [temp.dep.type].
20973 Assumes that TYPE really is a type, and not the ERROR_MARK_NODE.*/
20976 dependent_type_p_r (tree type
)
20982 A type is dependent if it is:
20984 -- a template parameter. Template template parameters are types
20985 for us (since TYPE_P holds true for them) so we handle
20987 if (TREE_CODE (type
) == TEMPLATE_TYPE_PARM
20988 || TREE_CODE (type
) == TEMPLATE_TEMPLATE_PARM
)
20990 /* -- a qualified-id with a nested-name-specifier which contains a
20991 class-name that names a dependent type or whose unqualified-id
20992 names a dependent type. */
20993 if (TREE_CODE (type
) == TYPENAME_TYPE
)
20996 /* An alias template specialization can be dependent even if the
20997 resulting type is not. */
20998 if (dependent_alias_template_spec_p (type
))
21001 /* -- a cv-qualified type where the cv-unqualified type is
21003 No code is necessary for this bullet; the code below handles
21004 cv-qualified types, and we don't want to strip aliases with
21005 TYPE_MAIN_VARIANT because of DR 1558. */
21006 /* -- a compound type constructed from any dependent type. */
21007 if (TYPE_PTRMEM_P (type
))
21008 return (dependent_type_p (TYPE_PTRMEM_CLASS_TYPE (type
))
21009 || dependent_type_p (TYPE_PTRMEM_POINTED_TO_TYPE
21011 else if (TYPE_PTR_P (type
)
21012 || TREE_CODE (type
) == REFERENCE_TYPE
)
21013 return dependent_type_p (TREE_TYPE (type
));
21014 else if (TREE_CODE (type
) == FUNCTION_TYPE
21015 || TREE_CODE (type
) == METHOD_TYPE
)
21019 if (dependent_type_p (TREE_TYPE (type
)))
21021 for (arg_type
= TYPE_ARG_TYPES (type
);
21023 arg_type
= TREE_CHAIN (arg_type
))
21024 if (dependent_type_p (TREE_VALUE (arg_type
)))
21028 /* -- an array type constructed from any dependent type or whose
21029 size is specified by a constant expression that is
21032 We checked for type- and value-dependence of the bounds in
21033 compute_array_index_type, so TYPE_DEPENDENT_P is already set. */
21034 if (TREE_CODE (type
) == ARRAY_TYPE
)
21036 if (TYPE_DOMAIN (type
)
21037 && dependent_type_p (TYPE_DOMAIN (type
)))
21039 return dependent_type_p (TREE_TYPE (type
));
21042 /* -- a template-id in which either the template name is a template
21044 if (TREE_CODE (type
) == BOUND_TEMPLATE_TEMPLATE_PARM
)
21046 /* ... or any of the template arguments is a dependent type or
21047 an expression that is type-dependent or value-dependent. */
21048 else if (CLASS_TYPE_P (type
) && CLASSTYPE_TEMPLATE_INFO (type
)
21049 && (any_dependent_template_arguments_p
21050 (INNERMOST_TEMPLATE_ARGS (CLASSTYPE_TI_ARGS (type
)))))
21053 /* All TYPEOF_TYPEs, DECLTYPE_TYPEs, and UNDERLYING_TYPEs are
21054 dependent; if the argument of the `typeof' expression is not
21055 type-dependent, then it should already been have resolved. */
21056 if (TREE_CODE (type
) == TYPEOF_TYPE
21057 || TREE_CODE (type
) == DECLTYPE_TYPE
21058 || TREE_CODE (type
) == UNDERLYING_TYPE
)
21061 /* A template argument pack is dependent if any of its packed
21063 if (TREE_CODE (type
) == TYPE_ARGUMENT_PACK
)
21065 tree args
= ARGUMENT_PACK_ARGS (type
);
21066 int i
, len
= TREE_VEC_LENGTH (args
);
21067 for (i
= 0; i
< len
; ++i
)
21068 if (dependent_template_arg_p (TREE_VEC_ELT (args
, i
)))
21072 /* All TYPE_PACK_EXPANSIONs are dependent, because parameter packs must
21073 be template parameters. */
21074 if (TREE_CODE (type
) == TYPE_PACK_EXPANSION
)
21077 /* The standard does not specifically mention types that are local
21078 to template functions or local classes, but they should be
21079 considered dependent too. For example:
21081 template <int I> void f() {
21086 The size of `E' cannot be known until the value of `I' has been
21087 determined. Therefore, `E' must be considered dependent. */
21088 scope
= TYPE_CONTEXT (type
);
21089 if (scope
&& TYPE_P (scope
))
21090 return dependent_type_p (scope
);
21091 /* Don't use type_dependent_expression_p here, as it can lead
21092 to infinite recursion trying to determine whether a lambda
21093 nested in a lambda is dependent (c++/47687). */
21094 else if (scope
&& TREE_CODE (scope
) == FUNCTION_DECL
21095 && DECL_LANG_SPECIFIC (scope
)
21096 && DECL_TEMPLATE_INFO (scope
)
21097 && (any_dependent_template_arguments_p
21098 (INNERMOST_TEMPLATE_ARGS (DECL_TI_ARGS (scope
)))))
21101 /* Other types are non-dependent. */
21105 /* Returns TRUE if TYPE is dependent, in the sense of
21106 [temp.dep.type]. Note that a NULL type is considered dependent. */
21109 dependent_type_p (tree type
)
21111 /* If there are no template parameters in scope, then there can't be
21112 any dependent types. */
21113 if (!processing_template_decl
)
21115 /* If we are not processing a template, then nobody should be
21116 providing us with a dependent type. */
21118 gcc_assert (TREE_CODE (type
) != TEMPLATE_TYPE_PARM
|| is_auto (type
));
21122 /* If the type is NULL, we have not computed a type for the entity
21123 in question; in that case, the type is dependent. */
21127 /* Erroneous types can be considered non-dependent. */
21128 if (type
== error_mark_node
)
21131 /* If we have not already computed the appropriate value for TYPE,
21133 if (!TYPE_DEPENDENT_P_VALID (type
))
21135 TYPE_DEPENDENT_P (type
) = dependent_type_p_r (type
);
21136 TYPE_DEPENDENT_P_VALID (type
) = 1;
21139 return TYPE_DEPENDENT_P (type
);
21142 /* Returns TRUE if SCOPE is a dependent scope, in which we can't do any
21143 lookup. In other words, a dependent type that is not the current
21147 dependent_scope_p (tree scope
)
21149 return (scope
&& TYPE_P (scope
) && dependent_type_p (scope
)
21150 && !currently_open_class (scope
));
21153 /* T is a SCOPE_REF; return whether we need to consider it
21154 instantiation-dependent so that we can check access at instantiation
21155 time even though we know which member it resolves to. */
21158 instantiation_dependent_scope_ref_p (tree t
)
21160 if (DECL_P (TREE_OPERAND (t
, 1))
21161 && CLASS_TYPE_P (TREE_OPERAND (t
, 0))
21162 && accessible_in_template_p (TREE_OPERAND (t
, 0),
21163 TREE_OPERAND (t
, 1)))
21169 /* Returns TRUE if the EXPRESSION is value-dependent, in the sense of
21170 [temp.dep.constexpr]. EXPRESSION is already known to be a constant
21173 /* Note that this predicate is not appropriate for general expressions;
21174 only constant expressions (that satisfy potential_constant_expression)
21175 can be tested for value dependence. */
21178 value_dependent_expression_p (tree expression
)
21180 if (!processing_template_decl
)
21183 /* A name declared with a dependent type. */
21184 if (DECL_P (expression
) && type_dependent_expression_p (expression
))
21187 switch (TREE_CODE (expression
))
21189 case IDENTIFIER_NODE
:
21190 /* A name that has not been looked up -- must be dependent. */
21193 case TEMPLATE_PARM_INDEX
:
21194 /* A non-type template parm. */
21198 /* A non-type template parm. */
21199 if (DECL_TEMPLATE_PARM_P (expression
))
21201 return value_dependent_expression_p (DECL_INITIAL (expression
));
21204 /* A constant with literal type and is initialized
21205 with an expression that is value-dependent.
21207 Note that a non-dependent parenthesized initializer will have
21208 already been replaced with its constant value, so if we see
21209 a TREE_LIST it must be dependent. */
21210 if (DECL_INITIAL (expression
)
21211 && decl_constant_var_p (expression
)
21212 && (TREE_CODE (DECL_INITIAL (expression
)) == TREE_LIST
21213 /* cp_finish_decl doesn't fold reference initializers. */
21214 || TREE_CODE (TREE_TYPE (expression
)) == REFERENCE_TYPE
21215 || value_dependent_expression_p (DECL_INITIAL (expression
))))
21219 case DYNAMIC_CAST_EXPR
:
21220 case STATIC_CAST_EXPR
:
21221 case CONST_CAST_EXPR
:
21222 case REINTERPRET_CAST_EXPR
:
21224 /* These expressions are value-dependent if the type to which
21225 the cast occurs is dependent or the expression being casted
21226 is value-dependent. */
21228 tree type
= TREE_TYPE (expression
);
21230 if (dependent_type_p (type
))
21233 /* A functional cast has a list of operands. */
21234 expression
= TREE_OPERAND (expression
, 0);
21237 /* If there are no operands, it must be an expression such
21238 as "int()". This should not happen for aggregate types
21239 because it would form non-constant expressions. */
21240 gcc_assert (cxx_dialect
>= cxx11
21241 || INTEGRAL_OR_ENUMERATION_TYPE_P (type
));
21246 if (TREE_CODE (expression
) == TREE_LIST
)
21247 return any_value_dependent_elements_p (expression
);
21249 return value_dependent_expression_p (expression
);
21253 if (SIZEOF_EXPR_TYPE_P (expression
))
21254 return dependent_type_p (TREE_TYPE (TREE_OPERAND (expression
, 0)));
21258 /* A `sizeof' expression is value-dependent if the operand is
21259 type-dependent or is a pack expansion. */
21260 expression
= TREE_OPERAND (expression
, 0);
21261 if (PACK_EXPANSION_P (expression
))
21263 else if (TYPE_P (expression
))
21264 return dependent_type_p (expression
);
21265 return instantiation_dependent_expression_p (expression
);
21267 case AT_ENCODE_EXPR
:
21268 /* An 'encode' expression is value-dependent if the operand is
21270 expression
= TREE_OPERAND (expression
, 0);
21271 return dependent_type_p (expression
);
21273 case NOEXCEPT_EXPR
:
21274 expression
= TREE_OPERAND (expression
, 0);
21275 return instantiation_dependent_expression_p (expression
);
21278 /* All instantiation-dependent expressions should also be considered
21279 value-dependent. */
21280 return instantiation_dependent_scope_ref_p (expression
);
21282 case COMPONENT_REF
:
21283 return (value_dependent_expression_p (TREE_OPERAND (expression
, 0))
21284 || value_dependent_expression_p (TREE_OPERAND (expression
, 1)));
21286 case NONTYPE_ARGUMENT_PACK
:
21287 /* A NONTYPE_ARGUMENT_PACK is value-dependent if any packed argument
21288 is value-dependent. */
21290 tree values
= ARGUMENT_PACK_ARGS (expression
);
21291 int i
, len
= TREE_VEC_LENGTH (values
);
21293 for (i
= 0; i
< len
; ++i
)
21294 if (value_dependent_expression_p (TREE_VEC_ELT (values
, i
)))
21302 tree type2
= TRAIT_EXPR_TYPE2 (expression
);
21303 return (dependent_type_p (TRAIT_EXPR_TYPE1 (expression
))
21304 || (type2
? dependent_type_p (type2
) : false));
21308 return ((value_dependent_expression_p (TREE_OPERAND (expression
, 0)))
21309 || (value_dependent_expression_p (TREE_OPERAND (expression
, 2))));
21312 return ((value_dependent_expression_p (TREE_OPERAND (expression
, 0)))
21313 || (value_dependent_expression_p (TREE_OPERAND (expression
, 1))));
21317 tree op
= TREE_OPERAND (expression
, 0);
21318 return (value_dependent_expression_p (op
)
21319 || has_value_dependent_address (op
));
21324 tree fn
= get_callee_fndecl (expression
);
21326 if (!fn
&& value_dependent_expression_p (CALL_EXPR_FN (expression
)))
21328 nargs
= call_expr_nargs (expression
);
21329 for (i
= 0; i
< nargs
; ++i
)
21331 tree op
= CALL_EXPR_ARG (expression
, i
);
21332 /* In a call to a constexpr member function, look through the
21333 implicit ADDR_EXPR on the object argument so that it doesn't
21334 cause the call to be considered value-dependent. We also
21335 look through it in potential_constant_expression. */
21336 if (i
== 0 && fn
&& DECL_DECLARED_CONSTEXPR_P (fn
)
21337 && DECL_NONSTATIC_MEMBER_FUNCTION_P (fn
)
21338 && TREE_CODE (op
) == ADDR_EXPR
)
21339 op
= TREE_OPERAND (op
, 0);
21340 if (value_dependent_expression_p (op
))
21346 case TEMPLATE_ID_EXPR
:
21347 /* If a TEMPLATE_ID_EXPR involves a dependent name, it will be
21349 return type_dependent_expression_p (expression
);
21355 if (dependent_type_p (TREE_TYPE (expression
)))
21357 FOR_EACH_CONSTRUCTOR_VALUE (CONSTRUCTOR_ELTS (expression
), ix
, val
)
21358 if (value_dependent_expression_p (val
))
21364 /* Treat a GNU statement expression as dependent to avoid crashing
21365 under instantiate_non_dependent_expr; it can't be constant. */
21369 /* A constant expression is value-dependent if any subexpression is
21370 value-dependent. */
21371 switch (TREE_CODE_CLASS (TREE_CODE (expression
)))
21373 case tcc_reference
:
21375 case tcc_comparison
:
21377 case tcc_expression
:
21380 int i
, len
= cp_tree_operand_length (expression
);
21382 for (i
= 0; i
< len
; i
++)
21384 tree t
= TREE_OPERAND (expression
, i
);
21386 /* In some cases, some of the operands may be missing.l
21387 (For example, in the case of PREDECREMENT_EXPR, the
21388 amount to increment by may be missing.) That doesn't
21389 make the expression dependent. */
21390 if (t
&& value_dependent_expression_p (t
))
21401 /* The expression is not value-dependent. */
21405 /* Returns TRUE if the EXPRESSION is type-dependent, in the sense of
21406 [temp.dep.expr]. Note that an expression with no type is
21407 considered dependent. Other parts of the compiler arrange for an
21408 expression with type-dependent subexpressions to have no type, so
21409 this function doesn't have to be fully recursive. */
21412 type_dependent_expression_p (tree expression
)
21414 if (!processing_template_decl
)
21417 if (expression
== NULL_TREE
|| expression
== error_mark_node
)
21420 /* An unresolved name is always dependent. */
21421 if (identifier_p (expression
) || TREE_CODE (expression
) == USING_DECL
)
21424 /* Some expression forms are never type-dependent. */
21425 if (TREE_CODE (expression
) == PSEUDO_DTOR_EXPR
21426 || TREE_CODE (expression
) == SIZEOF_EXPR
21427 || TREE_CODE (expression
) == ALIGNOF_EXPR
21428 || TREE_CODE (expression
) == AT_ENCODE_EXPR
21429 || TREE_CODE (expression
) == NOEXCEPT_EXPR
21430 || TREE_CODE (expression
) == TRAIT_EXPR
21431 || TREE_CODE (expression
) == TYPEID_EXPR
21432 || TREE_CODE (expression
) == DELETE_EXPR
21433 || TREE_CODE (expression
) == VEC_DELETE_EXPR
21434 || TREE_CODE (expression
) == THROW_EXPR
)
21437 /* The types of these expressions depends only on the type to which
21438 the cast occurs. */
21439 if (TREE_CODE (expression
) == DYNAMIC_CAST_EXPR
21440 || TREE_CODE (expression
) == STATIC_CAST_EXPR
21441 || TREE_CODE (expression
) == CONST_CAST_EXPR
21442 || TREE_CODE (expression
) == REINTERPRET_CAST_EXPR
21443 || TREE_CODE (expression
) == IMPLICIT_CONV_EXPR
21444 || TREE_CODE (expression
) == CAST_EXPR
)
21445 return dependent_type_p (TREE_TYPE (expression
));
21447 /* The types of these expressions depends only on the type created
21448 by the expression. */
21449 if (TREE_CODE (expression
) == NEW_EXPR
21450 || TREE_CODE (expression
) == VEC_NEW_EXPR
)
21452 /* For NEW_EXPR tree nodes created inside a template, either
21453 the object type itself or a TREE_LIST may appear as the
21455 tree type
= TREE_OPERAND (expression
, 1);
21456 if (TREE_CODE (type
) == TREE_LIST
)
21457 /* This is an array type. We need to check array dimensions
21459 return dependent_type_p (TREE_VALUE (TREE_PURPOSE (type
)))
21460 || value_dependent_expression_p
21461 (TREE_OPERAND (TREE_VALUE (type
), 1));
21463 return dependent_type_p (type
);
21466 if (TREE_CODE (expression
) == SCOPE_REF
)
21468 tree scope
= TREE_OPERAND (expression
, 0);
21469 tree name
= TREE_OPERAND (expression
, 1);
21471 /* 14.6.2.2 [temp.dep.expr]: An id-expression is type-dependent if it
21472 contains an identifier associated by name lookup with one or more
21473 declarations declared with a dependent type, or...a
21474 nested-name-specifier or qualified-id that names a member of an
21475 unknown specialization. */
21476 return (type_dependent_expression_p (name
)
21477 || dependent_scope_p (scope
));
21480 if (TREE_CODE (expression
) == FUNCTION_DECL
21481 && DECL_LANG_SPECIFIC (expression
)
21482 && DECL_TEMPLATE_INFO (expression
)
21483 && (any_dependent_template_arguments_p
21484 (INNERMOST_TEMPLATE_ARGS (DECL_TI_ARGS (expression
)))))
21487 if (TREE_CODE (expression
) == TEMPLATE_DECL
21488 && !DECL_TEMPLATE_TEMPLATE_PARM_P (expression
))
21491 if (TREE_CODE (expression
) == STMT_EXPR
)
21492 expression
= stmt_expr_value_expr (expression
);
21494 if (BRACE_ENCLOSED_INITIALIZER_P (expression
))
21499 FOR_EACH_CONSTRUCTOR_VALUE (CONSTRUCTOR_ELTS (expression
), i
, elt
)
21501 if (type_dependent_expression_p (elt
))
21507 /* A static data member of the current instantiation with incomplete
21508 array type is type-dependent, as the definition and specializations
21509 can have different bounds. */
21510 if (VAR_P (expression
)
21511 && DECL_CLASS_SCOPE_P (expression
)
21512 && dependent_type_p (DECL_CONTEXT (expression
))
21513 && VAR_HAD_UNKNOWN_BOUND (expression
))
21516 /* An array of unknown bound depending on a variadic parameter, eg:
21518 template<typename... Args>
21519 void foo (Args... args)
21521 int arr[] = { args... };
21524 template<int... vals>
21527 int arr[] = { vals... };
21530 If the array has no length and has an initializer, it must be that
21531 we couldn't determine its length in cp_complete_array_type because
21532 it is dependent. */
21533 if (VAR_P (expression
)
21534 && TREE_CODE (TREE_TYPE (expression
)) == ARRAY_TYPE
21535 && !TYPE_DOMAIN (TREE_TYPE (expression
))
21536 && DECL_INITIAL (expression
))
21539 /* A variable template specialization is type-dependent if it has any
21540 dependent template arguments. */
21541 if (VAR_P (expression
)
21542 && DECL_LANG_SPECIFIC (expression
)
21543 && DECL_TEMPLATE_INFO (expression
)
21544 && variable_template_p (DECL_TI_TEMPLATE (expression
)))
21545 return any_dependent_template_arguments_p (DECL_TI_ARGS (expression
));
21547 /* Always dependent, on the number of arguments if nothing else. */
21548 if (TREE_CODE (expression
) == EXPR_PACK_EXPANSION
)
21551 if (TREE_TYPE (expression
) == unknown_type_node
)
21553 if (TREE_CODE (expression
) == ADDR_EXPR
)
21554 return type_dependent_expression_p (TREE_OPERAND (expression
, 0));
21555 if (TREE_CODE (expression
) == COMPONENT_REF
21556 || TREE_CODE (expression
) == OFFSET_REF
)
21558 if (type_dependent_expression_p (TREE_OPERAND (expression
, 0)))
21560 expression
= TREE_OPERAND (expression
, 1);
21561 if (identifier_p (expression
))
21564 /* SCOPE_REF with non-null TREE_TYPE is always non-dependent. */
21565 if (TREE_CODE (expression
) == SCOPE_REF
)
21568 if (BASELINK_P (expression
))
21570 if (BASELINK_OPTYPE (expression
)
21571 && dependent_type_p (BASELINK_OPTYPE (expression
)))
21573 expression
= BASELINK_FUNCTIONS (expression
);
21576 if (TREE_CODE (expression
) == TEMPLATE_ID_EXPR
)
21578 if (any_dependent_template_arguments_p
21579 (TREE_OPERAND (expression
, 1)))
21581 expression
= TREE_OPERAND (expression
, 0);
21583 gcc_assert (TREE_CODE (expression
) == OVERLOAD
21584 || TREE_CODE (expression
) == FUNCTION_DECL
);
21588 if (type_dependent_expression_p (OVL_CURRENT (expression
)))
21590 expression
= OVL_NEXT (expression
);
21595 gcc_assert (TREE_CODE (expression
) != TYPE_DECL
);
21597 return (dependent_type_p (TREE_TYPE (expression
)));
21600 /* walk_tree callback function for instantiation_dependent_expression_p,
21601 below. Returns non-zero if a dependent subexpression is found. */
21604 instantiation_dependent_r (tree
*tp
, int *walk_subtrees
,
21609 /* We don't have to worry about decltype currently because decltype
21610 of an instantiation-dependent expr is a dependent type. This
21611 might change depending on the resolution of DR 1172. */
21612 *walk_subtrees
= false;
21615 enum tree_code code
= TREE_CODE (*tp
);
21618 /* Don't treat an argument list as dependent just because it has no
21626 /* A constant with a dependent initializer is dependent. */
21627 if (value_dependent_expression_p (*tp
))
21631 case TEMPLATE_PARM_INDEX
:
21634 /* Handle expressions with type operands. */
21638 case AT_ENCODE_EXPR
:
21640 tree op
= TREE_OPERAND (*tp
, 0);
21641 if (code
== SIZEOF_EXPR
&& SIZEOF_EXPR_TYPE_P (*tp
))
21642 op
= TREE_TYPE (op
);
21645 if (dependent_type_p (op
))
21649 *walk_subtrees
= false;
21657 if (dependent_type_p (TRAIT_EXPR_TYPE1 (*tp
))
21658 || (TRAIT_EXPR_TYPE2 (*tp
)
21659 && dependent_type_p (TRAIT_EXPR_TYPE2 (*tp
))))
21661 *walk_subtrees
= false;
21664 case COMPONENT_REF
:
21665 if (identifier_p (TREE_OPERAND (*tp
, 1)))
21666 /* In a template, finish_class_member_access_expr creates a
21667 COMPONENT_REF with an IDENTIFIER_NODE for op1 even if it isn't
21668 type-dependent, so that we can check access control at
21669 instantiation time (PR 42277). See also Core issue 1273. */
21674 if (instantiation_dependent_scope_ref_p (*tp
))
21679 /* Treat statement-expressions as dependent. */
21687 if (type_dependent_expression_p (*tp
))
21693 /* Returns TRUE if the EXPRESSION is instantiation-dependent, in the
21694 sense defined by the ABI:
21696 "An expression is instantiation-dependent if it is type-dependent
21697 or value-dependent, or it has a subexpression that is type-dependent
21698 or value-dependent." */
21701 instantiation_dependent_expression_p (tree expression
)
21705 if (!processing_template_decl
)
21708 if (expression
== error_mark_node
)
21711 result
= cp_walk_tree_without_duplicates (&expression
,
21712 instantiation_dependent_r
, NULL
);
21713 return result
!= NULL_TREE
;
21716 /* Like type_dependent_expression_p, but it also works while not processing
21717 a template definition, i.e. during substitution or mangling. */
21720 type_dependent_expression_p_push (tree expr
)
21723 ++processing_template_decl
;
21724 b
= type_dependent_expression_p (expr
);
21725 --processing_template_decl
;
21729 /* Returns TRUE if ARGS contains a type-dependent expression. */
21732 any_type_dependent_arguments_p (const vec
<tree
, va_gc
> *args
)
21737 FOR_EACH_VEC_SAFE_ELT (args
, i
, arg
)
21739 if (type_dependent_expression_p (arg
))
21745 /* Returns TRUE if LIST (a TREE_LIST whose TREE_VALUEs are
21746 expressions) contains any type-dependent expressions. */
21749 any_type_dependent_elements_p (const_tree list
)
21751 for (; list
; list
= TREE_CHAIN (list
))
21752 if (type_dependent_expression_p (TREE_VALUE (list
)))
21758 /* Returns TRUE if LIST (a TREE_LIST whose TREE_VALUEs are
21759 expressions) contains any value-dependent expressions. */
21762 any_value_dependent_elements_p (const_tree list
)
21764 for (; list
; list
= TREE_CHAIN (list
))
21765 if (value_dependent_expression_p (TREE_VALUE (list
)))
21771 /* Returns TRUE if the ARG (a template argument) is dependent. */
21774 dependent_template_arg_p (tree arg
)
21776 if (!processing_template_decl
)
21779 /* Assume a template argument that was wrongly written by the user
21780 is dependent. This is consistent with what
21781 any_dependent_template_arguments_p [that calls this function]
21783 if (!arg
|| arg
== error_mark_node
)
21786 if (TREE_CODE (arg
) == ARGUMENT_PACK_SELECT
)
21787 arg
= ARGUMENT_PACK_SELECT_ARG (arg
);
21789 if (TREE_CODE (arg
) == TEMPLATE_DECL
21790 || TREE_CODE (arg
) == TEMPLATE_TEMPLATE_PARM
)
21791 return dependent_template_p (arg
);
21792 else if (ARGUMENT_PACK_P (arg
))
21794 tree args
= ARGUMENT_PACK_ARGS (arg
);
21795 int i
, len
= TREE_VEC_LENGTH (args
);
21796 for (i
= 0; i
< len
; ++i
)
21798 if (dependent_template_arg_p (TREE_VEC_ELT (args
, i
)))
21804 else if (TYPE_P (arg
))
21805 return dependent_type_p (arg
);
21807 return (type_dependent_expression_p (arg
)
21808 || value_dependent_expression_p (arg
));
21811 /* Returns true if ARGS (a collection of template arguments) contains
21812 any types that require structural equality testing. */
21815 any_template_arguments_need_structural_equality_p (tree args
)
21822 if (args
== error_mark_node
)
21825 for (i
= 0; i
< TMPL_ARGS_DEPTH (args
); ++i
)
21827 tree level
= TMPL_ARGS_LEVEL (args
, i
+ 1);
21828 for (j
= 0; j
< TREE_VEC_LENGTH (level
); ++j
)
21830 tree arg
= TREE_VEC_ELT (level
, j
);
21831 tree packed_args
= NULL_TREE
;
21834 if (ARGUMENT_PACK_P (arg
))
21836 /* Look inside the argument pack. */
21837 packed_args
= ARGUMENT_PACK_ARGS (arg
);
21838 len
= TREE_VEC_LENGTH (packed_args
);
21841 for (k
= 0; k
< len
; ++k
)
21844 arg
= TREE_VEC_ELT (packed_args
, k
);
21846 if (error_operand_p (arg
))
21848 else if (TREE_CODE (arg
) == TEMPLATE_DECL
)
21850 else if (TYPE_P (arg
) && TYPE_STRUCTURAL_EQUALITY_P (arg
))
21852 else if (!TYPE_P (arg
) && TREE_TYPE (arg
)
21853 && TYPE_STRUCTURAL_EQUALITY_P (TREE_TYPE (arg
)))
21862 /* Returns true if ARGS (a collection of template arguments) contains
21863 any dependent arguments. */
21866 any_dependent_template_arguments_p (const_tree args
)
21873 if (args
== error_mark_node
)
21876 for (i
= 0; i
< TMPL_ARGS_DEPTH (args
); ++i
)
21878 const_tree level
= TMPL_ARGS_LEVEL (args
, i
+ 1);
21879 for (j
= 0; j
< TREE_VEC_LENGTH (level
); ++j
)
21880 if (dependent_template_arg_p (TREE_VEC_ELT (level
, j
)))
21887 /* Returns TRUE if the template TMPL is dependent. */
21890 dependent_template_p (tree tmpl
)
21892 if (TREE_CODE (tmpl
) == OVERLOAD
)
21896 if (dependent_template_p (OVL_CURRENT (tmpl
)))
21898 tmpl
= OVL_NEXT (tmpl
);
21903 /* Template template parameters are dependent. */
21904 if (DECL_TEMPLATE_TEMPLATE_PARM_P (tmpl
)
21905 || TREE_CODE (tmpl
) == TEMPLATE_TEMPLATE_PARM
)
21907 /* So are names that have not been looked up. */
21908 if (TREE_CODE (tmpl
) == SCOPE_REF
|| identifier_p (tmpl
))
21910 /* So are member templates of dependent classes. */
21911 if (TYPE_P (CP_DECL_CONTEXT (tmpl
)))
21912 return dependent_type_p (DECL_CONTEXT (tmpl
));
21916 /* Returns TRUE if the specialization TMPL<ARGS> is dependent. */
21919 dependent_template_id_p (tree tmpl
, tree args
)
21921 return (dependent_template_p (tmpl
)
21922 || any_dependent_template_arguments_p (args
));
21925 /* Returns TRUE if OMP_FOR with DECLV, INITV, CONDV and INCRV vectors
21929 dependent_omp_for_p (tree declv
, tree initv
, tree condv
, tree incrv
)
21933 if (!processing_template_decl
)
21936 for (i
= 0; i
< TREE_VEC_LENGTH (declv
); i
++)
21938 tree decl
= TREE_VEC_ELT (declv
, i
);
21939 tree init
= TREE_VEC_ELT (initv
, i
);
21940 tree cond
= TREE_VEC_ELT (condv
, i
);
21941 tree incr
= TREE_VEC_ELT (incrv
, i
);
21943 if (type_dependent_expression_p (decl
))
21946 if (init
&& type_dependent_expression_p (init
))
21949 if (type_dependent_expression_p (cond
))
21952 if (COMPARISON_CLASS_P (cond
)
21953 && (type_dependent_expression_p (TREE_OPERAND (cond
, 0))
21954 || type_dependent_expression_p (TREE_OPERAND (cond
, 1))))
21957 if (TREE_CODE (incr
) == MODOP_EXPR
)
21959 if (type_dependent_expression_p (TREE_OPERAND (incr
, 0))
21960 || type_dependent_expression_p (TREE_OPERAND (incr
, 2)))
21963 else if (type_dependent_expression_p (incr
))
21965 else if (TREE_CODE (incr
) == MODIFY_EXPR
)
21967 if (type_dependent_expression_p (TREE_OPERAND (incr
, 0)))
21969 else if (BINARY_CLASS_P (TREE_OPERAND (incr
, 1)))
21971 tree t
= TREE_OPERAND (incr
, 1);
21972 if (type_dependent_expression_p (TREE_OPERAND (t
, 0))
21973 || type_dependent_expression_p (TREE_OPERAND (t
, 1)))
21982 /* TYPE is a TYPENAME_TYPE. Returns the ordinary TYPE to which the
21983 TYPENAME_TYPE corresponds. Returns the original TYPENAME_TYPE if
21984 no such TYPE can be found. Note that this function peers inside
21985 uninstantiated templates and therefore should be used only in
21986 extremely limited situations. ONLY_CURRENT_P restricts this
21987 peering to the currently open classes hierarchy (which is required
21988 when comparing types). */
21991 resolve_typename_type (tree type
, bool only_current_p
)
22000 gcc_assert (TREE_CODE (type
) == TYPENAME_TYPE
);
22002 scope
= TYPE_CONTEXT (type
);
22003 /* Usually the non-qualified identifier of a TYPENAME_TYPE is
22004 TYPE_IDENTIFIER (type). But when 'type' is a typedef variant of
22005 a TYPENAME_TYPE node, then TYPE_NAME (type) is set to the TYPE_DECL representing
22006 the typedef. In that case TYPE_IDENTIFIER (type) is not the non-qualified
22007 identifier of the TYPENAME_TYPE anymore.
22008 So by getting the TYPE_IDENTIFIER of the _main declaration_ of the
22009 TYPENAME_TYPE instead, we avoid messing up with a possible
22010 typedef variant case. */
22011 name
= TYPE_IDENTIFIER (TYPE_MAIN_VARIANT (type
));
22013 /* If the SCOPE is itself a TYPENAME_TYPE, then we need to resolve
22014 it first before we can figure out what NAME refers to. */
22015 if (TREE_CODE (scope
) == TYPENAME_TYPE
)
22017 if (TYPENAME_IS_RESOLVING_P (scope
))
22018 /* Given a class template A with a dependent base with nested type C,
22019 typedef typename A::C::C C will land us here, as trying to resolve
22020 the initial A::C leads to the local C typedef, which leads back to
22021 A::C::C. So we break the recursion now. */
22024 scope
= resolve_typename_type (scope
, only_current_p
);
22026 /* If we don't know what SCOPE refers to, then we cannot resolve the
22028 if (TREE_CODE (scope
) == TYPENAME_TYPE
)
22030 /* If the SCOPE is a template type parameter, we have no way of
22031 resolving the name. */
22032 if (TREE_CODE (scope
) == TEMPLATE_TYPE_PARM
)
22034 /* If the SCOPE is not the current instantiation, there's no reason
22035 to look inside it. */
22036 if (only_current_p
&& !currently_open_class (scope
))
22038 /* If this is a typedef, we don't want to look inside (c++/11987). */
22039 if (typedef_variant_p (type
))
22041 /* If SCOPE isn't the template itself, it will not have a valid
22042 TYPE_FIELDS list. */
22043 if (same_type_p (scope
, CLASSTYPE_PRIMARY_TEMPLATE_TYPE (scope
)))
22044 /* scope is either the template itself or a compatible instantiation
22045 like X<T>, so look up the name in the original template. */
22046 scope
= CLASSTYPE_PRIMARY_TEMPLATE_TYPE (scope
);
22048 /* scope is a partial instantiation, so we can't do the lookup or we
22049 will lose the template arguments. */
22051 /* Enter the SCOPE so that name lookup will be resolved as if we
22052 were in the class definition. In particular, SCOPE will no
22053 longer be considered a dependent type. */
22054 pushed_scope
= push_scope (scope
);
22055 /* Look up the declaration. */
22056 decl
= lookup_member (scope
, name
, /*protect=*/0, /*want_type=*/true,
22057 tf_warning_or_error
);
22059 result
= NULL_TREE
;
22061 /* For a TYPENAME_TYPE like "typename X::template Y<T>", we want to
22062 find a TEMPLATE_DECL. Otherwise, we want to find a TYPE_DECL. */
22065 else if (identifier_p (TYPENAME_TYPE_FULLNAME (type
))
22066 && TREE_CODE (decl
) == TYPE_DECL
)
22068 result
= TREE_TYPE (decl
);
22069 if (result
== error_mark_node
)
22070 result
= NULL_TREE
;
22072 else if (TREE_CODE (TYPENAME_TYPE_FULLNAME (type
)) == TEMPLATE_ID_EXPR
22073 && DECL_CLASS_TEMPLATE_P (decl
))
22077 /* Obtain the template and the arguments. */
22078 tmpl
= TREE_OPERAND (TYPENAME_TYPE_FULLNAME (type
), 0);
22079 args
= TREE_OPERAND (TYPENAME_TYPE_FULLNAME (type
), 1);
22080 /* Instantiate the template. */
22081 result
= lookup_template_class (tmpl
, args
, NULL_TREE
, NULL_TREE
,
22082 /*entering_scope=*/0,
22083 tf_error
| tf_user
);
22084 if (result
== error_mark_node
)
22085 result
= NULL_TREE
;
22088 /* Leave the SCOPE. */
22090 pop_scope (pushed_scope
);
22092 /* If we failed to resolve it, return the original typename. */
22096 /* If lookup found a typename type, resolve that too. */
22097 if (TREE_CODE (result
) == TYPENAME_TYPE
&& !TYPENAME_IS_RESOLVING_P (result
))
22099 /* Ill-formed programs can cause infinite recursion here, so we
22100 must catch that. */
22101 TYPENAME_IS_RESOLVING_P (type
) = 1;
22102 result
= resolve_typename_type (result
, only_current_p
);
22103 TYPENAME_IS_RESOLVING_P (type
) = 0;
22106 /* Qualify the resulting type. */
22107 quals
= cp_type_quals (type
);
22109 result
= cp_build_qualified_type (result
, cp_type_quals (result
) | quals
);
22114 /* EXPR is an expression which is not type-dependent. Return a proxy
22115 for EXPR that can be used to compute the types of larger
22116 expressions containing EXPR. */
22119 build_non_dependent_expr (tree expr
)
22123 #ifdef ENABLE_CHECKING
22124 /* Try to get a constant value for all non-dependent expressions in
22125 order to expose bugs in *_dependent_expression_p and constexpr. */
22126 if (cxx_dialect
>= cxx11
)
22127 fold_non_dependent_expr (expr
);
22130 /* Preserve OVERLOADs; the functions must be available to resolve
22133 if (TREE_CODE (inner_expr
) == STMT_EXPR
)
22134 inner_expr
= stmt_expr_value_expr (inner_expr
);
22135 if (TREE_CODE (inner_expr
) == ADDR_EXPR
)
22136 inner_expr
= TREE_OPERAND (inner_expr
, 0);
22137 if (TREE_CODE (inner_expr
) == COMPONENT_REF
)
22138 inner_expr
= TREE_OPERAND (inner_expr
, 1);
22139 if (is_overloaded_fn (inner_expr
)
22140 || TREE_CODE (inner_expr
) == OFFSET_REF
)
22142 /* There is no need to return a proxy for a variable. */
22145 /* Preserve string constants; conversions from string constants to
22146 "char *" are allowed, even though normally a "const char *"
22147 cannot be used to initialize a "char *". */
22148 if (TREE_CODE (expr
) == STRING_CST
)
22150 /* Preserve void and arithmetic constants, as an optimization -- there is no
22151 reason to create a new node. */
22152 if (TREE_CODE (expr
) == VOID_CST
22153 || TREE_CODE (expr
) == INTEGER_CST
22154 || TREE_CODE (expr
) == REAL_CST
)
22156 /* Preserve THROW_EXPRs -- all throw-expressions have type "void".
22157 There is at least one place where we want to know that a
22158 particular expression is a throw-expression: when checking a ?:
22159 expression, there are special rules if the second or third
22160 argument is a throw-expression. */
22161 if (TREE_CODE (expr
) == THROW_EXPR
)
22164 /* Don't wrap an initializer list, we need to be able to look inside. */
22165 if (BRACE_ENCLOSED_INITIALIZER_P (expr
))
22168 /* Don't wrap a dummy object, we need to be able to test for it. */
22169 if (is_dummy_object (expr
))
22172 if (TREE_CODE (expr
) == COND_EXPR
)
22173 return build3 (COND_EXPR
,
22175 TREE_OPERAND (expr
, 0),
22176 (TREE_OPERAND (expr
, 1)
22177 ? build_non_dependent_expr (TREE_OPERAND (expr
, 1))
22178 : build_non_dependent_expr (TREE_OPERAND (expr
, 0))),
22179 build_non_dependent_expr (TREE_OPERAND (expr
, 2)));
22180 if (TREE_CODE (expr
) == COMPOUND_EXPR
22181 && !COMPOUND_EXPR_OVERLOADED (expr
))
22182 return build2 (COMPOUND_EXPR
,
22184 TREE_OPERAND (expr
, 0),
22185 build_non_dependent_expr (TREE_OPERAND (expr
, 1)));
22187 /* If the type is unknown, it can't really be non-dependent */
22188 gcc_assert (TREE_TYPE (expr
) != unknown_type_node
);
22190 /* Otherwise, build a NON_DEPENDENT_EXPR. */
22191 return build1 (NON_DEPENDENT_EXPR
, TREE_TYPE (expr
), expr
);
22194 /* ARGS is a vector of expressions as arguments to a function call.
22195 Replace the arguments with equivalent non-dependent expressions.
22196 This modifies ARGS in place. */
22199 make_args_non_dependent (vec
<tree
, va_gc
> *args
)
22204 FOR_EACH_VEC_SAFE_ELT (args
, ix
, arg
)
22206 tree newarg
= build_non_dependent_expr (arg
);
22208 (*args
)[ix
] = newarg
;
22212 /* Returns a type which represents 'auto' or 'decltype(auto)'. We use a
22213 TEMPLATE_TYPE_PARM with a level one deeper than the actual template
22217 make_auto_1 (tree name
)
22219 tree au
= cxx_make_type (TEMPLATE_TYPE_PARM
);
22220 TYPE_NAME (au
) = build_decl (input_location
,
22221 TYPE_DECL
, name
, au
);
22222 TYPE_STUB_DECL (au
) = TYPE_NAME (au
);
22223 TEMPLATE_TYPE_PARM_INDEX (au
) = build_template_parm_index
22224 (0, processing_template_decl
+ 1, processing_template_decl
+ 1,
22225 TYPE_NAME (au
), NULL_TREE
);
22226 TYPE_CANONICAL (au
) = canonical_type_parameter (au
);
22227 DECL_ARTIFICIAL (TYPE_NAME (au
)) = 1;
22228 SET_DECL_TEMPLATE_PARM_P (TYPE_NAME (au
));
22234 make_decltype_auto (void)
22236 return make_auto_1 (get_identifier ("decltype(auto)"));
22242 return make_auto_1 (get_identifier ("auto"));
22245 /* Given type ARG, return std::initializer_list<ARG>. */
22250 tree std_init_list
= namespace_binding
22251 (get_identifier ("initializer_list"), std_node
);
22253 if (!std_init_list
|| !DECL_CLASS_TEMPLATE_P (std_init_list
))
22255 error ("deducing from brace-enclosed initializer list requires "
22256 "#include <initializer_list>");
22257 return error_mark_node
;
22259 argvec
= make_tree_vec (1);
22260 TREE_VEC_ELT (argvec
, 0) = arg
;
22261 return lookup_template_class (std_init_list
, argvec
, NULL_TREE
,
22262 NULL_TREE
, 0, tf_warning_or_error
);
22265 /* Replace auto in TYPE with std::initializer_list<auto>. */
22268 listify_autos (tree type
, tree auto_node
)
22270 tree init_auto
= listify (auto_node
);
22271 tree argvec
= make_tree_vec (1);
22272 TREE_VEC_ELT (argvec
, 0) = init_auto
;
22273 if (processing_template_decl
)
22274 argvec
= add_to_template_args (current_template_args (), argvec
);
22275 return tsubst (type
, argvec
, tf_warning_or_error
, NULL_TREE
);
22278 /* Replace occurrences of 'auto' in TYPE with the appropriate type deduced
22279 from INIT. AUTO_NODE is the TEMPLATE_TYPE_PARM used for 'auto' in TYPE. */
22282 do_auto_deduction (tree type
, tree init
, tree auto_node
)
22286 if (init
== error_mark_node
)
22287 return error_mark_node
;
22289 if (type_dependent_expression_p (init
))
22290 /* Defining a subset of type-dependent expressions that we can deduce
22291 from ahead of time isn't worth the trouble. */
22294 /* [dcl.spec.auto]: Obtain P from T by replacing the occurrences of auto
22295 with either a new invented type template parameter U or, if the
22296 initializer is a braced-init-list (8.5.4), with
22297 std::initializer_list<U>. */
22298 if (BRACE_ENCLOSED_INITIALIZER_P (init
))
22300 if (!DIRECT_LIST_INIT_P (init
))
22301 type
= listify_autos (type
, auto_node
);
22302 else if (CONSTRUCTOR_NELTS (init
) == 1)
22303 init
= CONSTRUCTOR_ELT (init
, 0)->value
;
22306 if (permerror (input_location
, "direct-list-initialization of "
22307 "%<auto%> requires exactly one element"))
22308 inform (input_location
,
22309 "for deduction to %<std::initializer_list%>, use copy-"
22310 "list-initialization (i.e. add %<=%> before the %<{%>)");
22311 type
= listify_autos (type
, auto_node
);
22315 init
= resolve_nondeduced_context (init
);
22317 targs
= make_tree_vec (1);
22318 if (AUTO_IS_DECLTYPE (auto_node
))
22320 bool id
= (DECL_P (init
) || (TREE_CODE (init
) == COMPONENT_REF
22321 && !REF_PARENTHESIZED_P (init
)));
22322 TREE_VEC_ELT (targs
, 0)
22323 = finish_decltype_type (init
, id
, tf_warning_or_error
);
22324 if (type
!= auto_node
)
22326 error ("%qT as type rather than plain %<decltype(auto)%>", type
);
22327 return error_mark_node
;
22332 tree parms
= build_tree_list (NULL_TREE
, type
);
22333 tree tparms
= make_tree_vec (1);
22336 TREE_VEC_ELT (tparms
, 0)
22337 = build_tree_list (NULL_TREE
, TYPE_NAME (auto_node
));
22338 val
= type_unification_real (tparms
, targs
, parms
, &init
, 1, 0,
22339 DEDUCE_CALL
, LOOKUP_NORMAL
,
22340 NULL
, /*explain_p=*/false);
22343 if (processing_template_decl
)
22344 /* Try again at instantiation time. */
22346 if (type
&& type
!= error_mark_node
)
22347 /* If type is error_mark_node a diagnostic must have been
22348 emitted by now. Also, having a mention to '<type error>'
22349 in the diagnostic is not really useful to the user. */
22351 if (cfun
&& auto_node
== current_function_auto_return_pattern
22352 && LAMBDA_FUNCTION_P (current_function_decl
))
22353 error ("unable to deduce lambda return type from %qE", init
);
22355 error ("unable to deduce %qT from %qE", type
, init
);
22357 return error_mark_node
;
22361 /* If the list of declarators contains more than one declarator, the type
22362 of each declared variable is determined as described above. If the
22363 type deduced for the template parameter U is not the same in each
22364 deduction, the program is ill-formed. */
22365 if (TREE_TYPE (auto_node
)
22366 && !same_type_p (TREE_TYPE (auto_node
), TREE_VEC_ELT (targs
, 0)))
22368 if (cfun
&& auto_node
== current_function_auto_return_pattern
22369 && LAMBDA_FUNCTION_P (current_function_decl
))
22370 error ("inconsistent types %qT and %qT deduced for "
22371 "lambda return type", TREE_TYPE (auto_node
),
22372 TREE_VEC_ELT (targs
, 0));
22374 error ("inconsistent deduction for %qT: %qT and then %qT",
22375 auto_node
, TREE_TYPE (auto_node
), TREE_VEC_ELT (targs
, 0));
22376 return error_mark_node
;
22378 TREE_TYPE (auto_node
) = TREE_VEC_ELT (targs
, 0);
22380 if (processing_template_decl
)
22381 targs
= add_to_template_args (current_template_args (), targs
);
22382 return tsubst (type
, targs
, tf_warning_or_error
, NULL_TREE
);
22385 /* Substitutes LATE_RETURN_TYPE for 'auto' in TYPE and returns the
22389 splice_late_return_type (tree type
, tree late_return_type
)
22393 if (late_return_type
== NULL_TREE
)
22395 argvec
= make_tree_vec (1);
22396 TREE_VEC_ELT (argvec
, 0) = late_return_type
;
22397 if (processing_template_parmlist
)
22398 /* For a late-specified return type in a template type-parameter, we
22399 need to add a dummy argument level for its parmlist. */
22400 argvec
= add_to_template_args
22401 (make_tree_vec (processing_template_parmlist
), argvec
);
22402 if (current_template_parms
)
22403 argvec
= add_to_template_args (current_template_args (), argvec
);
22404 return tsubst (type
, argvec
, tf_warning_or_error
, NULL_TREE
);
22407 /* Returns true iff TYPE is a TEMPLATE_TYPE_PARM representing 'auto' or
22408 'decltype(auto)'. */
22411 is_auto (const_tree type
)
22413 if (TREE_CODE (type
) == TEMPLATE_TYPE_PARM
22414 && (TYPE_IDENTIFIER (type
) == get_identifier ("auto")
22415 || TYPE_IDENTIFIER (type
) == get_identifier ("decltype(auto)")))
22421 /* Returns the TEMPLATE_TYPE_PARM in TYPE representing `auto' iff TYPE contains
22422 a use of `auto'. Returns NULL_TREE otherwise. */
22425 type_uses_auto (tree type
)
22427 return find_type_usage (type
, is_auto
);
22430 /* Returns true iff TYPE is a TEMPLATE_TYPE_PARM representing 'auto',
22431 'decltype(auto)' or a concept. */
22434 is_auto_or_concept (const_tree type
)
22436 return is_auto (type
); // or concept
22439 /* Returns the TEMPLATE_TYPE_PARM in TYPE representing a generic type (`auto' or
22440 a concept identifier) iff TYPE contains a use of a generic type. Returns
22441 NULL_TREE otherwise. */
22444 type_uses_auto_or_concept (tree type
)
22446 return find_type_usage (type
, is_auto_or_concept
);
22450 /* For a given template T, return the vector of typedefs referenced
22451 in T for which access check is needed at T instantiation time.
22452 T is either a FUNCTION_DECL or a RECORD_TYPE.
22453 Those typedefs were added to T by the function
22454 append_type_to_template_for_access_check. */
22456 vec
<qualified_typedef_usage_t
, va_gc
> *
22457 get_types_needing_access_check (tree t
)
22460 vec
<qualified_typedef_usage_t
, va_gc
> *result
= NULL
;
22462 if (!t
|| t
== error_mark_node
)
22465 if (!(ti
= get_template_info (t
)))
22468 if (CLASS_TYPE_P (t
)
22469 || TREE_CODE (t
) == FUNCTION_DECL
)
22471 if (!TI_TEMPLATE (ti
))
22474 result
= TI_TYPEDEFS_NEEDING_ACCESS_CHECKING (ti
);
22480 /* Append the typedef TYPE_DECL used in template T to a list of typedefs
22481 tied to T. That list of typedefs will be access checked at
22482 T instantiation time.
22483 T is either a FUNCTION_DECL or a RECORD_TYPE.
22484 TYPE_DECL is a TYPE_DECL node representing a typedef.
22485 SCOPE is the scope through which TYPE_DECL is accessed.
22486 LOCATION is the location of the usage point of TYPE_DECL.
22488 This function is a subroutine of
22489 append_type_to_template_for_access_check. */
22492 append_type_to_template_for_access_check_1 (tree t
,
22495 location_t location
)
22497 qualified_typedef_usage_t typedef_usage
;
22500 if (!t
|| t
== error_mark_node
)
22503 gcc_assert ((TREE_CODE (t
) == FUNCTION_DECL
22504 || CLASS_TYPE_P (t
))
22506 && TREE_CODE (type_decl
) == TYPE_DECL
22509 if (!(ti
= get_template_info (t
)))
22512 gcc_assert (TI_TEMPLATE (ti
));
22514 typedef_usage
.typedef_decl
= type_decl
;
22515 typedef_usage
.context
= scope
;
22516 typedef_usage
.locus
= location
;
22518 vec_safe_push (TI_TYPEDEFS_NEEDING_ACCESS_CHECKING (ti
), typedef_usage
);
22521 /* Append TYPE_DECL to the template TEMPL.
22522 TEMPL is either a class type, a FUNCTION_DECL or a a TEMPLATE_DECL.
22523 At TEMPL instanciation time, TYPE_DECL will be checked to see
22524 if it can be accessed through SCOPE.
22525 LOCATION is the location of the usage point of TYPE_DECL.
22527 e.g. consider the following code snippet:
22534 template<class U> struct S
22536 C::myint mi; // <-- usage point of the typedef C::myint
22541 At S<char> instantiation time, we need to check the access of C::myint
22542 In other words, we need to check the access of the myint typedef through
22543 the C scope. For that purpose, this function will add the myint typedef
22544 and the scope C through which its being accessed to a list of typedefs
22545 tied to the template S. That list will be walked at template instantiation
22546 time and access check performed on each typedefs it contains.
22547 Note that this particular code snippet should yield an error because
22548 myint is private to C. */
22551 append_type_to_template_for_access_check (tree templ
,
22554 location_t location
)
22556 qualified_typedef_usage_t
*iter
;
22559 gcc_assert (type_decl
&& (TREE_CODE (type_decl
) == TYPE_DECL
));
22561 /* Make sure we don't append the type to the template twice. */
22562 FOR_EACH_VEC_SAFE_ELT (get_types_needing_access_check (templ
), i
, iter
)
22563 if (iter
->typedef_decl
== type_decl
&& scope
== iter
->context
)
22566 append_type_to_template_for_access_check_1 (templ
, type_decl
,
22570 /* Convert the generic type parameters in PARM that match the types given in the
22571 range [START_IDX, END_IDX) from the current_template_parms into generic type
22575 convert_generic_types_to_packs (tree parm
, int start_idx
, int end_idx
)
22577 tree current
= current_template_parms
;
22578 int depth
= TMPL_PARMS_DEPTH (current
);
22579 current
= INNERMOST_TEMPLATE_PARMS (current
);
22580 tree replacement
= make_tree_vec (TREE_VEC_LENGTH (current
));
22582 for (int i
= 0; i
< start_idx
; ++i
)
22583 TREE_VEC_ELT (replacement
, i
)
22584 = TREE_TYPE (TREE_VALUE (TREE_VEC_ELT (current
, i
)));
22586 for (int i
= start_idx
; i
< end_idx
; ++i
)
22588 /* Create a distinct parameter pack type from the current parm and add it
22589 to the replacement args to tsubst below into the generic function
22592 tree o
= TREE_TYPE (TREE_VALUE
22593 (TREE_VEC_ELT (current
, i
)));
22594 tree t
= copy_type (o
);
22595 TEMPLATE_TYPE_PARM_INDEX (t
)
22596 = reduce_template_parm_level (TEMPLATE_TYPE_PARM_INDEX (o
),
22598 TREE_TYPE (TEMPLATE_TYPE_DECL (t
)) = t
;
22599 TYPE_STUB_DECL (t
) = TYPE_NAME (t
) = TEMPLATE_TYPE_DECL (t
);
22600 TYPE_MAIN_VARIANT (t
) = t
;
22601 TEMPLATE_TYPE_PARAMETER_PACK (t
) = true;
22602 TYPE_CANONICAL (t
) = canonical_type_parameter (t
);
22603 TREE_VEC_ELT (replacement
, i
) = t
;
22604 TREE_VALUE (TREE_VEC_ELT (current
, i
)) = TREE_CHAIN (t
);
22607 for (int i
= end_idx
, e
= TREE_VEC_LENGTH (current
); i
< e
; ++i
)
22608 TREE_VEC_ELT (replacement
, i
)
22609 = TREE_TYPE (TREE_VALUE (TREE_VEC_ELT (current
, i
)));
22611 /* If there are more levels then build up the replacement with the outer
22614 replacement
= add_to_template_args (template_parms_to_args
22615 (TREE_CHAIN (current_template_parms
)),
22618 return tsubst (parm
, replacement
, tf_none
, NULL_TREE
);
22622 /* Set up the hash tables for template instantiations. */
22625 init_template_processing (void)
22627 decl_specializations
= hash_table
<spec_hasher
>::create_ggc (37);
22628 type_specializations
= hash_table
<spec_hasher
>::create_ggc (37);
22631 /* Print stats about the template hash tables for -fstats. */
22634 print_template_statistics (void)
22636 fprintf (stderr
, "decl_specializations: size %ld, %ld elements, "
22637 "%f collisions\n", (long) decl_specializations
->size (),
22638 (long) decl_specializations
->elements (),
22639 decl_specializations
->collisions ());
22640 fprintf (stderr
, "type_specializations: size %ld, %ld elements, "
22641 "%f collisions\n", (long) type_specializations
->size (),
22642 (long) type_specializations
->elements (),
22643 type_specializations
->collisions ());
22646 #include "gt-cp-pt.h"