* roottypes.cs: Rename from tree.cs.

[mono.git] / mcs / class / System.XML / System.Xml.Schema / XmlSchemaDatatype.cs

diff --git a/mcs/class/System.XML/System.Xml.Schema/XmlSchemaDatatype.cs b/mcs/class/System.XML/System.Xml.Schema/XmlSchemaDatatype.cs
index 87c724c590de7d7366d6dd4cb2faade0c2a62bbc..751560d988b58ab71933b1b131a4e637b6420986 100644 (file)
--- a/mcs/class/System.XML/System.Xml.Schema/XmlSchemaDatatype.cs
+++ b/mcs/class/System.XML/System.Xml.Schema/XmlSchemaDatatype.cs
@@ -49,7 +49,11 @@ namespace System.Xml.Schema
                }\r
 \r
 #if NET_2_0\r
-               public abstract XmlTypeCode TypeCode { get; }\r
+               public virtual XmlTypeCode TypeCode {\r
+                       // Actually no way to verify default value, since\r
+                       // in .NET 2.0 it cannot be derived externally anymore.\r
+                       get { return XmlTypeCode.None; }\r
+               }\r
 \r
                public virtual XmlSchemaDatatypeVariety Variety {\r
                        get {\r
@@ -75,10 +79,12 @@ namespace System.Xml.Schema
                        throw new NotImplementedException ();\r
                }\r
 \r
-               [MonoTODO]\r
                public virtual bool IsDerivedFrom (XmlSchemaDatatype datatype)\r
                {\r
-                       throw new NotImplementedException ();\r
+                       // It is documented to return always false, but\r
+                       // actually returns true when the argument is for\r
+                       // the same type (and it does not check null argument).\r
+                       return this == datatype;\r
                }\r
 #endif\r
 \r