[svn] r7461: nemerle/trunk/boot/Nemerle.Compiler.dll nemerle/trunk/boot/Nemerle.MSBuild.Tasks.dll nemerle/...

IT svnadmin at nemerle.org
Thu Feb 22 05:32:14 CET 2007


Log:
Made the tuple field names in pascal case.

Author: IT
Date: Thu Feb 22 05:31:57 2007
New Revision: 7461

Modified:
   nemerle/trunk/boot/Nemerle.Compiler.dll
   nemerle/trunk/boot/Nemerle.MSBuild.Tasks.dll
   nemerle/trunk/boot/Nemerle.Macros.dll
   nemerle/trunk/boot/Nemerle.dll
   nemerle/trunk/boot/ncc.exe
   nemerle/trunk/lib/internal-numbered.n
   nemerle/trunk/misc/gen-func.n
   nemerle/trunk/ncc/external/InternalTypes.n
   nemerle/trunk/ncc/generation/DecisionTreeCompiler.n
   vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleMethods.cs
   vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleScanner.cs
   vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleTypeAndMemberDropdownBars .cs

Modified: nemerle/trunk/boot/Nemerle.Compiler.dll
==============================================================================
Binary files. No diff available.

Modified: nemerle/trunk/boot/Nemerle.MSBuild.Tasks.dll
==============================================================================
Binary files. No diff available.

Modified: nemerle/trunk/boot/Nemerle.Macros.dll
==============================================================================
Binary files. No diff available.

Modified: nemerle/trunk/boot/Nemerle.dll
==============================================================================
Binary files. No diff available.

Modified: nemerle/trunk/boot/ncc.exe
==============================================================================
Binary files. No diff available.

Modified: nemerle/trunk/lib/internal-numbered.n
==============================================================================
--- nemerle/trunk/lib/internal-numbered.n	(original)
+++ nemerle/trunk/lib/internal-numbered.n	Thu Feb 22 05:31:57 2007
@@ -86,7 +86,7 @@
 public abstract class Function ['p1, 'p2, 'r] : Function [Tuple ['p1, 'p2], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2) : 'r;
-  public override apply (o : Tuple ['p1, 'p2]) : 'r { apply (o.field0, o.field1) }
+  public override apply (o : Tuple ['p1, 'p2]) : 'r { apply (o.Field0, o.Field1) }
 }
 
 [DebuggerNonUserCode]
@@ -121,7 +121,7 @@
 public abstract class FunctionVoid ['p1, 'p2] : FunctionVoid [Tuple ['p1, 'p2]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2) : void;
-  public override apply_void (o : Tuple ['p1, 'p2]) : void { apply_void (o.field0, o.field1); }
+  public override apply_void (o : Tuple ['p1, 'p2]) : void { apply_void (o.Field0, o.Field1); }
 }
 
 
@@ -130,16 +130,16 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1})"),
+   DebuggerDisplay("({Field0}, {Field1})"),
    StructuralHashCode]
   public struct Tuple ['p0, 'p1]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
     
     public static @: ['t0, 't1] (from : Tuple ['p0, 'p1]) : Tuple ['t0, 't1] where 'p0 : 't0 where 'p1 : 't1 
     {
-        Tuple (from.field0, from.field1)
+        Tuple (from.Field0, from.Field1)
     }
   }
 
@@ -147,7 +147,7 @@
 public abstract class Function ['p1, 'p2, 'p3, 'r] : Function [Tuple ['p1, 'p2, 'p3], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3]) : 'r { apply (o.field0, o.field1, o.field2) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3]) : 'r { apply (o.Field0, o.Field1, o.Field2) }
 }
 
 [DebuggerNonUserCode]
