//
// Authors:
// Zoltan Varga (vargaz@gmail.com)
+// Marek Safar (marek.safar@gmail.com)
//
// Copyright (C) 2009 Novell
//
using System;
using System.Collections;
+using System.Collections.Generic;
namespace System
{
- public class Tuple<T1, T2, T3, T4, T5, T6, T7, TRest> : IStructuralEquatable, IStructuralComparable, IComparable
+ public partial class Tuple<T1, T2, T3, T4, T5, T6, T7, TRest>
{
- T1 item1;
- T2 item2;
- T3 item3;
- T4 item4;
- T5 item5;
- T6 item6;
- T7 item7;
- TRest rest;
-
- public Tuple (T1 item1, T2 item2, T3 item3, T4 item4, T5 item5, T6 item6, T7 item7, TRest rest) {
+ public Tuple (T1 item1, T2 item2, T3 item3, T4 item4, T5 item5, T6 item6, T7 item7, TRest rest)
+ {
this.item1 = item1;
this.item2 = item2;
this.item3 = item3;
this.item7 = item7;
this.rest = rest;
- bool ok = true;
- if (!typeof (TRest).IsGenericType)
- ok = false;
- if (ok) {
- Type t = typeof (TRest).GetGenericTypeDefinition ();
- if (!(t == typeof (Tuple<>) || t == typeof (Tuple<,>) || t == typeof (Tuple<,,>) || t == typeof (Tuple<,,,>) || t == typeof (Tuple<,,,,>) || t == typeof (Tuple <,,,,,>) || t == typeof (Tuple<,,,,,,>) || t == typeof (Tuple<,,,,,,,>)))
- ok = false;
- }
- if (!ok)
- throw new ArgumentException ("The last element of an eight element tuple must be a Tuple.");
+ if (!(rest is ITuple))
+ throw new ArgumentException ("rest", "The last element of an eight element tuple must be a Tuple.");
}
+ }
- public T1 Item1 {
- get {
- return item1;
- }
- }
+ interface ITuple
+ {
+ string ToString ();
+ }
- public T2 Item2 {
- get {
- return item2;
- }
- }
+ /* The rest is generated by the script at the bottom */
- public T3 Item3 {
- get {
- return item3;
- }
- }
+ [Serializable]
+ public class Tuple<T1> : IStructuralEquatable, IStructuralComparable, IComparable, ITuple
+ {
+ T1 item1;
- public T4 Item4 {
- get {
- return item4;
- }
+ public Tuple (T1 item1)
+ {
+ this.item1 = item1;
}
- public T5 Item5 {
- get {
- return item5;
- }
+ public T1 Item1 {
+ get { return item1; }
}
- public T6 Item6 {
- get {
- return item6;
- }
+ int IComparable.CompareTo (object obj)
+ {
+ return ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);
}
- public T7 Item7 {
- get {
- return item7;
+ int IStructuralComparable.CompareTo (object other, IComparer comparer)
+ {
+ var t = other as Tuple<T1>;
+ if (t == null) {
+ if (other == null) return 1;
+ throw new ArgumentException ("other");
}
+
+ return comparer.Compare (item1, t.item1);
}
- public TRest Rest {
- get {
- return rest;
- }
+ public override bool Equals (object obj)
+ {
+ return ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);
}
- int IComparable.CompareTo (object other) { throw new NotImplementedException (); }
- int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }
- bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }
- int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }
+ bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)
+ {
+ var t = other as Tuple<T1>;
+ if (t == null)
+ return false;
- [MonoTODO]
- public override string ToString () {
- // FIXME: Merge the items from rest into the parent
- return String.Format ("({0}, {1}, {2}, {3}, {4}, {5}, {6}, {7})", Item1, Item2, Item3, Item4, Item5, Item6, Item7, Rest);
+ return comparer.Equals (item1, t.item1);
}
- }
-
- /* The rest is generated by the script at the bottom */
- public class Tuple<T1> : IStructuralEquatable, IStructuralComparable, IComparable
- {
- T1 item1;
+ public override int GetHashCode ()
+ {
+ return ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);
+ }
- public Tuple (T1 item1) {
- this.item1 = item1;
+ int IStructuralEquatable.GetHashCode (IEqualityComparer comparer)
+ {
+ return comparer.GetHashCode (item1);
}
- public T1 Item1 {
- get {
- return item1;
- }
+
+ string ITuple.ToString ()
+ {
+ return String.Format ("{0}", item1);
}
- [MonoTODO] int IComparable.CompareTo (object other) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }
- public override string ToString () {
- return String.Format ("({0})", Item1);
+
+ public override string ToString ()
+ {
+ return "(" + ((ITuple) this).ToString () + ")";
}
}
- public class Tuple<T1, T2> : IStructuralEquatable, IStructuralComparable, IComparable
+ [Serializable]
+ public class Tuple<T1, T2> : IStructuralEquatable, IStructuralComparable, IComparable, ITuple
{
T1 item1;
T2 item2;
- public Tuple (T1 item1, T2 item2) {
+ public Tuple (T1 item1, T2 item2)
+ {
this.item1 = item1;
this.item2 = item2;
}
+
public T1 Item1 {
- get {
- return item1;
- }
+ get { return item1; }
}
+
public T2 Item2 {
- get {
- return item2;
+ get { return item2; }
+ }
+
+ int IComparable.CompareTo (object obj)
+ {
+ return ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);
+ }
+
+ int IStructuralComparable.CompareTo (object other, IComparer comparer)
+ {
+ var t = other as Tuple<T1, T2>;
+ if (t == null) {
+ if (other == null) return 1;
+ throw new ArgumentException ("other");
}
+
+ int res = comparer.Compare (item1, t.item1);
+ if (res != 0) return res;
+ return comparer.Compare (item2, t.item2);
+ }
+
+ public override bool Equals (object obj)
+ {
+ return ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);
+ }
+
+ bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)
+ {
+ var t = other as Tuple<T1, T2>;
+ if (t == null)
+ return false;
+
+ return comparer.Equals (item1, t.item1) &&
+ comparer.Equals (item2, t.item2);
+ }
+
+ public override int GetHashCode ()
+ {
+ return ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);
+ }
+
+ int IStructuralEquatable.GetHashCode (IEqualityComparer comparer)
+ {
+ int h0;
+ h0 = comparer.GetHashCode (item1);
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item2);
+ return h0;
}
- [MonoTODO] int IComparable.CompareTo (object other) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }
- public override string ToString () {
- return String.Format ("({0}, {1})", Item1, Item2);
+
+ string ITuple.ToString ()
+ {
+ return String.Format ("{0}, {1}", item1, item2);
+ }
+
+ public override string ToString ()
+ {
+ return "(" + ((ITuple) this).ToString () + ")";
}
}
- public class Tuple<T1, T2, T3> : IStructuralEquatable, IStructuralComparable, IComparable
+ [Serializable]
+ public class Tuple<T1, T2, T3> : IStructuralEquatable, IStructuralComparable, IComparable, ITuple
{
T1 item1;
T2 item2;
T3 item3;
- public Tuple (T1 item1, T2 item2, T3 item3) {
+ public Tuple (T1 item1, T2 item2, T3 item3)
+ {
this.item1 = item1;
this.item2 = item2;
this.item3 = item3;
}
+
public T1 Item1 {
- get {
- return item1;
- }
+ get { return item1; }
}
+
public T2 Item2 {
- get {
- return item2;
- }
+ get { return item2; }
}
+
public T3 Item3 {
- get {
- return item3;
+ get { return item3; }
+ }
+
+ int IComparable.CompareTo (object obj)
+ {
+ return ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);
+ }
+
+ int IStructuralComparable.CompareTo (object other, IComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3>;
+ if (t == null) {
+ if (other == null) return 1;
+ throw new ArgumentException ("other");
}
+
+ int res = comparer.Compare (item1, t.item1);
+ if (res != 0) return res;
+ res = comparer.Compare (item2, t.item2);
+ if (res != 0) return res;
+ return comparer.Compare (item3, t.item3);
+ }
+
+ public override bool Equals (object obj)
+ {
+ return ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);
}
- [MonoTODO] int IComparable.CompareTo (object other) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }
- public override string ToString () {
- return String.Format ("({0}, {1}, {2})", Item1, Item2, Item3);
+
+ bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3>;
+ if (t == null)
+ return false;
+
+ return comparer.Equals (item1, t.item1) &&
+ comparer.Equals (item2, t.item2) &&
+ comparer.Equals (item3, t.item3);
+ }
+
+ public override int GetHashCode ()
+ {
+ return ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);
+ }
+
+ int IStructuralEquatable.GetHashCode (IEqualityComparer comparer)
+ {
+ int h0;
+ h0 = comparer.GetHashCode (item1);
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item2);
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item3);
+ return h0;
+ }
+
+ string ITuple.ToString ()
+ {
+ return String.Format ("{0}, {1}, {2}", item1, item2, item3);
+ }
+
+ public override string ToString ()
+ {
+ return "(" + ((ITuple) this).ToString () + ")";
}
}
- public class Tuple<T1, T2, T3, T4> : IStructuralEquatable, IStructuralComparable, IComparable
+ [Serializable]
+ public class Tuple<T1, T2, T3, T4> : IStructuralEquatable, IStructuralComparable, IComparable, ITuple
{
T1 item1;
T2 item2;
T3 item3;
T4 item4;
- public Tuple (T1 item1, T2 item2, T3 item3, T4 item4) {
+ public Tuple (T1 item1, T2 item2, T3 item3, T4 item4)
+ {
this.item1 = item1;
this.item2 = item2;
this.item3 = item3;
this.item4 = item4;
}
+
public T1 Item1 {
- get {
- return item1;
- }
+ get { return item1; }
}
+
public T2 Item2 {
- get {
- return item2;
- }
+ get { return item2; }
}
+
public T3 Item3 {
- get {
- return item3;
- }
+ get { return item3; }
}
+
public T4 Item4 {
- get {
- return item4;
+ get { return item4; }
+ }
+
+ int IComparable.CompareTo (object obj)
+ {
+ return ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);
+ }
+
+ int IStructuralComparable.CompareTo (object other, IComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4>;
+ if (t == null) {
+ if (other == null) return 1;
+ throw new ArgumentException ("other");
}
+
+ int res = comparer.Compare (item1, t.item1);
+ if (res != 0) return res;
+ res = comparer.Compare (item2, t.item2);
+ if (res != 0) return res;
+ res = comparer.Compare (item3, t.item3);
+ if (res != 0) return res;
+ return comparer.Compare (item4, t.item4);
+ }
+
+ public override bool Equals (object obj)
+ {
+ return ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);
+ }
+
+ bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4>;
+ if (t == null)
+ return false;
+
+ return comparer.Equals (item1, t.item1) &&
+ comparer.Equals (item2, t.item2) &&
+ comparer.Equals (item3, t.item3) &&
+ comparer.Equals (item4, t.item4);
+ }
+
+ public override int GetHashCode ()
+ {
+ return ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);
+ }
+
+ int IStructuralEquatable.GetHashCode (IEqualityComparer comparer)
+ {
+ int h0, h1;
+ h0 = comparer.GetHashCode (item1);
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item2);
+ h1 = comparer.GetHashCode (item3);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item4);
+ h0 = (h0 << 5) + h0 ^ h1;
+ return h0;
}
- [MonoTODO] int IComparable.CompareTo (object other) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }
- public override string ToString () {
- return String.Format ("({0}, {1}, {2}, {3})", Item1, Item2, Item3, Item4);
+
+ string ITuple.ToString ()
+ {
+ return String.Format ("{0}, {1}, {2}, {3}", item1, item2, item3, item4);
+ }
+
+ public override string ToString ()
+ {
+ return "(" + ((ITuple) this).ToString () + ")";
}
}
- public class Tuple<T1, T2, T3, T4, T5> : IStructuralEquatable, IStructuralComparable, IComparable
+ [Serializable]
+ public class Tuple<T1, T2, T3, T4, T5> : IStructuralEquatable, IStructuralComparable, IComparable, ITuple
{
T1 item1;
T2 item2;
T4 item4;
T5 item5;
- public Tuple (T1 item1, T2 item2, T3 item3, T4 item4, T5 item5) {
+ public Tuple (T1 item1, T2 item2, T3 item3, T4 item4, T5 item5)
+ {
this.item1 = item1;
this.item2 = item2;
this.item3 = item3;
this.item4 = item4;
this.item5 = item5;
}
+
public T1 Item1 {
- get {
- return item1;
- }
+ get { return item1; }
}
+
public T2 Item2 {
- get {
- return item2;
- }
+ get { return item2; }
}
+
public T3 Item3 {
- get {
- return item3;
- }
+ get { return item3; }
}
+
public T4 Item4 {
- get {
- return item4;
- }
+ get { return item4; }
}
+
public T5 Item5 {
- get {
- return item5;
+ get { return item5; }
+ }
+
+ int IComparable.CompareTo (object obj)
+ {
+ return ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);
+ }
+
+ int IStructuralComparable.CompareTo (object other, IComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4, T5>;
+ if (t == null) {
+ if (other == null) return 1;
+ throw new ArgumentException ("other");
}
+
+ int res = comparer.Compare (item1, t.item1);
+ if (res != 0) return res;
+ res = comparer.Compare (item2, t.item2);
+ if (res != 0) return res;
+ res = comparer.Compare (item3, t.item3);
+ if (res != 0) return res;
+ res = comparer.Compare (item4, t.item4);
+ if (res != 0) return res;
+ return comparer.Compare (item5, t.item5);
+ }
+
+ public override bool Equals (object obj)
+ {
+ return ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);
}
- [MonoTODO] int IComparable.CompareTo (object other) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }
- public override string ToString () {
- return String.Format ("({0}, {1}, {2}, {3}, {4})", Item1, Item2, Item3, Item4, Item5);
+
+ bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4, T5>;
+ if (t == null)
+ return false;
+
+ return comparer.Equals (item1, t.item1) &&
+ comparer.Equals (item2, t.item2) &&
+ comparer.Equals (item3, t.item3) &&
+ comparer.Equals (item4, t.item4) &&
+ comparer.Equals (item5, t.item5);
+ }
+
+ public override int GetHashCode ()
+ {
+ return ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);
+ }
+
+ int IStructuralEquatable.GetHashCode (IEqualityComparer comparer)
+ {
+ int h0, h1;
+ h0 = comparer.GetHashCode (item1);
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item2);
+ h1 = comparer.GetHashCode (item3);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item4);
+ h0 = (h0 << 5) + h0 ^ h1;
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item5);
+ return h0;
+ }
+
+ string ITuple.ToString ()
+ {
+ return String.Format ("{0}, {1}, {2}, {3}, {4}", item1, item2, item3, item4, item5);
+ }
+
+ public override string ToString ()
+ {
+ return "(" + ((ITuple) this).ToString () + ")";
}
}
- public class Tuple<T1, T2, T3, T4, T5, T6> : IStructuralEquatable, IStructuralComparable, IComparable
+ [Serializable]
+ public class Tuple<T1, T2, T3, T4, T5, T6> : IStructuralEquatable, IStructuralComparable, IComparable, ITuple
{
T1 item1;
T2 item2;
T5 item5;
T6 item6;
- public Tuple (T1 item1, T2 item2, T3 item3, T4 item4, T5 item5, T6 item6) {
+ public Tuple (T1 item1, T2 item2, T3 item3, T4 item4, T5 item5, T6 item6)
+ {
this.item1 = item1;
this.item2 = item2;
this.item3 = item3;
this.item5 = item5;
this.item6 = item6;
}
+
public T1 Item1 {
- get {
- return item1;
- }
+ get { return item1; }
}
+
public T2 Item2 {
- get {
- return item2;
- }
+ get { return item2; }
}
+
public T3 Item3 {
- get {
- return item3;
- }
+ get { return item3; }
}
+
public T4 Item4 {
- get {
- return item4;
- }
+ get { return item4; }
}
+
public T5 Item5 {
- get {
- return item5;
- }
+ get { return item5; }
}
+
public T6 Item6 {
- get {
- return item6;
+ get { return item6; }
+ }
+
+ int IComparable.CompareTo (object obj)
+ {
+ return ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);
+ }
+
+ int IStructuralComparable.CompareTo (object other, IComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4, T5, T6>;
+ if (t == null) {
+ if (other == null) return 1;
+ throw new ArgumentException ("other");
}
+
+ int res = comparer.Compare (item1, t.item1);
+ if (res != 0) return res;
+ res = comparer.Compare (item2, t.item2);
+ if (res != 0) return res;
+ res = comparer.Compare (item3, t.item3);
+ if (res != 0) return res;
+ res = comparer.Compare (item4, t.item4);
+ if (res != 0) return res;
+ res = comparer.Compare (item5, t.item5);
+ if (res != 0) return res;
+ return comparer.Compare (item6, t.item6);
+ }
+
+ public override bool Equals (object obj)
+ {
+ return ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);
+ }
+
+ bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4, T5, T6>;
+ if (t == null)
+ return false;
+
+ return comparer.Equals (item1, t.item1) &&
+ comparer.Equals (item2, t.item2) &&
+ comparer.Equals (item3, t.item3) &&
+ comparer.Equals (item4, t.item4) &&
+ comparer.Equals (item5, t.item5) &&
+ comparer.Equals (item6, t.item6);
+ }
+
+ public override int GetHashCode ()
+ {
+ return ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);
+ }
+
+ int IStructuralEquatable.GetHashCode (IEqualityComparer comparer)
+ {
+ int h0, h1;
+ h0 = comparer.GetHashCode (item1);
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item2);
+ h1 = comparer.GetHashCode (item3);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item4);
+ h0 = (h0 << 5) + h0 ^ h1;
+ h1 = comparer.GetHashCode (item5);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item6);
+ h0 = (h0 << 5) + h0 ^ h1;
+ return h0;
}
- [MonoTODO] int IComparable.CompareTo (object other) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }
- public override string ToString () {
- return String.Format ("({0}, {1}, {2}, {3}, {4}, {5})", Item1, Item2, Item3, Item4, Item5, Item6);
+
+ string ITuple.ToString ()
+ {
+ return String.Format ("{0}, {1}, {2}, {3}, {4}, {5}", item1, item2, item3, item4, item5, item6);
+ }
+
+ public override string ToString ()
+ {
+ return "(" + ((ITuple) this).ToString () + ")";
}
}
- public class Tuple<T1, T2, T3, T4, T5, T6, T7> : IStructuralEquatable, IStructuralComparable, IComparable
+ [Serializable]
+ public class Tuple<T1, T2, T3, T4, T5, T6, T7> : IStructuralEquatable, IStructuralComparable, IComparable, ITuple
{
T1 item1;
T2 item2;
T6 item6;
T7 item7;
- public Tuple (T1 item1, T2 item2, T3 item3, T4 item4, T5 item5, T6 item6, T7 item7) {
+ public Tuple (T1 item1, T2 item2, T3 item3, T4 item4, T5 item5, T6 item6, T7 item7)
+ {
this.item1 = item1;
this.item2 = item2;
this.item3 = item3;
this.item6 = item6;
this.item7 = item7;
}
+
public T1 Item1 {
- get {
- return item1;
- }
+ get { return item1; }
}
+
public T2 Item2 {
- get {
- return item2;
- }
+ get { return item2; }
}
+
public T3 Item3 {
- get {
- return item3;
- }
+ get { return item3; }
}
+
public T4 Item4 {
- get {
- return item4;
- }
+ get { return item4; }
}
+
public T5 Item5 {
- get {
- return item5;
- }
+ get { return item5; }
}
+
public T6 Item6 {
- get {
- return item6;
- }
+ get { return item6; }
}
+
public T7 Item7 {
- get {
- return item7;
+ get { return item7; }
+ }
+
+ int IComparable.CompareTo (object obj)
+ {
+ return ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);
+ }
+
+ int IStructuralComparable.CompareTo (object other, IComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4, T5, T6, T7>;
+ if (t == null) {
+ if (other == null) return 1;
+ throw new ArgumentException ("other");
}
+
+ int res = comparer.Compare (item1, t.item1);
+ if (res != 0) return res;
+ res = comparer.Compare (item2, t.item2);
+ if (res != 0) return res;
+ res = comparer.Compare (item3, t.item3);
+ if (res != 0) return res;
+ res = comparer.Compare (item4, t.item4);
+ if (res != 0) return res;
+ res = comparer.Compare (item5, t.item5);
+ if (res != 0) return res;
+ res = comparer.Compare (item6, t.item6);
+ if (res != 0) return res;
+ return comparer.Compare (item7, t.item7);
+ }
+
+ public override bool Equals (object obj)
+ {
+ return ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);
+ }
+
+ bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4, T5, T6, T7>;
+ if (t == null)
+ return false;
+
+ return comparer.Equals (item1, t.item1) &&
+ comparer.Equals (item2, t.item2) &&
+ comparer.Equals (item3, t.item3) &&
+ comparer.Equals (item4, t.item4) &&
+ comparer.Equals (item5, t.item5) &&
+ comparer.Equals (item6, t.item6) &&
+ comparer.Equals (item7, t.item7);
+ }
+
+ public override int GetHashCode ()
+ {
+ return ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);
+ }
+
+ int IStructuralEquatable.GetHashCode (IEqualityComparer comparer)
+ {
+ int h0, h1;
+ h0 = comparer.GetHashCode (item1);
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item2);
+ h1 = comparer.GetHashCode (item3);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item4);
+ h0 = (h0 << 5) + h0 ^ h1;
+ h1 = comparer.GetHashCode (item5);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item6);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item7);
+ h0 = (h0 << 5) + h0 ^ h1;
+ return h0;
}
- [MonoTODO] int IComparable.CompareTo (object other) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }
- [MonoTODO] int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }
- public override string ToString () {
- return String.Format ("({0}, {1}, {2}, {3}, {4}, {5}, {6})", Item1, Item2, Item3, Item4, Item5, Item6, Item7);
+
+ string ITuple.ToString ()
+ {
+ return String.Format ("{0}, {1}, {2}, {3}, {4}, {5}, {6}", item1, item2, item3, item4, item5, item6, item7);
+ }
+
+ public override string ToString ()
+ {
+ return "(" + ((ITuple) this).ToString () + ")";
}
}
+ [Serializable]
+ public partial class Tuple<T1, T2, T3, T4, T5, T6, T7, TRest> : IStructuralEquatable, IStructuralComparable, IComparable, ITuple
+ {
+ T1 item1;
+ T2 item2;
+ T3 item3;
+ T4 item4;
+ T5 item5;
+ T6 item6;
+ T7 item7;
+ TRest rest;
+
+ public T1 Item1 {
+ get { return item1; }
+ }
+
+ public T2 Item2 {
+ get { return item2; }
+ }
+
+ public T3 Item3 {
+ get { return item3; }
+ }
+
+ public T4 Item4 {
+ get { return item4; }
+ }
+
+ public T5 Item5 {
+ get { return item5; }
+ }
+
+ public T6 Item6 {
+ get { return item6; }
+ }
+
+ public T7 Item7 {
+ get { return item7; }
+ }
+
+ public TRest Rest {
+ get { return rest; }
+ }
+
+ int IComparable.CompareTo (object obj)
+ {
+ return ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);
+ }
+
+ int IStructuralComparable.CompareTo (object other, IComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4, T5, T6, T7, TRest>;
+ if (t == null) {
+ if (other == null) return 1;
+ throw new ArgumentException ("other");
+ }
+
+ int res = comparer.Compare (item1, t.item1);
+ if (res != 0) return res;
+ res = comparer.Compare (item2, t.item2);
+ if (res != 0) return res;
+ res = comparer.Compare (item3, t.item3);
+ if (res != 0) return res;
+ res = comparer.Compare (item4, t.item4);
+ if (res != 0) return res;
+ res = comparer.Compare (item5, t.item5);
+ if (res != 0) return res;
+ res = comparer.Compare (item6, t.item6);
+ if (res != 0) return res;
+ res = comparer.Compare (item7, t.item7);
+ if (res != 0) return res;
+ return comparer.Compare (rest, t.rest);
+ }
+
+ public override bool Equals (object obj)
+ {
+ return ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);
+ }
+
+ bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)
+ {
+ var t = other as Tuple<T1, T2, T3, T4, T5, T6, T7, TRest>;
+ if (t == null)
+ return false;
+
+ return comparer.Equals (item1, t.item1) &&
+ comparer.Equals (item2, t.item2) &&
+ comparer.Equals (item3, t.item3) &&
+ comparer.Equals (item4, t.item4) &&
+ comparer.Equals (item5, t.item5) &&
+ comparer.Equals (item6, t.item6) &&
+ comparer.Equals (item7, t.item7) &&
+ comparer.Equals (rest, t.rest);
+ }
+
+ public override int GetHashCode ()
+ {
+ return ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);
+ }
+
+ int IStructuralEquatable.GetHashCode (IEqualityComparer comparer)
+ {
+ int h0, h1, h2;
+ h0 = comparer.GetHashCode (item1);
+ h0 = (h0 << 5) + h0 ^ comparer.GetHashCode (item2);
+ h1 = comparer.GetHashCode (item3);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item4);
+ h0 = (h0 << 5) + h0 ^ h1;
+ h1 = comparer.GetHashCode (item5);
+ h1 = (h1 << 5) + h1 ^ comparer.GetHashCode (item6);
+ h2 = comparer.GetHashCode (item7);
+ h2 = (h2 << 5) + h2 ^ comparer.GetHashCode (rest);
+ h1 = (h1 << 5) + h1 ^ h2;
+ h0 = (h0 << 5) + h0 ^ h1;
+ return h0;
+ }
+
+ string ITuple.ToString ()
+ {
+ return String.Format ("{0}, {1}, {2}, {3}, {4}, {5}, {6}, {7}", item1, item2, item3, item4, item5, item6, item7, ((ITuple)rest).ToString ());
+ }
+
+ public override string ToString ()
+ {
+ return "(" + ((ITuple) this).ToString () + ")";
+ }
+ }
}
//
using System;
+using System.Text;
public class TupleGen
{
public static void Main () {
- for (int arity = 1; arity < 8; ++arity) {
- Console.Write ("\tpublic class Tuple<");
- for (int i = 1; i <= arity; ++i) {
- Console.Write (String.Format ("T{0}", i));
- if (i < arity)
- Console.Write (", ");
- }
- Console.WriteLine ("> : IStructuralEquatable, IStructuralComparable, IComparable");
+ for (int arity = 1; arity < 9; ++arity) {
+ string type_name = GetTypeName (arity);
+
+ Console.WriteLine ("\t[Serializable]");
+ Console.Write ("\tpublic {0}class ", arity < 8 ? null : "partial ");
+ Console.Write (type_name);
+ Console.WriteLine (" : IStructuralEquatable, IStructuralComparable, IComparable, ITuple");
Console.WriteLine ("\t{");
for (int i = 1; i <= arity; ++i)
- Console.WriteLine (String.Format ("\t\tT{0} item{0};", i));
- Console.WriteLine ();
- Console.Write ("\t\tpublic Tuple (");
+ Console.WriteLine ("\t\t{0} {1};", GetItemTypeName (i), GetItemName (i));
+
+ if (arity < 8) {
+ Console.WriteLine ();
+ Console.Write ("\t\tpublic Tuple (");
+ for (int i = 1; i <= arity; ++i) {
+ Console.Write ("{0} {1}", GetItemTypeName (i), GetItemName (i));
+ if (i < arity)
+ Console.Write (", ");
+ }
+ Console.WriteLine (")");
+ Console.WriteLine ("\t\t{");
+ for (int i = 1; i <= arity; ++i)
+ Console.WriteLine ("\t\t\t this.{0} = {0};", GetItemName (i));
+ Console.WriteLine ("\t\t}");
+ }
+
for (int i = 1; i <= arity; ++i) {
- Console.Write (String.Format ("T{0} item{0}", i));
- if (i < arity)
- Console.Write (", ");
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tpublic {0} {1} {{", GetItemTypeName (i),
+ System.Globalization.CultureInfo.InvariantCulture.TextInfo.ToTitleCase (GetItemName (i)));
+ Console.Write ("\t\t\tget { ");
+ Console.WriteLine ("return {0}; }}", GetItemName (i));
+ Console.WriteLine ("\t\t}");
}
- Console.WriteLine (") {");
- for (int i = 1; i <= arity; ++i)
- Console.WriteLine (String.Format ("\t\t\t this.item{0} = item{0};", i));
+
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tint IComparable.CompareTo (object obj)");
+ Console.WriteLine ("\t\t{");
+ Console.WriteLine ("\t\t\treturn ((IStructuralComparable) this).CompareTo (obj, Comparer<object>.Default);");
+ Console.WriteLine ("\t\t}");
+
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tint IStructuralComparable.CompareTo (object other, IComparer comparer)");
+ Console.WriteLine ("\t\t{");
+ Console.WriteLine ("\t\t\tvar t = other as {0};", type_name);
+ Console.WriteLine ("\t\t\tif (t == null) {");
+ Console.WriteLine ("\t\t\t\tif (other == null) return 1;");
+ Console.WriteLine ("\t\t\t\tthrow new ArgumentException (\"other\");");
+ Console.WriteLine ("\t\t\t}");
+ Console.WriteLine ();
+
+ for (int i = 1; i < arity; ++i) {
+ Console.Write ("\t\t\t");
+ if (i == 1)
+ Console.Write ("int ");
+
+ Console.WriteLine ("res = comparer.Compare ({0}, t.{0});", GetItemName (i));
+ Console.WriteLine ("\t\t\tif (res != 0) return res;");
+ }
+ Console.WriteLine ("\t\t\treturn comparer.Compare ({0}, t.{0});", GetItemName (arity));
+ Console.WriteLine ("\t\t}");
+
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tpublic override bool Equals (object obj)");
+ Console.WriteLine ("\t\t{");
+ Console.WriteLine ("\t\t\treturn ((IStructuralEquatable) this).Equals (obj, EqualityComparer<object>.Default);");
Console.WriteLine ("\t\t}");
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tbool IStructuralEquatable.Equals (object other, IEqualityComparer comparer)");
+ Console.WriteLine ("\t\t{");
+ Console.WriteLine ("\t\t\tvar t = other as {0};", type_name);
+ Console.WriteLine ("\t\t\tif (t == null)");
+ Console.WriteLine ("\t\t\t\treturn false;");
+ Console.WriteLine ();
+ Console.Write ("\t\t\treturn");
+
for (int i = 1; i <= arity; ++i) {
- Console.WriteLine (String.Format ("\t\tpublic T{0} Item{0} {{", i));
- Console.WriteLine ("\t\t\tget {");
- Console.WriteLine (String.Format ("\t\t\t\treturn item{0};", i));
- Console.WriteLine ("\t\t\t}");
- Console.WriteLine ("\t\t}");
+ if (i == 1)
+ Console.Write (" ");
+ else
+ Console.Write ("\t\t\t\t");
+
+ Console.Write ("comparer.Equals ({0}, t.{0})", GetItemName (i));
+ if (i != arity)
+ Console.WriteLine (" &&");
+ else
+ Console.WriteLine (";");
+ }
+ Console.WriteLine ("\t\t}");
+
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tpublic override int GetHashCode ()");
+ Console.WriteLine ("\t\t{");
+ Console.WriteLine ("\t\t\treturn ((IStructuralEquatable) this).GetHashCode (EqualityComparer<object>.Default);");
+ Console.WriteLine ("\t\t}");
+
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tint IStructuralEquatable.GetHashCode (IEqualityComparer comparer)");
+ Console.WriteLine ("\t\t{");
+ if (arity == 1) {
+ Console.WriteLine ("\t\t\treturn comparer.GetHashCode ({0});", GetItemName (arity));
+ } else {
+ int varnum = IntLog2 (arity);
+ Console.Write ("\t\t\tint h0");
+ for (int i = 1; i < varnum; ++i)
+ Console.Write (", h{0}", i);
+ Console.WriteLine (";");
+
+ WriteHash (0, 1, arity);
+
+ Console.WriteLine ("\t\t\treturn h0;");
}
- Console.WriteLine ("\t\t[MonoTODO] int IComparable.CompareTo (object other) { throw new NotImplementedException (); }");
- Console.WriteLine ("\t\t[MonoTODO] int IStructuralComparable.CompareTo (object other, IComparer comparer) { throw new NotImplementedException (); }");
- Console.WriteLine ("\t\t[MonoTODO] bool IStructuralEquatable.Equals (object other, IEqualityComparer comparer) { throw new NotImplementedException (); }");
- Console.WriteLine ("\t\t[MonoTODO] int IStructuralEquatable.GetHashCode (IEqualityComparer comparer) { throw new NotImplementedException (); }");
+ Console.WriteLine ("\t\t}");
- Console.WriteLine ("\t\tpublic override string ToString () {");
- Console.Write ("\t\t\treturn String.Format (\"(");
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tstring ITuple.ToString ()");
+ Console.WriteLine ("\t\t{");
+ Console.Write ("\t\t\treturn String.Format (\"");
for (int i = 1; i <= arity; ++i) {
Console.Write ("{" + (i - 1) + "}");
if (i < arity)
Console.Write (", ");
}
- Console.Write (")\", ");
+ Console.Write ("\", ");
for (int i = 1; i <= arity; ++i) {
- Console.Write ("Item" + i);
+ var item_name = GetItemName (i);
+ Console.Write (i == 8 ? "((ITuple){0}).ToString ()" : "{0}", item_name);
if (i < arity)
Console.Write (", ");
}
Console.WriteLine (");");
Console.WriteLine ("\t\t}");
+ Console.WriteLine ();
+ Console.WriteLine ("\t\tpublic override string ToString ()");
+ Console.WriteLine ("\t\t{");
+ Console.WriteLine ("\t\t\treturn \"(\" + ((ITuple) this).ToString () + \")\";");
+ Console.WriteLine ("\t\t}");
+
Console.WriteLine ("\t}\n");
}
}
+
+ static int IntLog2 (int n)
+ {
+ int r = -1;
+
+ while (n != 0) {
+ n >>= 1;
+ r++;
+ }
+
+ return r;
+ }
+
+ static void WriteHash (int destVar, int start, int count)
+ {
+ if (count == 1) {
+ Console.WriteLine ("\t\t\th{0} = comparer.GetHashCode ({1});", destVar, GetItemName (start));
+ } else {
+ int subCount = 1 << IntLog2 (count - 1);
+ WriteHash (destVar, start, subCount);
+ start += subCount;
+ count -= subCount;
+ if (count == 1) {
+ Console.WriteLine ("\t\t\th{0} = (h{0} << 5) + h{0} ^ comparer.GetHashCode ({1});", destVar, GetItemName (start));
+ } else {
+ WriteHash (destVar + 1, start, count);
+ Console.WriteLine ("\t\t\th{0} = (h{0} << 5) + h{0} ^ h{1};", destVar, destVar + 1);
+ }
+ }
+ }
+
+ static string GetTypeName (int arity)
+ {
+ StringBuilder sb = new StringBuilder ();
+ sb.Append ("Tuple<");
+ for (int i = 1; i <= arity; ++i) {
+ sb.Append (GetItemTypeName (i));
+ if (i < arity)
+ sb.Append (", ");
+ }
+ sb.Append (">");
+
+ return sb.ToString ();
+ }
+
+ static string GetItemName (int arity)
+ {
+ return arity < 8 ? "item" + arity.ToString () : "rest";
+ }
+
+ static string GetItemTypeName (int arity)
+ {
+ return arity < 8 ? "T" + arity.ToString () : "TRest";
+ }
}
-#endif
\ No newline at end of file
+
+#endif
projects / mono.git / blobdiff