[svn] r6938: nemerle/trunk/ncc/hierarchy/TypeBuilder.n

[VladD2]

Log:
Add AstParts property.

Author: VladD2
Date: Sat Nov 18 19:11:14 2006
New Revision: 6938

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

Modified: nemerle/trunk/ncc/hierarchy/TypeBuilder.n
==============================================================================
--- nemerle/trunk/ncc/hierarchy/TypeBuilder.n	(original)
+++ nemerle/trunk/ncc/hierarchy/TypeBuilder.n	Sat Nov 18 19:11:14 2006
@@ -79,6 +79,15 @@
   mutable additional_decls : SCG.List [PT.ClassMember] = null;
   mutable partial_parts : list [PT.TopDeclaration] = [];
   
+  public AstParts : list [PT.TopDeclaration]
+  {
+    get
+    {
+      System.Diagnostics.Trace.Assert(!Manager.IsInCompletionMode);
+      pt_tydecl :: partial_parts
+    }
+  }
+  
   [Accessor (flags = Override)]
   is_enum : bool;
   [Accessor (flags = WantSetter)]