Author: mritvik
Date: 2005-03-21 03:35:45 -0500 (Mon, 21 Mar 2005)
New Revision: 42040
Modified:
trunk/mcs/mbas/Test/tests/ExpressionInstanceMeA.vb
Log:
Made small correction in the test
Modified: trunk/mcs/mbas/Test/tests/ExpressionInstanceMeA.vb
===================================================================
--- trunk/mcs/mbas/Test/tests/ExpressionInstanceMeA.vb 2005-03-21 02:21:36 UTC
(rev 42039)
+++ trunk/mcs/mbas/Test/tests/ExpressionInstanceMeA.vb 2005-03-21 08:35:45 UTC
(rev 42040)
@@ -12,14 +12,14 @@
Public Sub Add
A = Me.y +Me.x
- if A <> 701 Then
+ if A <> 700 Then
Throw New Exception ("Unexpected behavior:: A
should be equal to Me.X + Me.Y=300+400 = 700 but got A=" &A)
End If
- nd Sub
+ End Sub
End Structure
Sub Main()
- im R as New Point (300,400)
+ Dim R as New Point (300,400)
R.Add
End Sub
End Module
_______________________________________________
Mono-patches maillist - [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches