Author: martin
Date: 2006-04-05 11:25:11 -0400 (Wed, 05 Apr 2006)
New Revision: 59078

Added:
   trunk/debugger/test/testsuite/TestIndexer.cs
Removed:
   trunk/debugger/test/mono-debugger.tests/TestIndexer.exp
Log:
One more test is migrated ....

Deleted: trunk/debugger/test/mono-debugger.tests/TestIndexer.exp
===================================================================
--- trunk/debugger/test/mono-debugger.tests/TestIndexer.exp     2006-04-05 
15:24:29 UTC (rev 59077)
+++ trunk/debugger/test/mono-debugger.tests/TestIndexer.exp     2006-04-05 
15:25:11 UTC (rev 59078)
@@ -1,35 +0,0 @@
-#!/usr/bin/expect -f
-#
-
-source $srcdir/mdb.exp
-
-set bpt_main 30
-set bpt_main_1 32
-
-set file $srcdir/TestIndexer.cs
-mdb_start "TestIndexer.exe"
-mdb_expect_frame 0 "X.Main()" $file $bpt_main
-
-mdb_send "break $bpt_main_1"
-set breakpoint [mdb_expect_breakpoint]
-mdb_send "continue"
-mdb_expect_hit_breakpoint 0 "X.Main()" $breakpoint $file $bpt_main_1
-
-mdb_send_and_expect "p x\[0\]" "(System.String) \"Hello\""
-mdb_send_and_expect "p x\[1\]" "(System.String) \"World\""
-mdb_send_and_expect "p x\[0,\"Berlin\"\]" "(System.String) \"Hello Berlin\""
-
-mdb_send "set x\[0\] = \"Test\""
-mdb_expect_prompt
-
-mdb_send_and_expect "p x\[0\]" "(System.String) \"Test\""
-
-mdb_send "set x\[0,\"Berlin\"] = \"Trier\""
-mdb_expect_line "ERROR: No overload of method `X.x\[\]' has 3 arguments."
-mdb_expect_prompt
-
-mdb_send "continue"
-mdb_expect_line "Test"
-mdb_expect_line "Target exited."
-mdb_expect_prompt
-mdb_send "quit"

Added: trunk/debugger/test/testsuite/TestIndexer.cs
===================================================================
--- trunk/debugger/test/testsuite/TestIndexer.cs        2006-04-05 15:24:29 UTC 
(rev 59077)
+++ trunk/debugger/test/testsuite/TestIndexer.cs        2006-04-05 15:25:11 UTC 
(rev 59078)
@@ -0,0 +1,44 @@
+using System;
+using NUnit.Framework;
+
+using Mono.Debugger;
+using Mono.Debugger.Languages;
+using Mono.Debugger.Frontend;
+
+namespace Mono.Debugger.Tests
+{
+       [TestFixture]
+       public class TestIndexer : TestSuite
+       {
+               public TestIndexer ()
+                       : base ("../test/src/TestIndexer.exe")
+               { }
+
+               [Test]
+               public void Main ()
+               {
+                       Process process = Interpreter.Start ();
+                       Assert.IsTrue (process.IsManaged);
+                       Assert.IsTrue (process.MainThread.IsStopped);
+                       Thread thread = process.MainThread;
+
+                       AssertStopped (thread, "X.Main()", 30);
+
+                       int bpt = AssertBreakpoint ("32");
+                       Execute ("continue");
+                       AssertHitBreakpoint (thread, bpt, "X.Main()", 32);
+
+                       AssertPrint (thread, "x[0]", "(System.String) 
\"Hello\"");
+                       AssertPrint (thread, "x[1]", "(System.String) 
\"World\"");
+                       AssertPrint (thread, "x[0,\"Berlin\"]", 
"(System.String) \"Hello Berlin\"");
+                       Execute ("set x[0] = \"Test\"");
+                       AssertPrint (thread, "x[0]", "(System.String) 
\"Test\"");
+
+                       // FIXME
+                       // Execute ("set x[0,\"Berlin\"] = \"Trier\"");
+                       // AssertDebuggerOutput ("ERROR: No overload of method 
`X.x[]' has 3 arguments.");
+
+                       Execute ("kill");
+               }
+       }
+}

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

Reply via email to