2 // generic.cs: Generics support
4 // Authors: Martin Baulig (martin@ximian.com)
5 // Miguel de Icaza (miguel@ximian.com)
6 // Marek Safar (marek.safar@gmail.com)
8 // Dual licensed under the terms of the MIT X11 or GNU GPL
10 // Copyright 2001, 2002, 2003 Ximian, Inc (http://www.ximian.com)
11 // Copyright 2004-2008 Novell, Inc
14 using System.Reflection;
15 using System.Reflection.Emit;
16 using System.Globalization;
17 using System.Collections.Generic;
21 namespace Mono.CSharp {
25 // Don't add or modify internal values, they are used as -/+ calculation signs
33 public enum SpecialConstraint
41 public class SpecialContraintExpr : FullNamedExpression
43 public SpecialContraintExpr (SpecialConstraint constraint, Location loc)
46 this.Constraint = constraint;
49 public SpecialConstraint Constraint { get; private set; }
51 protected override Expression DoResolve (ResolveContext rc)
53 throw new NotImplementedException ();
58 // A set of parsed constraints for a type parameter
60 public class Constraints
62 SimpleMemberName tparam;
63 List<FullNamedExpression> constraints;
68 public Constraints (SimpleMemberName tparam, List<FullNamedExpression> constraints, Location loc)
71 this.constraints = constraints;
77 public Location Location {
83 public SimpleMemberName TypeParameter {
91 bool CheckConflictingInheritedConstraint (TypeSpec ba, TypeSpec bb, IMemberContext context, Location loc)
93 if (!TypeSpec.IsBaseClass (ba, bb, false) && !TypeSpec.IsBaseClass (bb, ba, false)) {
94 context.Compiler.Report.Error (455, loc,
95 "Type parameter `{0}' inherits conflicting constraints `{1}' and `{2}'",
97 ba.GetSignatureForError (), bb.GetSignatureForError ());
104 public void CheckGenericConstraints (IMemberContext context)
106 foreach (var c in constraints) {
107 var ge = c as GenericTypeExpr;
109 ge.CheckConstraints (context);
114 // Resolve the constraints types with only possible early checks, return
115 // value `false' is reserved for recursive failure
117 public bool Resolve (IMemberContext context, TypeParameter tp)
127 List<TypeParameterSpec> tparam_types = null;
128 bool iface_found = false;
130 spec.BaseType = TypeManager.object_type;
132 for (int i = 0; i < constraints.Count; ++i) {
133 var constraint = constraints[i];
135 if (constraint is SpecialContraintExpr) {
136 spec.SpecialConstraint |= ((SpecialContraintExpr) constraint).Constraint;
137 if (spec.HasSpecialStruct)
138 spec.BaseType = TypeManager.value_type;
140 // Set to null as it does not have a type
141 constraints[i] = null;
145 var type_expr = constraints[i] = constraint.ResolveAsTypeTerminal (context, false);
146 if (type_expr == null)
149 var gexpr = type_expr as GenericTypeExpr;
150 if (gexpr != null && gexpr.HasDynamicArguments ()) {
151 context.Compiler.Report.Error (1968, constraint.Location,
152 "A constraint cannot be the dynamic type `{0}'", gexpr.GetSignatureForError ());
156 var type = type_expr.Type;
158 if (!context.CurrentMemberDefinition.IsAccessibleAs (type)) {
159 context.Compiler.Report.SymbolRelatedToPreviousError (type);
160 context.Compiler.Report.Error (703, loc,
161 "Inconsistent accessibility: constraint type `{0}' is less accessible than `{1}'",
162 type.GetSignatureForError (), context.GetSignatureForError ());
165 if (type.IsInterface) {
166 if (!spec.AddInterface (type)) {
167 context.Compiler.Report.Error (405, constraint.Location,
168 "Duplicate constraint `{0}' for type parameter `{1}'", type.GetSignatureForError (), tparam.Value);
176 var constraint_tp = type as TypeParameterSpec;
177 if (constraint_tp != null) {
178 if (tparam_types == null) {
179 tparam_types = new List<TypeParameterSpec> (2);
180 } else if (tparam_types.Contains (constraint_tp)) {
181 context.Compiler.Report.Error (405, constraint.Location,
182 "Duplicate constraint `{0}' for type parameter `{1}'", type.GetSignatureForError (), tparam.Value);
187 // Checks whether each generic method parameter constraint type
188 // is valid with respect to T
190 if (tp.IsMethodTypeParameter) {
191 TypeManager.CheckTypeVariance (type, Variance.Contravariant, context);
194 var tp_def = constraint_tp.MemberDefinition as TypeParameter;
195 if (tp_def != null && !tp_def.ResolveConstraints (context)) {
196 context.Compiler.Report.Error (454, constraint.Location,
197 "Circular constraint dependency involving `{0}' and `{1}'",
198 constraint_tp.GetSignatureForError (), tp.GetSignatureForError ());
203 // Checks whether there are no conflicts between type parameter constraints
209 // A and B are not convertible and only 1 class constraint is allowed
211 if (constraint_tp.HasTypeConstraint) {
212 if (spec.HasTypeConstraint || spec.HasSpecialStruct) {
213 if (!CheckConflictingInheritedConstraint (spec.BaseType, constraint_tp.BaseType, context, constraint.Location))
216 for (int ii = 0; ii < tparam_types.Count; ++ii) {
217 if (!tparam_types[ii].HasTypeConstraint)
220 if (!CheckConflictingInheritedConstraint (tparam_types[ii].BaseType, constraint_tp.BaseType, context, constraint.Location))
226 if (constraint_tp.HasSpecialStruct) {
227 context.Compiler.Report.Error (456, constraint.Location,
228 "Type parameter `{0}' has the `struct' constraint, so it cannot be used as a constraint for `{1}'",
229 constraint_tp.GetSignatureForError (), tp.GetSignatureForError ());
233 tparam_types.Add (constraint_tp);
237 if (iface_found || spec.HasTypeConstraint) {
238 context.Compiler.Report.Error (406, constraint.Location,
239 "The class type constraint `{0}' must be listed before any other constraints. Consider moving type constraint to the beginning of the constraint list",
240 type.GetSignatureForError ());
243 if (spec.HasSpecialStruct || spec.HasSpecialClass) {
244 context.Compiler.Report.Error (450, type_expr.Location,
245 "`{0}': cannot specify both a constraint class and the `class' or `struct' constraint",
246 type.GetSignatureForError ());
249 if (type == InternalType.Dynamic) {
250 context.Compiler.Report.Error (1967, constraint.Location, "A constraint cannot be the dynamic type");
254 if (type.IsSealed || !type.IsClass) {
255 context.Compiler.Report.Error (701, loc,
256 "`{0}' is not a valid constraint. A constraint must be an interface, a non-sealed class or a type parameter",
257 TypeManager.CSharpName (type));
262 context.Compiler.Report.Error (717, constraint.Location,
263 "`{0}' is not a valid constraint. Static classes cannot be used as constraints",
264 type.GetSignatureForError ());
265 } else if (type == TypeManager.array_type || type == TypeManager.delegate_type ||
266 type == TypeManager.enum_type || type == TypeManager.value_type ||
267 type == TypeManager.object_type || type == TypeManager.multicast_delegate_type) {
268 context.Compiler.Report.Error (702, constraint.Location,
269 "A constraint cannot be special class `{0}'", type.GetSignatureForError ());
273 spec.BaseType = type;
276 if (tparam_types != null)
277 spec.TypeArguments = tparam_types.ToArray ();
284 public void VerifyClsCompliance (Report report)
286 foreach (var c in constraints)
291 if (!c.Type.IsCLSCompliant ()) {
292 report.SymbolRelatedToPreviousError (c.Type);
293 report.Warning (3024, 1, loc, "Constraint type `{0}' is not CLS-compliant",
294 c.Type.GetSignatureForError ());
301 // A type parameter for a generic type or generic method definition
303 public class TypeParameter : MemberCore, ITypeDefinition
305 static readonly string[] attribute_target = new string [] { "type parameter" };
307 Constraints constraints;
308 GenericTypeParameterBuilder builder;
309 TypeParameterSpec spec;
311 public TypeParameter (DeclSpace parent, int index, MemberName name, Constraints constraints, Attributes attrs, Variance variance)
312 : base (parent, name, attrs)
314 this.constraints = constraints;
315 this.spec = new TypeParameterSpec (null, index, this, SpecialConstraint.None, variance, null);
318 public TypeParameter (TypeParameterSpec spec, DeclSpace parent, TypeSpec parentSpec, MemberName name, Attributes attrs)
319 : base (parent, name, attrs)
321 this.spec = new TypeParameterSpec (parentSpec, spec.DeclaredPosition, spec.MemberDefinition, spec.SpecialConstraint, spec.Variance, null) {
322 BaseType = spec.BaseType,
323 InterfacesDefined = spec.InterfacesDefined,
324 TypeArguments = spec.TypeArguments
330 public override AttributeTargets AttributeTargets {
332 return AttributeTargets.GenericParameter;
336 public override string DocCommentHeader {
338 throw new InvalidOperationException (
339 "Unexpected attempt to get doc comment from " + this.GetType ());
343 public bool IsMethodTypeParameter {
345 return spec.IsMethodOwned;
349 public string Namespace {
355 public TypeParameterSpec Type {
361 public int TypeParametersCount {
367 public TypeParameterSpec[] TypeParameters {
373 public override string[] ValidAttributeTargets {
375 return attribute_target;
379 public Variance Variance {
381 return spec.Variance;
388 // This is called for each part of a partial generic type definition.
390 // If partial type parameters constraints are not null and we don't
391 // already have constraints they become our constraints. If we already
392 // have constraints, we must check that they're the same.
394 public bool AddPartialConstraints (TypeContainer part, TypeParameter tp)
397 throw new InvalidOperationException ();
399 var new_constraints = tp.constraints;
400 if (new_constraints == null)
403 // TODO: could create spec only
404 //tp.Define (null, -1, part.Definition);
405 tp.spec.DeclaringType = part.Definition;
406 if (!tp.ResolveConstraints (part))
409 if (constraints != null)
410 return spec.HasSameConstraintsDefinition (tp.Type);
412 // Copy constraint from resolved part to partial container
413 spec.SpecialConstraint = tp.spec.SpecialConstraint;
414 spec.InterfacesDefined = tp.spec.InterfacesDefined;
415 spec.TypeArguments = tp.spec.TypeArguments;
416 spec.BaseType = tp.spec.BaseType;
421 public override void ApplyAttributeBuilder (Attribute a, MethodSpec ctor, byte[] cdata, PredefinedAttributes pa)
423 builder.SetCustomAttribute ((ConstructorInfo) ctor.GetMetaInfo (), cdata);
426 public void CheckGenericConstraints ()
428 if (constraints != null)
429 constraints.CheckGenericConstraints (this);
432 public TypeParameter CreateHoistedCopy (TypeContainer declaringType, TypeSpec declaringSpec)
434 return new TypeParameter (spec, declaringType, declaringSpec, MemberName, null);
437 public override bool Define ()
443 // This is the first method which is called during the resolving
444 // process; we're called immediately after creating the type parameters
445 // with SRE (by calling `DefineGenericParameters()' on the TypeBuilder /
448 public void Define (GenericTypeParameterBuilder type, TypeSpec declaringType)
451 throw new InternalErrorException ();
454 spec.DeclaringType = declaringType;
455 spec.SetMetaInfo (type);
458 public void EmitConstraints (GenericTypeParameterBuilder builder)
460 var attr = GenericParameterAttributes.None;
461 if (spec.Variance == Variance.Contravariant)
462 attr |= GenericParameterAttributes.Contravariant;
463 else if (spec.Variance == Variance.Covariant)
464 attr |= GenericParameterAttributes.Covariant;
466 if (spec.HasSpecialClass)
467 attr |= GenericParameterAttributes.ReferenceTypeConstraint;
468 else if (spec.HasSpecialStruct)
469 attr |= GenericParameterAttributes.NotNullableValueTypeConstraint | GenericParameterAttributes.DefaultConstructorConstraint;
471 if (spec.HasSpecialConstructor)
472 attr |= GenericParameterAttributes.DefaultConstructorConstraint;
474 if (spec.BaseType != TypeManager.object_type)
475 builder.SetBaseTypeConstraint (spec.BaseType.GetMetaInfo ());
477 if (spec.InterfacesDefined != null)
478 builder.SetInterfaceConstraints (spec.InterfacesDefined.Select (l => l.GetMetaInfo ()).ToArray ());
480 if (spec.TypeArguments != null)
481 builder.SetInterfaceConstraints (spec.TypeArguments.Select (l => l.GetMetaInfo ()).ToArray ());
483 builder.SetGenericParameterAttributes (attr);
486 public override void Emit ()
488 EmitConstraints (builder);
490 if (OptAttributes != null)
491 OptAttributes.Emit ();
496 public void ErrorInvalidVariance (IMemberContext mc, Variance expected)
498 Report.SymbolRelatedToPreviousError (mc.CurrentMemberDefinition);
499 string input_variance = Variance == Variance.Contravariant ? "contravariant" : "covariant";
500 string gtype_variance;
502 case Variance.Contravariant: gtype_variance = "contravariantly"; break;
503 case Variance.Covariant: gtype_variance = "covariantly"; break;
504 default: gtype_variance = "invariantly"; break;
507 Delegate d = mc as Delegate;
508 string parameters = d != null ? d.Parameters.GetSignatureForError () : "";
510 Report.Error (1961, Location,
511 "The {2} type parameter `{0}' must be {3} valid on `{1}{4}'",
512 GetSignatureForError (), mc.GetSignatureForError (), input_variance, gtype_variance, parameters);
515 public TypeSpec GetAttributeCoClass ()
520 public string GetAttributeDefaultMember ()
522 throw new NotSupportedException ();
525 public AttributeUsageAttribute GetAttributeUsage (PredefinedAttribute pa)
527 throw new NotSupportedException ();
530 public override string GetSignatureForError ()
532 return MemberName.Name;
535 public void LoadMembers (TypeSpec declaringType, bool onlyTypes, ref MemberCache cache)
537 throw new NotSupportedException ("Not supported for compiled definition");
541 // Resolves all type parameter constraints
543 public bool ResolveConstraints (IMemberContext context)
545 if (constraints != null)
546 return constraints.Resolve (context, this);
548 if (spec.BaseType == null)
549 spec.BaseType = TypeManager.object_type;
554 public static TypeParameter FindTypeParameter (TypeParameter[] tparams, string name)
556 foreach (var tp in tparams) {
564 public override bool IsClsComplianceRequired ()
569 public new void VerifyClsCompliance ()
571 if (constraints != null)
572 constraints.VerifyClsCompliance (Report);
576 [System.Diagnostics.DebuggerDisplay ("{DisplayDebugInfo()}")]
577 public class TypeParameterSpec : TypeSpec
579 public static readonly new TypeParameterSpec[] EmptyTypes = new TypeParameterSpec[0];
582 SpecialConstraint spec;
585 TypeSpec[] ifaces_defined;
588 // Creates type owned type parameter
590 public TypeParameterSpec (TypeSpec declaringType, int index, ITypeDefinition definition, SpecialConstraint spec, Variance variance, Type info)
591 : base (MemberKind.TypeParameter, declaringType, definition, info, Modifiers.PUBLIC)
593 this.variance = variance;
595 state &= ~StateFlags.Obsolete_Undetected;
600 // Creates method owned type parameter
602 public TypeParameterSpec (int index, ITypeDefinition definition, SpecialConstraint spec, Variance variance, Type info)
603 : this (null, index, definition, spec, variance, info)
609 public int DeclaredPosition {
615 public bool HasSpecialConstructor {
617 return (spec & SpecialConstraint.Constructor) != 0;
621 public bool HasSpecialClass {
623 return (spec & SpecialConstraint.Class) != 0;
627 public bool HasSpecialStruct {
629 return (spec & SpecialConstraint.Struct) != 0;
633 public bool HasTypeConstraint {
635 return BaseType != TypeManager.object_type && BaseType != TypeManager.value_type;
639 public override IList<TypeSpec> Interfaces {
641 if ((state & StateFlags.InterfacesExpanded) == 0) {
642 if (ifaces != null) {
643 for (int i = 0; i < ifaces.Count; ++i ) {
644 var iface_type = ifaces[i];
645 if (iface_type.Interfaces != null) {
646 if (ifaces_defined == null)
647 ifaces_defined = ifaces.ToArray ();
649 for (int ii = 0; ii < iface_type.Interfaces.Count; ++ii) {
650 var ii_iface_type = iface_type.Interfaces [ii];
652 AddInterface (ii_iface_type);
658 if (ifaces_defined == null && ifaces != null)
659 ifaces_defined = ifaces.ToArray ();
661 state |= StateFlags.InterfacesExpanded;
669 // Unexpanded interfaces list
671 public TypeSpec[] InterfacesDefined {
673 if (ifaces_defined == null && ifaces != null)
674 ifaces_defined = ifaces.ToArray ();
676 return ifaces_defined;
679 ifaces_defined = value;
683 public bool IsConstrained {
685 return spec != SpecialConstraint.None || ifaces != null || targs != null || HasTypeConstraint;
690 // Returns whether the type parameter is "known to be a reference type"
692 public bool IsReferenceType {
694 return (spec & SpecialConstraint.Class) != 0 || HasTypeConstraint;
698 public bool IsValueType { // TODO: Do I need this ?
700 // TODO MemberCache: probably wrong
701 return HasSpecialStruct;
705 public override string Name {
707 return definition.Name;
711 public bool IsMethodOwned {
713 return DeclaringType == null;
717 public SpecialConstraint SpecialConstraint {
727 // Types used to inflate the generic type
729 public new TypeSpec[] TypeArguments {
738 public Variance Variance {
746 public string DisplayDebugInfo ()
748 var s = GetSignatureForError ();
749 return IsMethodOwned ? s + "!!" : s + "!";
753 // Finds effective base class
755 public TypeSpec GetEffectiveBase ()
757 if (HasSpecialStruct) {
758 return TypeManager.value_type;
761 if (BaseType != null && targs == null)
765 if (HasTypeConstraint) {
766 Array.Resize (ref types, types.Length + 1);
767 types[types.Length - 1] = BaseType;
771 return Convert.FindMostEncompassedType (types.Select (l => l.BaseType));
773 return TypeManager.object_type;
776 public override string GetSignatureForError ()
782 // Constraints have to match by definition but not position, used by
783 // partial classes or methods
785 public bool HasSameConstraintsDefinition (TypeParameterSpec other)
787 if (spec != other.spec)
790 if (BaseType != other.BaseType)
793 if (!TypeSpecComparer.Override.IsSame (InterfacesDefined, other.InterfacesDefined))
796 if (!TypeSpecComparer.Override.IsSame (targs, other.targs))
803 // Constraints have to match by using same set of types, used by
804 // implicit interface implementation
806 public bool HasSameConstraintsImplementation (TypeParameterSpec other)
808 if (spec != other.spec)
812 // It can be same base type or inflated type parameter
814 // interface I<T> { void Foo<U> where U : T; }
815 // class A : I<int> { void Foo<X> where X : int {} }
818 if (!TypeSpecComparer.Override.IsEqual (BaseType, other.BaseType)) {
819 if (other.targs == null)
823 foreach (var otarg in other.targs) {
824 if (TypeSpecComparer.Override.IsEqual (BaseType, otarg)) {
834 // Check interfaces implementation -> definition
835 if (InterfacesDefined != null) {
836 foreach (var iface in InterfacesDefined) {
838 if (other.InterfacesDefined != null) {
839 foreach (var oiface in other.InterfacesDefined) {
840 if (TypeSpecComparer.Override.IsEqual (iface, oiface)) {
850 if (other.targs != null) {
851 foreach (var otarg in other.targs) {
852 if (TypeSpecComparer.Override.IsEqual (BaseType, otarg)) {
864 // Check interfaces implementation <- definition
865 if (other.InterfacesDefined != null) {
866 if (InterfacesDefined == null)
869 foreach (var oiface in other.InterfacesDefined) {
871 foreach (var iface in InterfacesDefined) {
872 if (TypeSpecComparer.Override.IsEqual (iface, oiface)) {
883 // Check type parameters implementation -> definition
885 if (other.targs == null)
888 foreach (var targ in targs) {
890 foreach (var otarg in other.targs) {
891 if (TypeSpecComparer.Override.IsEqual (targ, otarg)) {
902 // Check type parameters implementation <- definition
903 if (other.targs != null) {
904 foreach (var otarg in other.targs) {
905 // Ignore inflated type arguments, were checked above
906 if (!otarg.IsGenericParameter)
913 foreach (var targ in targs) {
914 if (TypeSpecComparer.Override.IsEqual (targ, otarg)) {
928 public static TypeParameterSpec[] InflateConstraints (TypeParameterInflator inflator, TypeParameterSpec[] tparams)
930 TypeParameterSpec[] constraints = null;
932 for (int i = 0; i < tparams.Length; ++i) {
934 if (tp.HasTypeConstraint || tp.Interfaces != null || tp.TypeArguments != null) {
935 if (constraints == null) {
936 constraints = new TypeParameterSpec[tparams.Length];
937 Array.Copy (tparams, constraints, constraints.Length);
940 constraints[i] = (TypeParameterSpec) constraints[i].InflateMember (inflator);
944 if (constraints == null)
945 constraints = tparams;
950 public void InflateConstraints (TypeParameterInflator inflator, TypeParameterSpec tps)
952 tps.BaseType = inflator.Inflate (BaseType);
953 if (ifaces != null) {
954 tps.ifaces = new List<TypeSpec> (ifaces.Count);
955 for (int i = 0; i < ifaces.Count; ++i)
956 tps.ifaces.Add (inflator.Inflate (ifaces[i]));
959 tps.targs = new TypeSpec[targs.Length];
960 for (int i = 0; i < targs.Length; ++i)
961 tps.targs[i] = inflator.Inflate (targs[i]);
965 public override MemberSpec InflateMember (TypeParameterInflator inflator)
967 var tps = (TypeParameterSpec) MemberwiseClone ();
968 InflateConstraints (inflator, tps);
973 // Populates type parameter members using type parameter constraints
974 // The trick here is to be called late enough but not too late to
975 // populate member cache with all members from other types
977 protected override void InitializeMemberCache (bool onlyTypes)
979 cache = new MemberCache ();
980 if (ifaces != null) {
981 foreach (var iface_type in Interfaces) {
982 cache.AddInterface (iface_type);
987 public bool IsConvertibleToInterface (TypeSpec iface)
989 if (Interfaces != null) {
990 foreach (var t in Interfaces) {
996 if (TypeArguments != null) {
997 foreach (var t in TypeArguments) {
998 if (((TypeParameterSpec) t).IsConvertibleToInterface (iface))
1006 public override TypeSpec Mutate (TypeParameterMutator mutator)
1008 return mutator.Mutate (this);
1012 public struct TypeParameterInflator
1014 readonly TypeSpec type;
1015 readonly TypeParameterSpec[] tparams;
1016 readonly TypeSpec[] targs;
1018 public TypeParameterInflator (TypeParameterInflator nested, TypeSpec type)
1019 : this (type, nested.tparams, nested.targs)
1023 public TypeParameterInflator (TypeSpec type, TypeParameterSpec[] tparams, TypeSpec[] targs)
1025 if (tparams.Length != targs.Length)
1026 throw new ArgumentException ("Invalid arguments");
1028 this.tparams = tparams;
1034 // Type parameters to inflate
1036 public TypeParameterSpec[] TypeParameters {
1042 public TypeSpec Inflate (TypeSpec ts)
1044 var tp = ts as TypeParameterSpec;
1046 return Inflate (tp);
1048 var ac = ts as ArrayContainer;
1050 var et = Inflate (ac.Element);
1051 if (et != ac.Element)
1052 return ArrayContainer.MakeType (et, ac.Rank);
1058 // When inflating a nested type, inflate its parent first
1059 // in case it's using same type parameters (was inflated within the type)
1062 var parent = Inflate (ts.DeclaringType);
1063 if (ts.DeclaringType != parent) {
1065 // Keep the inflated type arguments
1067 var targs = ts.TypeArguments;
1070 // Parent was inflated, find the same type on inflated type
1071 // to use same cache for nested types on same generic parent
1073 // TODO: Should use BindingRestriction.DeclaredOnly or GetMember
1074 ts = MemberCache.FindNestedType (parent, ts.Name, ts.Arity);
1077 // Handle the tricky case where parent shares local type arguments
1078 // which means inflating inflated type
1081 // public static Nested<T> Foo () { return null; }
1083 // public class Nested<U> {}
1086 // return type of Test<string>.Foo() has to be Test<string>.Nested<string>
1088 if (targs.Length > 0) {
1089 var inflated_targs = new TypeSpec [targs.Length];
1090 for (var i = 0; i < targs.Length; ++i)
1091 inflated_targs[i] = Inflate (targs[i]);
1093 ts = ts.MakeGenericType (inflated_targs);
1100 // Inflate generic type
1102 return InflateTypeParameters (ts);
1107 public TypeSpec Inflate (TypeParameterSpec tp)
1109 for (int i = 0; i < tparams.Length; ++i)
1110 if (tparams [i] == tp)
1113 // This can happen when inflating nested types
1114 // without type arguments specified
1119 // Inflates generic types
1121 TypeSpec InflateTypeParameters (TypeSpec type)
1123 var targs = new TypeSpec[type.Arity];
1126 var gti = type as InflatedTypeSpec;
1129 // Inflating using outside type arguments, var v = new Foo<int> (), class Foo<T> {}
1132 for (; i < targs.Length; ++i)
1133 targs[i] = Inflate (gti.TypeArguments[i]);
1135 return gti.GetDefinition ().MakeGenericType (targs);
1139 // Inflating parent using inside type arguments, class Foo<T> { ITest<T> foo; }
1141 var args = type.MemberDefinition.TypeParameters;
1142 foreach (var ds_tp in args)
1143 targs[i++] = Inflate (ds_tp);
1145 return type.MakeGenericType (targs);
1148 public TypeSpec TypeInstance {
1149 get { return type; }
1154 // Before emitting any code we have to change all MVAR references to VAR
1155 // when the method is of generic type and has hoisted variables
1157 public class TypeParameterMutator
1159 TypeParameter[] mvar;
1160 TypeParameter[] var;
1161 Dictionary<TypeSpec, TypeSpec> mutated_typespec = new Dictionary<TypeSpec, TypeSpec> ();
1163 public TypeParameterMutator (TypeParameter[] mvar, TypeParameter[] var)
1165 if (mvar.Length != var.Length)
1166 throw new ArgumentException ();
1174 public TypeParameter[] MethodTypeParameters {
1182 public static TypeSpec GetMemberDeclaringType (TypeSpec type)
1184 if (type is InflatedTypeSpec) {
1185 if (type.DeclaringType == null)
1186 return type.GetDefinition ();
1188 var parent = GetMemberDeclaringType (type.DeclaringType);
1189 type = MemberCache.GetMember<TypeSpec> (parent, type);
1195 public TypeSpec Mutate (TypeSpec ts)
1198 if (mutated_typespec.TryGetValue (ts, out value))
1201 value = ts.Mutate (this);
1202 mutated_typespec.Add (ts, value);
1206 public TypeParameterSpec Mutate (TypeParameterSpec tp)
1208 for (int i = 0; i < mvar.Length; ++i) {
1209 if (mvar[i].Type == tp)
1216 public TypeSpec[] Mutate (TypeSpec[] targs)
1218 TypeSpec[] mutated = new TypeSpec[targs.Length];
1219 bool changed = false;
1220 for (int i = 0; i < targs.Length; ++i) {
1221 mutated[i] = Mutate (targs[i]);
1222 changed |= targs[i] != mutated[i];
1225 return changed ? mutated : targs;
1230 /// A TypeExpr which already resolved to a type parameter.
1232 public class TypeParameterExpr : TypeExpr {
1234 public TypeParameterExpr (TypeParameter type_parameter, Location loc)
1236 this.type = type_parameter.Type;
1237 this.eclass = ExprClass.TypeParameter;
1241 protected override TypeExpr DoResolveAsTypeStep (IMemberContext ec)
1243 throw new NotSupportedException ();
1246 public override FullNamedExpression ResolveAsTypeStep (IMemberContext ec, bool silent)
1251 public override bool CheckAccessLevel (IMemberContext ds)
1257 public class InflatedTypeSpec : TypeSpec
1260 TypeParameterSpec[] constraints;
1261 readonly TypeSpec open_type;
1263 public InflatedTypeSpec (TypeSpec openType, TypeSpec declaringType, TypeSpec[] targs)
1264 : base (openType.Kind, declaringType, openType.MemberDefinition, null, openType.Modifiers)
1267 throw new ArgumentNullException ("targs");
1269 // this.state = openType.state;
1270 this.open_type = openType;
1273 foreach (var arg in targs) {
1274 if (arg.HasDynamicElement || arg == InternalType.Dynamic) {
1275 state |= StateFlags.HasDynamicElement;
1283 public override TypeSpec BaseType {
1285 if (cache == null || (state & StateFlags.PendingBaseTypeInflate) != 0)
1286 InitializeMemberCache (true);
1288 return base.BaseType;
1293 // Inflated type parameters with constraints array, mapping with type arguments is based on index
1295 public TypeParameterSpec[] Constraints {
1297 if (constraints == null) {
1298 var inflator = CreateLocalInflator ();
1299 constraints = TypeParameterSpec.InflateConstraints (inflator, MemberDefinition.TypeParameters);
1306 public override IList<TypeSpec> Interfaces {
1309 InitializeMemberCache (true);
1311 return base.Interfaces;
1316 // Types used to inflate the generic type
1318 public override TypeSpec[] TypeArguments {
1326 TypeParameterInflator CreateLocalInflator ()
1328 TypeParameterSpec[] tparams_full;
1329 TypeSpec[] targs_full = targs;
1332 // Special case is needed when we are inflating an open type (nested type definition)
1333 // on inflated parent. Consider following case
1335 // Foo<T>.Bar<U> => Foo<string>.Bar<U>
1337 // Any later inflation of Foo<string>.Bar<U> has to also inflate T if used inside Bar<U>
1339 List<TypeSpec> merged_targs = null;
1340 List<TypeParameterSpec> merged_tparams = null;
1342 var type = DeclaringType;
1345 if (type.TypeArguments.Length > 0) {
1346 if (merged_targs == null) {
1347 merged_targs = new List<TypeSpec> ();
1348 merged_tparams = new List<TypeParameterSpec> ();
1349 if (targs.Length > 0) {
1350 merged_targs.AddRange (targs);
1351 merged_tparams.AddRange (open_type.MemberDefinition.TypeParameters);
1354 merged_tparams.AddRange (type.MemberDefinition.TypeParameters);
1355 merged_targs.AddRange (type.TypeArguments);
1357 type = type.DeclaringType;
1358 } while (type != null);
1360 if (merged_targs != null) {
1361 // Type arguments are not in the right order but it should not matter in this case
1362 targs_full = merged_targs.ToArray ();
1363 tparams_full = merged_tparams.ToArray ();
1364 } else if (targs.Length == 0) {
1365 tparams_full = TypeParameterSpec.EmptyTypes;
1367 tparams_full = open_type.MemberDefinition.TypeParameters;
1369 } else if (targs.Length == 0) {
1370 tparams_full = TypeParameterSpec.EmptyTypes;
1372 tparams_full = open_type.MemberDefinition.TypeParameters;
1375 return new TypeParameterInflator (this, tparams_full, targs_full);
1378 Type CreateMetaInfo (TypeParameterMutator mutator)
1381 // Converts nested type arguments into right order
1382 // Foo<string, bool>.Bar<int> => string, bool, int
1384 var all = new List<Type> ();
1385 TypeSpec type = this;
1386 TypeSpec definition = type;
1388 if (type.GetDefinition().IsGeneric) {
1390 type.TypeArguments != TypeSpec.EmptyTypes ?
1391 type.TypeArguments.Select (l => l.GetMetaInfo ()) :
1392 type.MemberDefinition.TypeParameters.Select (l => l.GetMetaInfo ()));
1395 definition = definition.GetDefinition ();
1396 type = type.DeclaringType;
1397 } while (type != null);
1399 return definition.GetMetaInfo ().MakeGenericType (all.ToArray ());
1402 public override ObsoleteAttribute GetAttributeObsolete ()
1404 return open_type.GetAttributeObsolete ();
1407 protected override bool IsNotCLSCompliant ()
1409 if (base.IsNotCLSCompliant ())
1412 foreach (var ta in TypeArguments) {
1413 if (ta.MemberDefinition.IsNotCLSCompliant ())
1420 public override TypeSpec GetDefinition ()
1425 public override Type GetMetaInfo ()
1428 info = CreateMetaInfo (null);
1433 public override string GetSignatureForError ()
1435 if (TypeManager.IsNullableType (open_type))
1436 return targs[0].GetSignatureForError () + "?";
1438 return base.GetSignatureForError ();
1441 protected override string GetTypeNameSignature ()
1443 if (targs.Length == 0 || MemberDefinition is AnonymousTypeClass)
1446 return "<" + TypeManager.CSharpName (targs) + ">";
1449 protected override void InitializeMemberCache (bool onlyTypes)
1452 cache = new MemberCache (onlyTypes ? open_type.MemberCacheTypes : open_type.MemberCache);
1454 var inflator = CreateLocalInflator ();
1457 // Two stage inflate due to possible nested types recursive
1467 // When resolving type of `b' members of `B' cannot be
1468 // inflated because are not yet available in membercache
1470 if ((state & StateFlags.PendingMemberCacheMembers) == 0) {
1471 open_type.MemberCacheTypes.InflateTypes (cache, inflator);
1474 // Inflate any implemented interfaces
1476 if (open_type.Interfaces != null) {
1477 ifaces = new List<TypeSpec> (open_type.Interfaces.Count);
1478 foreach (var iface in open_type.Interfaces) {
1479 var iface_inflated = inflator.Inflate (iface);
1480 AddInterface (iface_inflated);
1485 // Handles the tricky case of recursive nested base generic type
1487 // class A<T> : Base<A<T>.Nested> {
1491 // When inflating A<T>. base type is not yet known, secondary
1492 // inflation is required (not common case) once base scope
1495 if (open_type.BaseType == null) {
1497 state |= StateFlags.PendingBaseTypeInflate;
1499 BaseType = inflator.Inflate (open_type.BaseType);
1501 } else if ((state & StateFlags.PendingBaseTypeInflate) != 0) {
1502 BaseType = inflator.Inflate (open_type.BaseType);
1503 state &= ~StateFlags.PendingBaseTypeInflate;
1507 state |= StateFlags.PendingMemberCacheMembers;
1511 var tc = open_type.MemberDefinition as TypeContainer;
1512 if (tc != null && !tc.HasMembersDefined)
1513 throw new InternalErrorException ("Inflating MemberCache with undefined members");
1515 if ((state & StateFlags.PendingBaseTypeInflate) != 0) {
1516 BaseType = inflator.Inflate (open_type.BaseType);
1517 state &= ~StateFlags.PendingBaseTypeInflate;
1520 state &= ~StateFlags.PendingMemberCacheMembers;
1521 open_type.MemberCache.InflateMembers (cache, open_type, inflator);
1524 public override TypeSpec Mutate (TypeParameterMutator mutator)
1526 var targs = TypeArguments;
1528 targs = mutator.Mutate (targs);
1530 var decl = DeclaringType;
1531 if (IsNested && DeclaringType.IsGenericOrParentIsGeneric)
1532 decl = mutator.Mutate (decl);
1534 if (targs == TypeArguments && decl == DeclaringType)
1537 var mutated = (InflatedTypeSpec) MemberwiseClone ();
1538 if (decl != DeclaringType) {
1539 // Gets back MethodInfo in case of metaInfo was inflated
1540 //mutated.info = MemberCache.GetMember<TypeSpec> (DeclaringType.GetDefinition (), this).info;
1542 mutated.declaringType = decl;
1543 mutated.state |= StateFlags.PendingMetaInflate;
1546 if (targs != null) {
1547 mutated.targs = targs;
1548 mutated.info = null;
1557 // Tracks the type arguments when instantiating a generic type. It's used
1558 // by both type arguments and type parameters
1560 public class TypeArguments
1562 List<FullNamedExpression> args;
1565 public TypeArguments (params FullNamedExpression[] types)
1567 this.args = new List<FullNamedExpression> (types);
1570 public void Add (FullNamedExpression type)
1575 // TODO: Kill this monster
1576 public TypeParameterName[] GetDeclarations ()
1578 return args.ConvertAll (i => (TypeParameterName) i).ToArray ();
1582 /// We may only be used after Resolve() is called and return the fully
1585 // TODO: Not needed, just return type from resolve
1586 public TypeSpec[] Arguments {
1598 public virtual bool IsEmpty {
1604 public string GetSignatureForError()
1606 StringBuilder sb = new StringBuilder ();
1607 for (int i = 0; i < Count; ++i) {
1610 sb.Append (expr.GetSignatureForError ());
1616 return sb.ToString ();
1620 /// Resolve the type arguments.
1622 public virtual bool Resolve (IMemberContext ec)
1625 return atypes.Length != 0;
1627 int count = args.Count;
1630 atypes = new TypeSpec [count];
1632 for (int i = 0; i < count; i++){
1633 TypeExpr te = args[i].ResolveAsTypeTerminal (ec, false);
1639 atypes[i] = te.Type;
1641 if (te.Type.IsStatic) {
1642 ec.Compiler.Report.Error (718, te.Location, "`{0}': static classes cannot be used as generic arguments",
1643 te.GetSignatureForError ());
1647 if (te.Type.IsPointer || TypeManager.IsSpecialType (te.Type)) {
1648 ec.Compiler.Report.Error (306, te.Location,
1649 "The type `{0}' may not be used as a type argument",
1650 te.GetSignatureForError ());
1656 atypes = TypeSpec.EmptyTypes;
1661 public TypeArguments Clone ()
1663 TypeArguments copy = new TypeArguments ();
1664 foreach (var ta in args)
1671 public class UnboundTypeArguments : TypeArguments
1673 public UnboundTypeArguments (int arity)
1674 : base (new FullNamedExpression[arity])
1678 public override bool IsEmpty {
1684 public override bool Resolve (IMemberContext ec)
1686 // Nothing to be resolved
1691 public class TypeParameterName : SimpleName
1693 Attributes attributes;
1696 public TypeParameterName (string name, Attributes attrs, Location loc)
1697 : this (name, attrs, Variance.None, loc)
1701 public TypeParameterName (string name, Attributes attrs, Variance variance, Location loc)
1705 this.variance = variance;
1708 public Attributes OptAttributes {
1714 public Variance Variance {
1722 // A type expression of generic type with type arguments
1724 class GenericTypeExpr : TypeExpr
1728 bool constraints_checked;
1731 /// Instantiate the generic type `t' with the type arguments `args'.
1732 /// Use this constructor if you already know the fully resolved
1735 public GenericTypeExpr (TypeSpec open_type, TypeArguments args, Location l)
1737 this.open_type = open_type;
1742 public TypeArguments TypeArguments {
1743 get { return args; }
1746 public override string GetSignatureForError ()
1748 return TypeManager.CSharpName (type);
1751 protected override TypeExpr DoResolveAsTypeStep (IMemberContext ec)
1753 if (!args.Resolve (ec))
1756 TypeSpec[] atypes = args.Arguments;
1759 // Now bind the parameters
1761 type = open_type.MakeGenericType (atypes);
1764 // Check constraints when context is not method/base type
1766 if (!ec.HasUnresolvedConstraints)
1767 CheckConstraints (ec);
1773 // Checks the constraints of open generic type against type
1774 // arguments. Has to be called after all members have been defined
1776 public bool CheckConstraints (IMemberContext ec)
1778 if (constraints_checked)
1781 constraints_checked = true;
1783 var gtype = (InflatedTypeSpec) type;
1784 var constraints = gtype.Constraints;
1785 if (constraints == null)
1788 return new ConstraintChecker(ec).CheckAll (open_type, args.Arguments, constraints, loc);
1791 public override bool CheckAccessLevel (IMemberContext mc)
1793 DeclSpace c = mc.CurrentMemberDefinition as DeclSpace;
1795 c = mc.CurrentMemberDefinition.Parent;
1797 return c.CheckAccessLevel (open_type);
1800 public bool HasDynamicArguments ()
1802 return HasDynamicArguments (args.Arguments);
1805 static bool HasDynamicArguments (TypeSpec[] args)
1807 for (int i = 0; i < args.Length; ++i) {
1810 if (item == InternalType.Dynamic)
1813 if (TypeManager.IsGenericType (item))
1814 return HasDynamicArguments (TypeManager.GetTypeArguments (item));
1817 while (item.IsArray) {
1818 item = ((ArrayContainer) item).Element;
1821 if (item == InternalType.Dynamic)
1829 public override bool Equals (object obj)
1831 GenericTypeExpr cobj = obj as GenericTypeExpr;
1835 if ((type == null) || (cobj.type == null))
1838 return type == cobj.type;
1841 public override int GetHashCode ()
1843 return base.GetHashCode ();
1848 // Generic type with unbound type arguments, used for typeof (G<,,>)
1850 class GenericOpenTypeExpr : TypeExpr
1852 public GenericOpenTypeExpr (TypeSpec type, /*UnboundTypeArguments args,*/ Location loc)
1854 this.type = type.GetDefinition ();
1858 protected override TypeExpr DoResolveAsTypeStep (IMemberContext ec)
1864 struct ConstraintChecker
1867 bool ignore_inferred_dynamic;
1869 public ConstraintChecker (IMemberContext ctx)
1872 ignore_inferred_dynamic = false;
1877 public bool IgnoreInferredDynamic {
1879 return ignore_inferred_dynamic;
1882 ignore_inferred_dynamic = value;
1889 // Checks all type arguments againts type parameters constraints
1890 // NOTE: It can run in probing mode when `mc' is null
1892 public bool CheckAll (MemberSpec context, TypeSpec[] targs, TypeParameterSpec[] tparams, Location loc)
1894 for (int i = 0; i < tparams.Length; i++) {
1895 if (ignore_inferred_dynamic && targs[i] == InternalType.Dynamic)
1898 if (!CheckConstraint (context, targs [i], tparams [i], loc))
1905 bool CheckConstraint (MemberSpec context, TypeSpec atype, TypeParameterSpec tparam, Location loc)
1908 // First, check the `class' and `struct' constraints.
1910 if (tparam.HasSpecialClass && !TypeManager.IsReferenceType (atype)) {
1912 mc.Compiler.Report.Error (452, loc,
1913 "The type `{0}' must be a reference type in order to use it as type parameter `{1}' in the generic type or method `{2}'",
1914 TypeManager.CSharpName (atype), tparam.GetSignatureForError (), context.GetSignatureForError ());
1920 if (tparam.HasSpecialStruct && (!TypeManager.IsValueType (atype) || TypeManager.IsNullableType (atype))) {
1922 mc.Compiler.Report.Error (453, loc,
1923 "The type `{0}' must be a non-nullable value type in order to use it as type parameter `{1}' in the generic type or method `{2}'",
1924 TypeManager.CSharpName (atype), tparam.GetSignatureForError (), context.GetSignatureForError ());
1933 // Check the class constraint
1935 if (tparam.HasTypeConstraint) {
1936 if (!CheckConversion (mc, context, atype, tparam, tparam.BaseType, loc)) {
1945 // Check the interfaces constraints
1947 if (tparam.Interfaces != null) {
1948 if (TypeManager.IsNullableType (atype)) {
1952 mc.Compiler.Report.Error (313, loc,
1953 "The type `{0}' cannot be used as type parameter `{1}' in the generic type or method `{2}'. The nullable type `{0}' never satisfies interface constraint",
1954 atype.GetSignatureForError (), tparam.GetSignatureForError (), context.GetSignatureForError ());
1957 foreach (TypeSpec iface in tparam.Interfaces) {
1958 if (!CheckConversion (mc, context, atype, tparam, iface, loc)) {
1969 // Check the type parameter constraint
1971 if (tparam.TypeArguments != null) {
1972 foreach (var ta in tparam.TypeArguments) {
1973 if (!CheckConversion (mc, context, atype, tparam, ta, loc)) {
1983 // Finally, check the constructor constraint.
1985 if (!tparam.HasSpecialConstructor)
1988 if (!HasDefaultConstructor (atype)) {
1990 mc.Compiler.Report.SymbolRelatedToPreviousError (atype);
1991 mc.Compiler.Report.Error (310, loc,
1992 "The type `{0}' must have a public parameterless constructor in order to use it as parameter `{1}' in the generic type or method `{2}'",
1993 TypeManager.CSharpName (atype), tparam.GetSignatureForError (), context.GetSignatureForError ());
2001 static bool HasDynamicTypeArgument (TypeSpec[] targs)
2003 for (int i = 0; i < targs.Length; ++i) {
2004 var targ = targs [i];
2005 if (targ == InternalType.Dynamic)
2008 if (HasDynamicTypeArgument (targ.TypeArguments))
2015 bool CheckConversion (IMemberContext mc, MemberSpec context, TypeSpec atype, TypeParameterSpec tparam, TypeSpec ttype, Location loc)
2017 var expr = new EmptyExpression (atype);
2018 if (Convert.ImplicitStandardConversionExists (expr, ttype))
2022 // When partial/full type inference finds a dynamic type argument delay
2023 // the constraint check to runtime, it can succeed for real underlying
2026 if (ignore_inferred_dynamic && HasDynamicTypeArgument (ttype.TypeArguments))
2030 mc.Compiler.Report.SymbolRelatedToPreviousError (tparam);
2031 if (TypeManager.IsValueType (atype)) {
2032 mc.Compiler.Report.Error (315, loc,
2033 "The type `{0}' cannot be used as type parameter `{1}' in the generic type or method `{2}'. There is no boxing conversion from `{0}' to `{3}'",
2034 atype.GetSignatureForError (), tparam.GetSignatureForError (), context.GetSignatureForError (), ttype.GetSignatureForError ());
2035 } else if (atype.IsGenericParameter) {
2036 mc.Compiler.Report.Error (314, loc,
2037 "The type `{0}' cannot be used as type parameter `{1}' in the generic type or method `{2}'. There is no boxing or type parameter conversion from `{0}' to `{3}'",
2038 atype.GetSignatureForError (), tparam.GetSignatureForError (), context.GetSignatureForError (), ttype.GetSignatureForError ());
2040 mc.Compiler.Report.Error (311, loc,
2041 "The type `{0}' cannot be used as type parameter `{1}' in the generic type or method `{2}'. There is no implicit reference conversion from `{0}' to `{3}'",
2042 atype.GetSignatureForError (), tparam.GetSignatureForError (), context.GetSignatureForError (), ttype.GetSignatureForError ());
2049 bool HasDefaultConstructor (TypeSpec atype)
2051 var tp = atype as TypeParameterSpec;
2053 return tp.HasSpecialConstructor || tp.HasSpecialStruct;
2056 if (atype.IsStruct || atype.IsEnum)
2059 if (atype.IsAbstract)
2062 var tdef = atype.GetDefinition ();
2065 // In some circumstances MemberCache is not yet populated and members
2066 // cannot be defined yet (recursive type new constraints)
2068 // class A<T> where T : B<T>, new () {}
2069 // class B<T> where T : A<T>, new () {}
2071 var tc = tdef.MemberDefinition as Class;
2073 if (tc.InstanceConstructors == null) {
2074 // Default ctor will be generated later
2078 foreach (var c in tc.InstanceConstructors) {
2079 if (c.ParameterInfo.IsEmpty) {
2080 if ((c.ModFlags & Modifiers.PUBLIC) != 0)
2088 var found = MemberCache.FindMember (tdef,
2089 MemberFilter.Constructor (ParametersCompiled.EmptyReadOnlyParameters),
2090 BindingRestriction.DeclaredOnly | BindingRestriction.InstanceOnly);
2092 return found != null && (found.Modifiers & Modifiers.PUBLIC) != 0;
2097 /// A generic method definition.
2099 public class GenericMethod : DeclSpace
2101 ParametersCompiled parameters;
2103 public GenericMethod (NamespaceEntry ns, DeclSpace parent, MemberName name,
2104 FullNamedExpression return_type, ParametersCompiled parameters)
2105 : base (ns, parent, name, null)
2107 this.parameters = parameters;
2110 public GenericMethod (NamespaceEntry ns, DeclSpace parent, MemberName name, TypeParameter[] tparams,
2111 FullNamedExpression return_type, ParametersCompiled parameters)
2112 : this (ns, parent, name, return_type, parameters)
2114 this.type_params = tparams;
2117 public override TypeParameter[] CurrentTypeParameters {
2119 return base.type_params;
2123 public override TypeBuilder DefineType ()
2125 throw new Exception ();
2128 public override void ApplyAttributeBuilder (Attribute a, MethodSpec ctor, byte[] cdata, PredefinedAttributes pa)
2130 throw new NotSupportedException ();
2133 public override bool Define ()
2135 throw new NotSupportedException ();
2139 /// Define and resolve the type parameters.
2140 /// We're called from Method.Define().
2142 public bool Define (MethodOrOperator m)
2144 TypeParameterName[] names = MemberName.TypeArguments.GetDeclarations ();
2145 string[] snames = new string [names.Length];
2146 var block = m.Block;
2147 for (int i = 0; i < names.Length; i++) {
2148 string type_argument_name = names[i].Name;
2150 if (block == null) {
2151 int idx = parameters.GetParameterIndexByName (type_argument_name);
2155 b = new ToplevelBlock (Compiler, Location);
2157 b.Error_AlreadyDeclaredTypeParameter (type_argument_name, parameters[i].Location);
2160 INamedBlockVariable variable = null;
2161 block.GetLocalName (type_argument_name, m.Block, ref variable);
2162 if (variable != null)
2163 variable.Block.Error_AlreadyDeclaredTypeParameter (type_argument_name, variable.Location);
2166 snames[i] = type_argument_name;
2169 GenericTypeParameterBuilder[] gen_params = m.MethodBuilder.DefineGenericParameters (snames);
2170 for (int i = 0; i < TypeParameters.Length; i++)
2171 TypeParameters [i].Define (gen_params [i], null);
2176 public void EmitAttributes ()
2178 if (OptAttributes != null)
2179 OptAttributes.Emit ();
2182 public override string GetSignatureForError ()
2184 return base.GetSignatureForError () + parameters.GetSignatureForError ();
2187 public override AttributeTargets AttributeTargets {
2189 return AttributeTargets.Method | AttributeTargets.ReturnValue;
2193 public override string DocCommentHeader {
2194 get { return "M:"; }
2197 public new void VerifyClsCompliance ()
2199 foreach (TypeParameter tp in TypeParameters) {
2200 tp.VerifyClsCompliance ();
2205 public partial class TypeManager
2207 public static Variance CheckTypeVariance (TypeSpec t, Variance expected, IMemberContext member)
2209 var tp = t as TypeParameterSpec;
2211 Variance v = tp.Variance;
2212 if (expected == Variance.None && v != expected ||
2213 expected == Variance.Covariant && v == Variance.Contravariant ||
2214 expected == Variance.Contravariant && v == Variance.Covariant) {
2215 ((TypeParameter)tp.MemberDefinition).ErrorInvalidVariance (member, expected);
2221 if (t.TypeArguments.Length > 0) {
2222 var targs_definition = t.MemberDefinition.TypeParameters;
2223 TypeSpec[] targs = GetTypeArguments (t);
2224 for (int i = 0; i < targs.Length; ++i) {
2225 Variance v = targs_definition[i].Variance;
2226 CheckTypeVariance (targs[i], (Variance) ((int)v * (int)expected), member);
2233 return CheckTypeVariance (GetElementType (t), expected, member);
2235 return Variance.None;
2240 // Implements C# type inference
2245 // Tracks successful rate of type inference
2247 int score = int.MaxValue;
2248 readonly Arguments arguments;
2249 readonly int arg_count;
2251 public TypeInference (Arguments arguments)
2253 this.arguments = arguments;
2254 if (arguments != null)
2255 arg_count = arguments.Count;
2258 public int InferenceScore {
2264 public TypeSpec[] InferMethodArguments (ResolveContext ec, MethodSpec method)
2266 var method_generic_args = method.GenericDefinition.TypeParameters;
2267 TypeInferenceContext context = new TypeInferenceContext (method_generic_args);
2268 if (!context.UnfixedVariableExists)
2269 return TypeSpec.EmptyTypes;
2271 AParametersCollection pd = method.Parameters;
2272 if (!InferInPhases (ec, context, pd))
2275 return context.InferredTypeArguments;
2279 // Implements method type arguments inference
2281 bool InferInPhases (ResolveContext ec, TypeInferenceContext tic, AParametersCollection methodParameters)
2283 int params_arguments_start;
2284 if (methodParameters.HasParams) {
2285 params_arguments_start = methodParameters.Count - 1;
2287 params_arguments_start = arg_count;
2290 TypeSpec [] ptypes = methodParameters.Types;
2293 // The first inference phase
2295 TypeSpec method_parameter = null;
2296 for (int i = 0; i < arg_count; i++) {
2297 Argument a = arguments [i];
2301 if (i < params_arguments_start) {
2302 method_parameter = methodParameters.Types [i];
2303 } else if (i == params_arguments_start) {
2304 if (arg_count == params_arguments_start + 1 && TypeManager.HasElementType (a.Type))
2305 method_parameter = methodParameters.Types [params_arguments_start];
2307 method_parameter = TypeManager.GetElementType (methodParameters.Types [params_arguments_start]);
2309 ptypes = (TypeSpec[]) ptypes.Clone ();
2310 ptypes [i] = method_parameter;
2314 // When a lambda expression, an anonymous method
2315 // is used an explicit argument type inference takes a place
2317 AnonymousMethodExpression am = a.Expr as AnonymousMethodExpression;
2319 if (am.ExplicitTypeInference (ec, tic, method_parameter))
2325 score -= tic.ExactInference (a.Type, method_parameter);
2329 if (a.Expr.Type == InternalType.Null)
2332 if (TypeManager.IsValueType (method_parameter)) {
2333 score -= tic.LowerBoundInference (a.Type, method_parameter);
2338 // Otherwise an output type inference is made
2340 score -= tic.OutputTypeInference (ec, a.Expr, method_parameter);
2344 // Part of the second phase but because it happens only once
2345 // we don't need to call it in cycle
2347 bool fixed_any = false;
2348 if (!tic.FixIndependentTypeArguments (ec, ptypes, ref fixed_any))
2351 return DoSecondPhase (ec, tic, ptypes, !fixed_any);
2354 bool DoSecondPhase (ResolveContext ec, TypeInferenceContext tic, TypeSpec[] methodParameters, bool fixDependent)
2356 bool fixed_any = false;
2357 if (fixDependent && !tic.FixDependentTypes (ec, ref fixed_any))
2360 // If no further unfixed type variables exist, type inference succeeds
2361 if (!tic.UnfixedVariableExists)
2364 if (!fixed_any && fixDependent)
2367 // For all arguments where the corresponding argument output types
2368 // contain unfixed type variables but the input types do not,
2369 // an output type inference is made
2370 for (int i = 0; i < arg_count; i++) {
2372 // Align params arguments
2373 TypeSpec t_i = methodParameters [i >= methodParameters.Length ? methodParameters.Length - 1: i];
2375 if (!TypeManager.IsDelegateType (t_i)) {
2376 if (t_i.GetDefinition () != TypeManager.expression_type)
2379 t_i = TypeManager.GetTypeArguments (t_i) [0];
2382 var mi = Delegate.GetInvokeMethod (ec.Compiler, t_i);
2383 TypeSpec rtype = mi.ReturnType;
2385 if (tic.IsReturnTypeNonDependent (ec, mi, rtype))
2386 score -= tic.OutputTypeInference (ec, arguments [i].Expr, t_i);
2390 return DoSecondPhase (ec, tic, methodParameters, true);
2394 public class TypeInferenceContext
2403 class BoundInfo : IEquatable<BoundInfo>
2405 public readonly TypeSpec Type;
2406 public readonly BoundKind Kind;
2408 public BoundInfo (TypeSpec type, BoundKind kind)
2414 public override int GetHashCode ()
2416 return Type.GetHashCode ();
2419 #region IEquatable<BoundInfo> Members
2421 public bool Equals (BoundInfo other)
2423 return Type == other.Type && Kind == other.Kind;
2429 readonly TypeSpec[] unfixed_types;
2430 readonly TypeSpec[] fixed_types;
2431 readonly List<BoundInfo>[] bounds;
2434 // TODO MemberCache: Could it be TypeParameterSpec[] ??
2435 public TypeInferenceContext (TypeSpec[] typeArguments)
2437 if (typeArguments.Length == 0)
2438 throw new ArgumentException ("Empty generic arguments");
2440 fixed_types = new TypeSpec [typeArguments.Length];
2441 for (int i = 0; i < typeArguments.Length; ++i) {
2442 if (typeArguments [i].IsGenericParameter) {
2443 if (bounds == null) {
2444 bounds = new List<BoundInfo> [typeArguments.Length];
2445 unfixed_types = new TypeSpec [typeArguments.Length];
2447 unfixed_types [i] = typeArguments [i];
2449 fixed_types [i] = typeArguments [i];
2455 // Used together with AddCommonTypeBound fo implement
2456 // 7.4.2.13 Finding the best common type of a set of expressions
2458 public TypeInferenceContext ()
2460 fixed_types = new TypeSpec [1];
2461 unfixed_types = new TypeSpec [1];
2462 unfixed_types[0] = InternalType.Arglist; // it can be any internal type
2463 bounds = new List<BoundInfo> [1];
2466 public TypeSpec[] InferredTypeArguments {
2472 public void AddCommonTypeBound (TypeSpec type)
2474 AddToBounds (new BoundInfo (type, BoundKind.Lower), 0);
2477 void AddToBounds (BoundInfo bound, int index)
2480 // Some types cannot be used as type arguments
2482 if (bound.Type == TypeManager.void_type || bound.Type.IsPointer)
2485 var a = bounds [index];
2487 a = new List<BoundInfo> (2);
2493 if (a.Contains (bound))
2499 bool AllTypesAreFixed (TypeSpec[] types)
2501 foreach (TypeSpec t in types) {
2502 if (t.IsGenericParameter) {
2508 if (TypeManager.IsGenericType (t))
2509 return AllTypesAreFixed (TypeManager.GetTypeArguments (t));
2516 // 26.3.3.8 Exact Inference
2518 public int ExactInference (TypeSpec u, TypeSpec v)
2520 // If V is an array type
2525 // TODO MemberCache: GetMetaInfo ()
2526 if (u.GetMetaInfo ().GetArrayRank () != v.GetMetaInfo ().GetArrayRank ())
2529 return ExactInference (TypeManager.GetElementType (u), TypeManager.GetElementType (v));
2532 // If V is constructed type and U is constructed type
2533 if (TypeManager.IsGenericType (v)) {
2534 if (!TypeManager.IsGenericType (u))
2537 TypeSpec [] ga_u = TypeManager.GetTypeArguments (u);
2538 TypeSpec [] ga_v = TypeManager.GetTypeArguments (v);
2539 if (ga_u.Length != ga_v.Length)
2543 for (int i = 0; i < ga_u.Length; ++i)
2544 score += ExactInference (ga_u [i], ga_v [i]);
2546 return score > 0 ? 1 : 0;
2549 // If V is one of the unfixed type arguments
2550 int pos = IsUnfixed (v);
2554 AddToBounds (new BoundInfo (u, BoundKind.Exact), pos);
2558 public bool FixAllTypes (ResolveContext ec)
2560 for (int i = 0; i < unfixed_types.Length; ++i) {
2561 if (!FixType (ec, i))
2568 // All unfixed type variables Xi are fixed for which all of the following hold:
2569 // a, There is at least one type variable Xj that depends on Xi
2570 // b, Xi has a non-empty set of bounds
2572 public bool FixDependentTypes (ResolveContext ec, ref bool fixed_any)
2574 for (int i = 0; i < unfixed_types.Length; ++i) {
2575 if (unfixed_types[i] == null)
2578 if (bounds[i] == null)
2581 if (!FixType (ec, i))
2591 // All unfixed type variables Xi which depend on no Xj are fixed
2593 public bool FixIndependentTypeArguments (ResolveContext ec, TypeSpec[] methodParameters, ref bool fixed_any)
2595 var types_to_fix = new List<TypeSpec> (unfixed_types);
2596 for (int i = 0; i < methodParameters.Length; ++i) {
2597 TypeSpec t = methodParameters[i];
2599 if (!TypeManager.IsDelegateType (t)) {
2600 if (TypeManager.expression_type == null || t.MemberDefinition != TypeManager.expression_type.MemberDefinition)
2603 t = TypeManager.GetTypeArguments (t) [0];
2606 if (t.IsGenericParameter)
2609 var invoke = Delegate.GetInvokeMethod (ec.Compiler, t);
2610 TypeSpec rtype = invoke.ReturnType;
2611 if (!rtype.IsGenericParameter && !TypeManager.IsGenericType (rtype))
2614 // Remove dependent types, they cannot be fixed yet
2615 RemoveDependentTypes (types_to_fix, rtype);
2618 foreach (TypeSpec t in types_to_fix) {
2622 int idx = IsUnfixed (t);
2623 if (idx >= 0 && !FixType (ec, idx)) {
2628 fixed_any = types_to_fix.Count > 0;
2635 public bool FixType (ResolveContext ec, int i)
2637 // It's already fixed
2638 if (unfixed_types[i] == null)
2639 throw new InternalErrorException ("Type argument has been already fixed");
2644 var candidates = bounds [i];
2645 if (candidates == null)
2648 if (candidates.Count == 1) {
2649 unfixed_types[i] = null;
2650 TypeSpec t = candidates[0].Type;
2651 if (t == InternalType.Null)
2654 fixed_types [i] = t;
2659 // Determines a unique type from which there is
2660 // a standard implicit conversion to all the other
2663 TypeSpec best_candidate = null;
2665 int candidates_count = candidates.Count;
2666 for (int ci = 0; ci < candidates_count; ++ci) {
2667 BoundInfo bound = candidates [ci];
2668 for (cii = 0; cii < candidates_count; ++cii) {
2672 BoundInfo cbound = candidates[cii];
2674 // Same type parameters with different bounds
2675 if (cbound.Type == bound.Type) {
2676 if (bound.Kind != BoundKind.Exact)
2682 if (bound.Kind == BoundKind.Exact || cbound.Kind == BoundKind.Exact) {
2683 if (cbound.Kind == BoundKind.Lower) {
2684 if (!Convert.ImplicitConversionExists (ec, new TypeExpression (cbound.Type, Location.Null), bound.Type)) {
2690 if (cbound.Kind == BoundKind.Upper) {
2691 if (!Convert.ImplicitConversionExists (ec, new TypeExpression (bound.Type, Location.Null), cbound.Type)) {
2698 if (bound.Kind != BoundKind.Exact) {
2699 if (!Convert.ImplicitConversionExists (ec, new TypeExpression (bound.Type, Location.Null), cbound.Type)) {
2710 if (bound.Kind == BoundKind.Lower) {
2711 if (cbound.Kind == BoundKind.Lower) {
2712 if (!Convert.ImplicitConversionExists (ec, new TypeExpression (cbound.Type, Location.Null), bound.Type)) {
2716 if (!Convert.ImplicitConversionExists (ec, new TypeExpression (bound.Type, Location.Null), cbound.Type)) {
2726 if (bound.Kind == BoundKind.Upper) {
2727 if (!Convert.ImplicitConversionExists (ec, new TypeExpression (bound.Type, Location.Null), cbound.Type)) {
2731 throw new NotImplementedException ("variance conversion");
2735 if (cii != candidates_count)
2739 // We already have the best candidate, break if thet are different
2741 // Dynamic is never ambiguous as we prefer dynamic over other best candidate types
2743 if (best_candidate != null) {
2745 if (best_candidate == InternalType.Dynamic)
2748 if (bound.Type != InternalType.Dynamic && best_candidate != bound.Type)
2752 best_candidate = bound.Type;
2755 if (best_candidate == null)
2758 unfixed_types[i] = null;
2759 fixed_types[i] = best_candidate;
2764 // Uses inferred or partially infered types to inflate delegate type argument. Returns
2765 // null when type parameter was not yet inferres
2767 public TypeSpec InflateGenericArgument (TypeSpec parameter)
2769 var tp = parameter as TypeParameterSpec;
2772 // Type inference work on generic arguments (MVAR) only
2774 if (!tp.IsMethodOwned)
2777 return fixed_types [tp.DeclaredPosition] ?? parameter;
2780 var gt = parameter as InflatedTypeSpec;
2782 var inflated_targs = new TypeSpec [gt.TypeArguments.Length];
2783 for (int ii = 0; ii < inflated_targs.Length; ++ii) {
2784 var inflated = InflateGenericArgument (gt.TypeArguments [ii]);
2785 if (inflated == null)
2788 inflated_targs[ii] = inflated;
2791 return gt.GetDefinition ().MakeGenericType (inflated_targs);
2798 // Tests whether all delegate input arguments are fixed and generic output type
2799 // requires output type inference
2801 public bool IsReturnTypeNonDependent (ResolveContext ec, MethodSpec invoke, TypeSpec returnType)
2803 if (returnType.IsGenericParameter) {
2804 if (IsFixed (returnType))
2806 } else if (TypeManager.IsGenericType (returnType)) {
2807 if (TypeManager.IsDelegateType (returnType)) {
2808 invoke = Delegate.GetInvokeMethod (ec.Compiler, returnType);
2809 return IsReturnTypeNonDependent (ec, invoke, invoke.ReturnType);
2812 TypeSpec[] g_args = TypeManager.GetTypeArguments (returnType);
2814 // At least one unfixed return type has to exist
2815 if (AllTypesAreFixed (g_args))
2821 // All generic input arguments have to be fixed
2822 AParametersCollection d_parameters = invoke.Parameters;
2823 return AllTypesAreFixed (d_parameters.Types);
2826 bool IsFixed (TypeSpec type)
2828 return IsUnfixed (type) == -1;
2831 int IsUnfixed (TypeSpec type)
2833 if (!type.IsGenericParameter)
2836 //return unfixed_types[type.GenericParameterPosition] != null;
2837 for (int i = 0; i < unfixed_types.Length; ++i) {
2838 if (unfixed_types [i] == type)
2846 // 26.3.3.9 Lower-bound Inference
2848 public int LowerBoundInference (TypeSpec u, TypeSpec v)
2850 return LowerBoundInference (u, v, false);
2854 // Lower-bound (false) or Upper-bound (true) inference based on inversed argument
2856 int LowerBoundInference (TypeSpec u, TypeSpec v, bool inversed)
2858 // If V is one of the unfixed type arguments
2859 int pos = IsUnfixed (v);
2861 AddToBounds (new BoundInfo (u, inversed ? BoundKind.Upper : BoundKind.Lower), pos);
2865 // If U is an array type
2866 var u_ac = u as ArrayContainer;
2868 var v_ac = v as ArrayContainer;
2870 if (u_ac.Rank != v_ac.Rank)
2873 if (TypeManager.IsValueType (u_ac.Element))
2874 return ExactInference (u_ac.Element, v_ac.Element);
2876 return LowerBoundInference (u_ac.Element, v_ac.Element, inversed);
2882 if (TypeManager.IsGenericType (v)) {
2883 TypeSpec g_v = v.GetDefinition ();
2884 if (g_v != TypeManager.generic_ilist_type &&
2885 g_v != TypeManager.generic_icollection_type &&
2886 g_v != TypeManager.generic_ienumerable_type)
2889 var v_i = TypeManager.GetTypeArguments (v) [0];
2890 if (TypeManager.IsValueType (u_ac.Element))
2891 return ExactInference (u_ac.Element, v_i);
2893 return LowerBoundInference (u_ac.Element, v_i);
2895 } else if (TypeManager.IsGenericType (v)) {
2897 // if V is a constructed type C<V1..Vk> and there is a unique type C<U1..Uk>
2898 // such that U is identical to, inherits from (directly or indirectly),
2899 // or implements (directly or indirectly) C<U1..Uk>
2901 var u_candidates = new List<TypeSpec> ();
2902 var open_v = v.MemberDefinition;
2904 for (TypeSpec t = u; t != null; t = t.BaseType) {
2905 if (open_v == t.MemberDefinition)
2906 u_candidates.Add (t);
2908 if (t.Interfaces != null) {
2909 foreach (var iface in t.Interfaces) {
2910 if (open_v == iface.MemberDefinition)
2911 u_candidates.Add (iface);
2916 TypeSpec [] unique_candidate_targs = null;
2917 TypeSpec[] ga_v = TypeManager.GetTypeArguments (v);
2918 foreach (TypeSpec u_candidate in u_candidates) {
2920 // The unique set of types U1..Uk means that if we have an interface I<T>,
2921 // class U : I<int>, I<long> then no type inference is made when inferring
2922 // type I<T> by applying type U because T could be int or long
2924 if (unique_candidate_targs != null) {
2925 TypeSpec[] second_unique_candidate_targs = TypeManager.GetTypeArguments (u_candidate);
2926 if (TypeSpecComparer.Equals (unique_candidate_targs, second_unique_candidate_targs)) {
2927 unique_candidate_targs = second_unique_candidate_targs;
2932 // This should always cause type inference failure
2938 unique_candidate_targs = TypeManager.GetTypeArguments (u_candidate);
2941 if (unique_candidate_targs != null) {
2942 var ga_open_v = open_v.TypeParameters;
2944 for (int i = 0; i < unique_candidate_targs.Length; ++i) {
2945 Variance variance = ga_open_v [i].Variance;
2947 TypeSpec u_i = unique_candidate_targs [i];
2948 if (variance == Variance.None || TypeManager.IsValueType (u_i)) {
2949 if (ExactInference (u_i, ga_v [i]) == 0)
2952 bool upper_bound = (variance == Variance.Contravariant && !inversed) ||
2953 (variance == Variance.Covariant && inversed);
2955 if (LowerBoundInference (u_i, ga_v [i], upper_bound) == 0)
2967 // 26.3.3.6 Output Type Inference
2969 public int OutputTypeInference (ResolveContext ec, Expression e, TypeSpec t)
2971 // If e is a lambda or anonymous method with inferred return type
2972 AnonymousMethodExpression ame = e as AnonymousMethodExpression;
2974 TypeSpec rt = ame.InferReturnType (ec, this, t);
2975 var invoke = Delegate.GetInvokeMethod (ec.Compiler, t);
2978 AParametersCollection pd = invoke.Parameters;
2979 return ame.Parameters.Count == pd.Count ? 1 : 0;
2982 TypeSpec rtype = invoke.ReturnType;
2983 return LowerBoundInference (rt, rtype) + 1;
2987 // if E is a method group and T is a delegate type or expression tree type
2988 // return type Tb with parameter types T1..Tk and return type Tb, and overload
2989 // resolution of E with the types T1..Tk yields a single method with return type U,
2990 // then a lower-bound inference is made from U for Tb.
2992 if (e is MethodGroupExpr) {
2993 if (!TypeManager.IsDelegateType (t)) {
2994 if (TypeManager.expression_type == null || t.MemberDefinition != TypeManager.expression_type.MemberDefinition)
2997 t = TypeManager.GetTypeArguments (t)[0];
3000 var invoke = Delegate.GetInvokeMethod (ec.Compiler, t);
3001 TypeSpec rtype = invoke.ReturnType;
3003 if (!rtype.IsGenericParameter && !TypeManager.IsGenericType (rtype))
3006 // LAMESPEC: Standard does not specify that all methodgroup arguments
3007 // has to be fixed but it does not specify how to do recursive type inference
3008 // either. We choose the simple option and infer return type only
3009 // if all delegate generic arguments are fixed.
3010 TypeSpec[] param_types = new TypeSpec [invoke.Parameters.Count];
3011 for (int i = 0; i < param_types.Length; ++i) {
3012 var inflated = InflateGenericArgument (invoke.Parameters.Types[i]);
3013 if (inflated == null)
3016 param_types[i] = inflated;
3019 MethodGroupExpr mg = (MethodGroupExpr) e;
3020 Arguments args = DelegateCreation.CreateDelegateMethodArguments (invoke.Parameters, param_types, e.Location);
3021 mg = mg.OverloadResolve (ec, ref args, null, OverloadResolver.Restrictions.CovariantDelegate | OverloadResolver.Restrictions.ProbingOnly);
3025 return LowerBoundInference (mg.BestCandidate.ReturnType, rtype) + 1;
3029 // if e is an expression with type U, then
3030 // a lower-bound inference is made from U for T
3032 return LowerBoundInference (e.Type, t) * 2;
3035 void RemoveDependentTypes (List<TypeSpec> types, TypeSpec returnType)
3037 int idx = IsUnfixed (returnType);
3043 if (TypeManager.IsGenericType (returnType)) {
3044 foreach (TypeSpec t in TypeManager.GetTypeArguments (returnType)) {
3045 RemoveDependentTypes (types, t);
3050 public bool UnfixedVariableExists {
3052 if (unfixed_types == null)
3055 foreach (TypeSpec ut in unfixed_types)