@@ -182,7 +182,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3] : FunctionVoid [Tuple ['p1, 'p2, 'p3]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3]) : void { apply_void (o.field0, o.field1, o.field2); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3]) : void { apply_void (o.Field0, o.Field1, o.Field2); }
 }
 
 
@@ -191,17 +191,17 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2})"),
    StructuralHashCode]
   public struct Tuple ['p0, 'p1, 'p2]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
     
     public static @: ['t0, 't1, 't2] (from : Tuple ['p0, 'p1, 'p2]) : Tuple ['t0, 't1, 't2] where 'p0 : 't0 where 'p1 : 't1 where 'p2 : 't2
     {
-        Tuple (from.field0, from.field1, from.field2)
+        Tuple (from.Field0, from.Field1, from.Field2)
     }
   }
 
@@ -209,7 +209,7 @@
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4]) : 'r { apply (o.field0, o.field1, o.field2, o.field3) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3) }
 }
 
 [DebuggerNonUserCode]
@@ -244,7 +244,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4]) : void { apply_void (o.field0, o.field1, o.field2, o.field3); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3); }
 }
 
 
@@ -253,22 +253,22 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4) }
 }
 
 [DebuggerNonUserCode]
@@ -303,7 +303,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4); }
 }
 
 
@@ -312,23 +312,23 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5) }
 }
 
 [DebuggerNonUserCode]
@@ -363,7 +363,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5); }
 }
 
 
@@ -372,24 +372,24 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6) }
 }
 
 [DebuggerNonUserCode]
@@ -424,7 +424,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6); }
 }
 
 
@@ -433,25 +433,25 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7) }
 }
 
 [DebuggerNonUserCode]
@@ -486,7 +486,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7); }
 }
 
 
@@ -495,26 +495,26 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8) }
 }
 
 [DebuggerNonUserCode]
@@ -549,7 +549,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8); }
 }
 
 
@@ -558,27 +558,27 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9) }
 }
 
 [DebuggerNonUserCode]
@@ -613,7 +613,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9); }
 }
 
 
@@ -622,28 +622,28 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10) }
 }
 
 [DebuggerNonUserCode]
@@ -678,7 +678,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10); }
 }
 
 
@@ -687,29 +687,29 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11) }
 }
 
 [DebuggerNonUserCode]
@@ -744,7 +744,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11); }
 }
 
 
@@ -753,30 +753,30 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12) }
 }
 
 [DebuggerNonUserCode]
@@ -811,7 +811,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12); }
 }
 
 
@@ -820,31 +820,31 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11}, {field12})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11}, {Field12})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
-    public field12 : 'p12;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
+    public Field12 : 'p12;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13) }
 }
 
 [DebuggerNonUserCode]
@@ -879,7 +879,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13); }
 }
 
 
@@ -888,32 +888,32 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11}, {field12}, {field13})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11}, {Field12}, {Field13})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
-    public field12 : 'p12;
-    public field13 : 'p13;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
+    public Field12 : 'p12;
+    public Field13 : 'p13;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14) }
 }
 
 [DebuggerNonUserCode]
@@ -948,7 +948,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14); }
 }
 
 
@@ -957,33 +957,33 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11}, {field12}, {field13}, {field14})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11}, {Field12}, {Field13}, {Field14})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
-    public field12 : 'p12;
-    public field13 : 'p13;
-    public field14 : 'p14;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
+    public Field12 : 'p12;
+    public Field13 : 'p13;
+    public Field14 : 'p14;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15) }
 }
 
 [DebuggerNonUserCode]
@@ -1018,7 +1018,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15); }
 }
 
 
@@ -1027,34 +1027,34 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11}, {field12}, {field13}, {field14}, {field15})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11}, {Field12}, {Field13}, {Field14}, {Field15})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
-    public field12 : 'p12;
-    public field13 : 'p13;
-    public field14 : 'p14;
-    public field15 : 'p15;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
+    public Field12 : 'p12;
+    public Field13 : 'p13;
+    public Field14 : 'p14;
+    public Field15 : 'p15;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16, _ : 'p17) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15, o.field16) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15, o.Field16) }
 }
 
 [DebuggerNonUserCode]
@@ -1089,7 +1089,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16, _ : 'p17) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15, o.field16); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15, o.Field16); }
 }
 
 
