2005-03-23 Ritvik Mayank <mritvik@novell.com>

[mono.git] / mcs / mbas / Test / tests / ParamArrayB.vb

diff --git a/mcs/mbas/Test/tests/ParamArrayB.vb b/mcs/mbas/Test/tests/ParamArrayB.vb
index b1d3c5f2f7e7047677babb5c5dd34b4dd1c78484..f50f63714cf9d11722ddce7ccf500d861fc38f8a 100644 (file)
--- a/mcs/mbas/Test/tests/ParamArrayB.vb
+++ b/mcs/mbas/Test/tests/ParamArrayB.vb
@@ -1,22 +1,22 @@
-'============================================================================================\r
-'Name:Manish Kumar Sinha \r
-'Email Address: manishkumarsinha@sify.com\r
-'Test Case Name: ParamArray:\r
-'APR-1.0.0: ParamArray can be used only on the last argument of argument list. it allows us to 'pass an arbitrary list. It allows us to pass an arbitrary number of argument to the procedure \r
-'=============================================================================================\r
-Imports System\r
-Module PA_1_0_0\r
-   Sub F(ParamArray args() As Integer)\r
-       Dim a as Integer\r
-       a=args.Length\r
-       if a=0\r
-               Throw New System.Exception("#A1, Unexcepted behavoiur of PARAM ARRAY")\r
-       end if\r
-   End Sub\r
-   Sub Main()\r
-      Dim a As Integer() = { 1, 2, 3 }\r
-      F(a)\r
-      F(10, 20, 30, 40)\r
-   End Sub\r
-End Module\r
+'============================================================================================
+'Name:Manish Kumar Sinha 
+'Email Address: manishkumarsinha@sify.com
+'Test Case Name: ParamArray:
+'APR-1.0.0: ParamArray can be used only on the last argument of argument list. it allows us to 'pass an arbitrary list. It allows us to pass an arbitrary number of argument to the procedure 
+'=============================================================================================
+Imports System
+Module PA_1_0_0
+   Sub F(ParamArray args() As Integer)
+       Dim a as Integer
+       a=args.Length
+       if a=0
+               Throw New System.Exception("#A1, Unexcepted behavoiur of PARAM ARRAY")
+       end if
+   End Sub
+   Sub Main()
+      Dim a As Integer() = { 1, 2, 3 }
+      F(a)
+      F(10, 20, 30, 40)
+   End Sub
+End Module
 '=============================================================================================
\ No newline at end of file