[svn] r7610: nemerle/trunk/ncc/hierarchy/TypesManager.n

[VladD2]

Log:
Fix bug 905 (VS crashes if there is a cyclic inheritance).
see http://nemerle.org/bugs/view.php?id=905

Author: VladD2
Date: Mon Apr 23 04:52:48 2007
New Revision: 7610

Modified:
   nemerle/trunk/ncc/hierarchy/TypesManager.n

Modified: nemerle/trunk/ncc/hierarchy/TypesManager.n
==============================================================================
--- nemerle/trunk/ncc/hierarchy/TypesManager.n	(original)
+++ nemerle/trunk/ncc/hierarchy/TypesManager.n	Mon Apr 23 04:52:48 2007
@@ -214,10 +214,15 @@
       def working_on = Util.next_id (Manager);
       def done = Util.next_id (Manager);
 
-      def maybe_f (ti : TypeBuilder) {
+      def maybe_f (ti : TypeBuilder)
+      {
+        def ti = ti;
         if (ti.phase == done) ()
-        else if (ti.phase == working_on)
+        else if (ti.phase == working_on) {
+          ti.parent_type = null; // prevent crash the IntelliSense Engine
+          // TODO: Create and report cycle path.
           Message.Error(ti.Location, "type definition for `" + ti.FullName + "' is cyclic")
+        }
         else {
           ti.phase = working_on;
           Util.locate (ti.Location, {