@@ -1098,35 +1098,35 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11}, {field12}, {field13}, {field14}, {field15}, {field16})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11}, {Field12}, {Field13}, {Field14}, {Field15}, {Field16})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
-    public field12 : 'p12;
-    public field13 : 'p13;
-    public field14 : 'p14;
-    public field15 : 'p15;
-    public field16 : 'p16;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
+    public Field12 : 'p12;
+    public Field13 : 'p13;
+    public Field14 : 'p14;
+    public Field15 : 'p15;
+    public Field16 : 'p16;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16, _ : 'p17, _ : 'p18) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15, o.field16, o.field17) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15, o.Field16, o.Field17) }
 }
 
 [DebuggerNonUserCode]
@@ -1161,7 +1161,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16, _ : 'p17, _ : 'p18) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15, o.field16, o.field17); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15, o.Field16, o.Field17); }
 }
 
 
@@ -1170,36 +1170,36 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11}, {field12}, {field13}, {field14}, {field15}, {field16}, {field17})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11}, {Field12}, {Field13}, {Field14}, {Field15}, {Field16}, {Field17})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
-    public field12 : 'p12;
-    public field13 : 'p13;
-    public field14 : 'p14;
-    public field15 : 'p15;
-    public field16 : 'p16;
-    public field17 : 'p17;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
+    public Field12 : 'p12;
+    public Field13 : 'p13;
+    public Field14 : 'p14;
+    public Field15 : 'p15;
+    public Field16 : 'p16;
+    public Field17 : 'p17;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16, _ : 'p17, _ : 'p18, _ : 'p19) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15, o.field16, o.field17, o.field18) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15, o.Field16, o.Field17, o.Field18) }
 }
 
 [DebuggerNonUserCode]
@@ -1234,7 +1234,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16, _ : 'p17, _ : 'p18, _ : 'p19) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15, o.field16, o.field17, o.field18); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15, o.Field16, o.Field17, o.Field18); }
 }
 
 
@@ -1243,37 +1243,37 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11}, {field12}, {field13}, {field14}, {field15}, {field16}, {field17}, {field18})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11}, {Field12}, {Field13}, {Field14}, {Field15}, {Field16}, {Field17}, {Field18})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
-    public field12 : 'p12;
-    public field13 : 'p13;
-    public field14 : 'p14;
-    public field15 : 'p15;
-    public field16 : 'p16;
-    public field17 : 'p17;
-    public field18 : 'p18;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
+    public Field12 : 'p12;
+    public Field13 : 'p13;
+    public Field14 : 'p14;
+    public Field15 : 'p15;
+    public Field16 : 'p16;
+    public Field17 : 'p17;
+    public Field18 : 'p18;
   }
 
 [DebuggerNonUserCode]
 public abstract class Function ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'p20, 'r] : Function [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'p20], 'r]
 {
   public abstract apply (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16, _ : 'p17, _ : 'p18, _ : 'p19, _ : 'p20) : 'r;
-  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'p20]) : 'r { apply (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15, o.field16, o.field17, o.field18, o.field19) }
+  public override apply (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'p20]) : 'r { apply (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15, o.Field16, o.Field17, o.Field18, o.Field19) }
 }
 
 [DebuggerNonUserCode]
@@ -1308,7 +1308,7 @@
 public abstract class FunctionVoid ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'p20] : FunctionVoid [Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'p20]]
 {
   public abstract apply_void (_ : 'p1, _ : 'p2, _ : 'p3, _ : 'p4, _ : 'p5, _ : 'p6, _ : 'p7, _ : 'p8, _ : 'p9, _ : 'p10, _ : 'p11, _ : 'p12, _ : 'p13, _ : 'p14, _ : 'p15, _ : 'p16, _ : 'p17, _ : 'p18, _ : 'p19, _ : 'p20) : void;
-  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'p20]) : void { apply_void (o.field0, o.field1, o.field2, o.field3, o.field4, o.field5, o.field6, o.field7, o.field8, o.field9, o.field10, o.field11, o.field12, o.field13, o.field14, o.field15, o.field16, o.field17, o.field18, o.field19); }
+  public override apply_void (o : Tuple ['p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19, 'p20]) : void { apply_void (o.Field0, o.Field1, o.Field2, o.Field3, o.Field4, o.Field5, o.Field6, o.Field7, o.Field8, o.Field9, o.Field10, o.Field11, o.Field12, o.Field13, o.Field14, o.Field15, o.Field16, o.Field17, o.Field18, o.Field19); }
 }
 
 
