Author: toshok
Date: 2005-04-07 16:26:33 -0400 (Thu, 07 Apr 2005)
New Revision: 42655

Modified:
   trunk/debugger/ChangeLog
   trunk/debugger/frontend/Command.cs
Log:
2005-04-07  Chris Toshok  <[EMAIL PROTECTED]>

        * frontend/Command.cs (DownCommand, UpComand): add support for an
        argument.  in the up case, it increments
        process.CurrentFrameIndex.  In the down case, it decrements.



Modified: trunk/debugger/ChangeLog
===================================================================
--- trunk/debugger/ChangeLog    2005-04-07 20:17:06 UTC (rev 42654)
+++ trunk/debugger/ChangeLog    2005-04-07 20:26:33 UTC (rev 42655)
@@ -1,5 +1,16 @@
+2005-04-07  Chris Toshok  <[EMAIL PROTECTED]>
+
+       * frontend/Command.cs (DownCommand, UpComand): add support for an
+       argument.  in the up case, it increments
+       process.CurrentFrameIndex.  In the down case, it decrements.
+
 2005-04-06  Chris Toshok  <[EMAIL PROTECTED]>
 
+       * backends/ThreadManager.cs (ThreadManager.wait_thread_main):
+       remove the label 'again', as it's never used.
+
+2005-04-06  Chris Toshok  <[EMAIL PROTECTED]>
+
        * backends/SingleSteppingEngine.cs
        (SingleSteppingEngine.Interrupt): let's be a little less flowery,
        shall we?

Modified: trunk/debugger/frontend/Command.cs
===================================================================
--- trunk/debugger/frontend/Command.cs  2005-04-07 20:17:06 UTC (rev 42654)
+++ trunk/debugger/frontend/Command.cs  2005-04-07 20:26:33 UTC (rev 42655)
@@ -918,11 +918,33 @@
 
        public class UpCommand : ProcessCommand, IDocumentableCommand
        {
+               int increment = 1;
+
+               protected override bool DoResolve (ScriptingContext context)
+               {
+                       if (Args != null) {
+                               if (Args.Count != 1) {
+                                       context.Error ("At most one argument 
expected");
+                                       return false;
+                               }
+                       }
+
+                       try {
+                               int i = (int) UInt32.Parse (Argument);;
+                               increment = i;
+                       } catch {
+                               context.Print ("Argument must be a positive 
integer");
+                               return false;
+                       }
+
+                       return true;
+               }
+
                protected override void DoExecute (ScriptingContext context)
                {
                        ProcessHandle process = ResolveProcess (context);
 
-                       process.CurrentFrameIndex++;
+                       process.CurrentFrameIndex += increment;
                        context.Interpreter.Style.PrintFrame (context, 
process.CurrentFrame);
                }
 
@@ -934,11 +956,33 @@
 
        public class DownCommand : ProcessCommand, IDocumentableCommand
        {
+               int decrement = 1;
+
+               protected override bool DoResolve (ScriptingContext context)
+               {
+                       if (Args != null) {
+                               if (Args.Count != 1) {
+                                       context.Error ("At most one argument 
expected");
+                                       return false;
+                               }
+                       }
+
+                       try {
+                               int i = (int) UInt32.Parse (Argument);;
+                               decrement = i;
+                       } catch {
+                               context.Print ("Argument must be a positive 
integer");
+                               return false;
+                       }
+
+                       return true;
+               }
+
                protected override void DoExecute (ScriptingContext context)
                {
                        ProcessHandle process = ResolveProcess (context);
 
-                       process.CurrentFrameIndex--;
+                       process.CurrentFrameIndex -= decrement;
                        context.Interpreter.Style.PrintFrame (context, 
process.CurrentFrame);
                }
 

_______________________________________________
Mono-patches maillist  -  [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches

Reply via email to