[svn] r6894: nemerle/trunk/ncc/hierarchy/ClassMembers.n

[VladD2]

Log:
Add diagnostics messages.

Author: VladD2
Date: Wed Nov 15 03:23:42 2006
New Revision: 6894

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

Modified: nemerle/trunk/ncc/hierarchy/ClassMembers.n
==============================================================================
--- nemerle/trunk/ncc/hierarchy/ClassMembers.n	(original)
+++ nemerle/trunk/ncc/hierarchy/ClassMembers.n	Wed Nov 15 03:23:42 2006
@@ -753,7 +753,7 @@
   {
     get
     {
-      System.Diagnostics.Trace.Assert(!(Attributes %&& NemerleAttributes.Abstract));
+      Trace.Assert(!(Attributes %&& NemerleAttributes.Abstract));
       when (_bodyMessages == null)
         _bodyMessages = SCG.List();
 
@@ -784,14 +784,14 @@
     get
     {
       //Trace.WriteLine($"$_indent>>>> ##### BodyTokens ($Name)!");
-      System.Diagnostics.Trace.Assert(!(Attributes %&& NemerleAttributes.Abstract));
-      System.Diagnostics.Trace.Assert(Manager.IsInCompletionMode);
+      Trace.Assert(!(Attributes %&& NemerleAttributes.Abstract));
+      Trace.Assert(Manager.IsInCompletionMode);
       when (_bodyTokens == null)
       {
-        def indent = _indent; _indent += "  ";
+        //def indent = _indent; _indent += "  ";
         Manager.SetCompiletMessages (BodyMessages);
         _bodyTokens = Manager.PreParseMethodBody (this);
-        _indent = indent;
+        //_indent = indent;
       }
 
       //Trace.WriteLine($"$_indent<<<< ##### BodyTokens ($Name)!");
@@ -809,15 +809,15 @@
     get
     {
       //Trace.WriteLine($"$_indent>>>> ##### BodyParsed ($Name)!");
-      System.Diagnostics.Trace.Assert(!(Attributes %&& NemerleAttributes.Abstract));
-      System.Diagnostics.Trace.Assert(Manager.IsInCompletionMode);
+      Trace.Assert(!(Attributes %&& NemerleAttributes.Abstract));
+      Trace.Assert(Manager.IsInCompletionMode);
       when (_bodyParsed == null)
       {
-        def indent = _indent; _indent += "  ";
+        //def indent = _indent; _indent += "  ";
         Manager.SetCompiletMessages (BodyMessages);
         _bodyParsed = MainParser.ParseFunctionBody (Env, Ast.header, BodyTokens);
         fun_header.body = FunBody.Parsed (_bodyParsed);
-        _indent = indent;
+        //_indent = indent;
       }
 
       //Trace.WriteLine($"$_indent<<<< ##### BodyParsed ($Name)!");
@@ -833,11 +833,11 @@
     get
     {
       //Trace.WriteLine($"$_indent>>>> ##### BodyTyped ($Name)!");
-      System.Diagnostics.Trace.Assert(!(Attributes %&& NemerleAttributes.Abstract));
-      System.Diagnostics.Trace.Assert(Manager.IsInCompletionMode);
+      Trace.Assert(!(Attributes %&& NemerleAttributes.Abstract));
+      Trace.Assert(Manager.IsInCompletionMode);
       when (_bodyTyped == null)
       {
-        def indent = _indent; _indent += "  ";
+        //def indent = _indent; _indent += "  ";
         Manager.SetCompiletMessages (BodyMessages);
         try
         {
@@ -846,7 +846,7 @@
           _bodyTyped = (fun_header.body :> FunBody.Typed).expr;
         }
         finally { Manager.SetCompiletMessages (null); }
-        _indent = indent;
+        //_indent = indent;
       }
 
       //Trace.WriteLine($"$_indent<<<< ##### BodyTyped ($Name)!");