@@ -1317,32 +1317,31 @@
    StructuralEquality,
    TupleToString,
    DebuggerNonUserCode,
-   DebuggerDisplay("({field0}, {field1}, {field2}, {field3}, {field4}, {field5}, {field6}, {field7}, {field8}, {field9}, {field10}, {field11}, {field12}, {field13}, {field14}, {field15}, {field16}, {field17}, {field18}, {field19})"),
+   DebuggerDisplay("({Field0}, {Field1}, {Field2}, {Field3}, {Field4}, {Field5}, {Field6}, {Field7}, {Field8}, {Field9}, {Field10}, {Field11}, {Field12}, {Field13}, {Field14}, {Field15}, {Field16}, {Field17}, {Field18}, {Field19})"),
    StructuralHashCode,
    DisableImplicitConstructor]
   public sealed class Tuple ['p0, 'p1, 'p2, 'p3, 'p4, 'p5, 'p6, 'p7, 'p8, 'p9, 'p10, 'p11, 'p12, 'p13, 'p14, 'p15, 'p16, 'p17, 'p18, 'p19]
   {
-    public field0 : 'p0;
-    public field1 : 'p1;
-    public field2 : 'p2;
-    public field3 : 'p3;
-    public field4 : 'p4;
-    public field5 : 'p5;
-    public field6 : 'p6;
-    public field7 : 'p7;
-    public field8 : 'p8;
-    public field9 : 'p9;
-    public field10 : 'p10;
-    public field11 : 'p11;
-    public field12 : 'p12;
-    public field13 : 'p13;
-    public field14 : 'p14;
-    public field15 : 'p15;
-    public field16 : 'p16;
-    public field17 : 'p17;
-    public field18 : 'p18;
-    public field19 : 'p19;
+    public Field0 : 'p0;
+    public Field1 : 'p1;
+    public Field2 : 'p2;
+    public Field3 : 'p3;
+    public Field4 : 'p4;
+    public Field5 : 'p5;
+    public Field6 : 'p6;
+    public Field7 : 'p7;
+    public Field8 : 'p8;
+    public Field9 : 'p9;
+    public Field10 : 'p10;
+    public Field11 : 'p11;
+    public Field12 : 'p12;
+    public Field13 : 'p13;
+    public Field14 : 'p14;
+    public Field15 : 'p15;
+    public Field16 : 'p16;
+    public Field17 : 'p17;
+    public Field18 : 'p18;
+    public Field19 : 'p19;
   }
-
 }
 

Modified: nemerle/trunk/misc/gen-func.n
==============================================================================
--- nemerle/trunk/misc/gen-func.n	(original)
+++ nemerle/trunk/misc/gen-func.n	Thu Feb 22 05:31:57 2007
@@ -19,9 +19,9 @@
   def parm_refs = tp.Map (fun (_) {
     ++cnt;
     if (g)
-      $ "o.field$cnt"
+      $ "o.Field$cnt"
     else
-      $ "o.field$(cnt + 1)"
+      $ "o.Field$(cnt + 1)"
   }).ToString (", ");
 
   print ("[DebuggerNonUserCode]\n");
@@ -117,7 +117,7 @@
     }
    
     def tp = cnt_to_list (x => "'p" + x.ToString ()).ToString (", ");
