[svn] r7518: nemerle/trunk/lib: list.n option.n

nazgul svnadmin at nemerle.org
Mon Mar 5 21:48:13 CET 2007


Log:
Mark option as serializable

Author: nazgul
Date: Mon Mar  5 21:48:11 2007
New Revision: 7518

Modified:
   nemerle/trunk/lib/list.n
   nemerle/trunk/lib/option.n

Modified: nemerle/trunk/lib/list.n
==============================================================================
--- nemerle/trunk/lib/list.n	(original)
+++ nemerle/trunk/lib/list.n	Mon Mar  5 21:48:11 2007
@@ -43,6 +43,8 @@
       from head element and tail.
    */
   [System.Serializable]
+  [Nemerle.MarkOptions (System.Serializable)]  
+  [Nemerle.MarkOptions (DebuggerNonUserCode)]  
   [System.Runtime.InteropServices.ComVisible(false)]
   [DebuggerDisplay("Length = {Length}: {ToString()}"), DebuggerNonUserCode]
   public variant list ['a] : 
@@ -51,12 +53,10 @@
     System.IEquatable ['a]
     // , Nemerle.Collections.ICovariantEnumerable ['a] //unfortunately this is prevented by MS.NET bug
   {
-    [System.Serializable, DebuggerNonUserCode]
     | Cons { hd : 'a;
       [Nemerle.Extensions.CompilerMutable]
       tl : list ['a]; }
 
-    [System.Serializable, DebuggerNonUserCode]
     | Nil { public override ToString () : string { "[]" } }
 
     public override ToString () : string

Modified: nemerle/trunk/lib/option.n
==============================================================================
--- nemerle/trunk/lib/option.n	(original)
+++ nemerle/trunk/lib/option.n	Mon Mar  5 21:48:11 2007
@@ -34,11 +34,11 @@
    * The optional value variant.
    */
   [DebuggerNonUserCode]
+  [Nemerle.MarkOptions (System.Serializable)]    
+  [Nemerle.MarkOptions (DebuggerNonUserCode)]    
   public variant option ['a]
   {
-    [DebuggerNonUserCode]
     | None
-    [DebuggerNonUserCode]
     | Some { val : 'a; }
 
     /**



More information about the svn mailing list