dlr bug
[mcs.git] / tests / gtest-variance-5.cs
blobe28e94c4e7954e3a781c17ba08797b0f6e73ae0c
1 // Compiler options: -langversion:future
3 interface ICovariant<out T>
5 T Foo { get; }
8 interface IContravariant<in T>
10 int Bar (T bar);
13 interface IBothVariants <out T1, in T2> : ICovariant<T1>, IContravariant<T2>
17 interface IInvariant <T> : ICovariant<T>, IContravariant<T>
21 class BothVariants <T1, T2> : IBothVariants <T1, T2>
23 public BothVariants (T1 foo)
25 Foo = foo;
28 public T1 Foo { get; private set; }
30 public int Bar (T2 bar)
32 return bar.GetHashCode () ^ Foo.GetHashCode ();
36 class Invariant <T> : IInvariant<T> where T : new()
38 public T Foo { get { return new T (); } }
40 public int Bar (T bar)
42 return bar.GetHashCode ();
46 class A
48 public virtual string Fruit { get { return "Apple"; } }
51 class B : A
53 public override string Fruit { get { return "Banana"; } }
56 class C : B
58 public override string Fruit { get { return "Carrot which I know is not a fruit but you better shut up about it before I cut you"; } }
61 public class Test
63 static int Main ()
65 var b = new B ();
66 var c = new C ();
68 IBothVariants<A, C> both = new BothVariants<B,B> (b);
70 if (both.Bar (c) != (b.GetHashCode () ^ c.GetHashCode ()))
71 return 1;
73 IInvariant<B> neither = new Invariant<B> ();
74 ICovariant<A> co = neither;
75 if (co.Foo.Fruit != "Banana")
76 return 2;
78 IContravariant<C> contra = neither;
79 if (contra.Bar (c) != c.GetHashCode ())
80 return 3;
82 return 0;