-    def dbgr_flds = cnt_to_list (x => "{field" + x.ToString () + "}").ToString (", ");
+    def dbgr_flds = cnt_to_list (x => "{Field" + x.ToString () + "}").ToString (", ");
    
     print(@"
   [System.Serializable,
@@ -131,7 +131,7 @@
   {
 ");
     for (mutable i = 0; i < k; ++i)
-      print ("    public field$i : 'p$i;\n");
+      print ("    public Field$i : 'p$i;\n");
 
     print ("  }\n\n");
  }

Modified: nemerle/trunk/ncc/external/InternalTypes.n
==============================================================================
--- nemerle/trunk/ncc/external/InternalTypes.n	(original)
+++ nemerle/trunk/ncc/external/InternalTypes.n	Thu Feb 22 05:31:57 2007
@@ -268,7 +268,7 @@
 
   get_field (pos : int) : IField
   {
-    match (tycon.LookupMember (sprintf ("field%d", pos - 1))) {
+    match (tycon.LookupMember (sprintf ("Field%d", pos - 1))) {
       | [x] => x :> IField
       | _ => assert (false)
     }

Modified: nemerle/trunk/ncc/generation/DecisionTreeCompiler.n
==============================================================================
--- nemerle/trunk/ncc/generation/DecisionTreeCompiler.n	(original)
+++ nemerle/trunk/ncc/generation/DecisionTreeCompiler.n	Thu Feb 22 05:31:57 2007
@@ -311,7 +311,7 @@
         if (TupleType.IsTupleMember (f)) {
           def len = f.DeclaringType.TyparmsCount;
           mutable pos = int ();
-          Nemerle.IO.sscanf (f.Name, "field%i", pos);
+          Nemerle.IO.sscanf (f.Name, "Field%i", pos);
           TExpr.TupleIndexer (path.Type, val, pos, len)
         } else build_record_field_ref (path.Type, val, f)
     }

Modified: vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleMethods.cs
==============================================================================
--- vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleMethods.cs	(original)
+++ vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleMethods.cs	Thu Feb 22 05:31:57 2007
@@ -52,9 +52,9 @@
 		{
 			Tuple<string,string,string> info = _info.GetParameterInfo(index, parameter);
 
-			name        = info.field0;
-			display     = info.field1;
-			description = info.field2;
+			name        = info.Field0;
+			display     = info.Field1;
+			description = info.Field2;
 		}
 
 		public override string GetName(int index)

Modified: vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleScanner.cs
==============================================================================
--- vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleScanner.cs	(original)
+++ vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleScanner.cs	Thu Feb 22 05:31:57 2007
@@ -112,10 +112,10 @@
 							Tuple<GlobalEnv, TypeBuilder, int, int> ret =
 								project.GetActiveEnv(_source.FileIndex, _currentLine + 1);
 
-							_env          = ret.field0;
-							_type         = ret.field1;
-							_envStartLine = ret.field2 - 1;
-							_envEndLine   = ret.field3 - 1;
+							_env          = ret.Field0;
+							_type         = ret.Field1;
+							_envStartLine = ret.Field2 - 1;
+							_envEndLine   = ret.Field3 - 1;
 						}
 					}
 				}

Modified: vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleTypeAndMemberDropdownBars .cs
==============================================================================
--- vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleTypeAndMemberDropdownBars .cs	(original)
+++ vs-plugin/trunk/Nemerle.VsIntegration/LanguageService/NemerleTypeAndMemberDropdownBars .cs	Thu Feb 22 05:31:57 2007
@@ -58,8 +58,8 @@
 					new SourceTextManager(_source)));
 
 				foreach (Tuple<string,TopDeclaration> decl in decls)
-					if (decl.field1.name is Splicable.Name && decl.field1.name.GetName().context != null)
-						list.Add(new NemerleDropDownMember(decl.field0, decl.field1));
+					if (decl.Field1.name is Splicable.Name && decl.Field1.name.GetName().context != null)
+						list.Add(new NemerleDropDownMember(decl.Field0, decl.Field1));
 
 				list.Sort(delegate(NemerleDropDownMember m1, NemerleDropDownMember m2)
 				{



More information about the svn mailing list