Index: class/System.XML/System.Xml.Schema/XmlSchema.cs
===================================================================
RCS file: /mono/mcs/class/System.XML/System.Xml.Schema/XmlSchema.cs,v
retrieving revision 1.10
diff -u -r1.10 XmlSchema.cs
--- class/System.XML/System.Xml.Schema/XmlSchema.cs	23 Jul 2002 04:35:29 -0000	1.10
+++ class/System.XML/System.Xml.Schema/XmlSchema.cs	14 Jan 2003 12:07:16 -0000
@@ -164,7 +164,7 @@
 		public string Id 
 		{
 			get{ return id;}
-			set{ id = value;}
+			set{ id = value; isCompiled = false;}
 		}
 		
 		[XmlAnyAttribute]
@@ -183,6 +183,7 @@
 			{ 
 				unhandledAttributes = value; 
 				unhandledAttributeList = null;
+				isCompiled = false;
 			}
 		}
 
@@ -203,7 +204,7 @@
 		public string Language
 		{
 			get{ return  language; }
-			set{ language = value; }
+			set{ language = value; isCompiled = false;}
 		}
 
 		#endregion
@@ -228,6 +229,10 @@
 		[MonoTODO]
 		public void Compile(ValidationEventHandler handler)
 		{
+			// Already compiled?
+			if (IsCompiled)
+				return;
+
 			// Create the xmlschemainfo object which we use to pass variables like targetnamespace;
 			info = new XmlSchemaInfo();
 
@@ -394,6 +399,7 @@
 				}
 			}
 			Validate(handler);
+			isCompiled = true;
 		}
 
 		#endregion