Author: sudha
Date: 2005-03-28 23:15:58 -0500 (Mon, 28 Mar 2005)
New Revision: 42322
Added:
trunk/mcs/mbas/Test/errors/ArrayC10.vb
trunk/mcs/mbas/Test/errors/ArrayC11.vb
trunk/mcs/mbas/Test/errors/ArrayC7.vb
trunk/mcs/mbas/Test/errors/ArrayC8.vb
trunk/mcs/mbas/Test/errors/ArrayC9.vb
trunk/mcs/mbas/Test/tests/ArrayH.vb
Modified:
trunk/mcs/mbas/Test/ChangeLog
Log:
Testcases for Array Creation expressions - by Sudharsan V
Modified: trunk/mcs/mbas/Test/ChangeLog
===================================================================
--- trunk/mcs/mbas/Test/ChangeLog 2005-03-28 22:02:09 UTC (rev 42321)
+++ trunk/mcs/mbas/Test/ChangeLog 2005-03-29 04:15:58 UTC (rev 42322)
@@ -1,6 +1,12 @@
+2005-03-29 Satya Sudha K <[EMAIL PROTECTED]>
+ Sudharsan V <[EMAIL PROTECTED]>
+
+ * Test cases for Array creation expressions
+
2005-03-18 Manjula GHM <[EMAIL PROTECTED]>
Sudharsan V <[EMAIL PROTECTED]>
- * Test cases for Type members and Like operator
+ * Test cases for Type members and Like operator
+
2005-02-09 Raja R Harinath <[EMAIL PROTECTED]>
* Makefile (SUBDIRS): Add 'rerrors'.
Added: trunk/mcs/mbas/Test/errors/ArrayC10.vb
===================================================================
--- trunk/mcs/mbas/Test/errors/ArrayC10.vb 2005-03-28 22:02:09 UTC (rev
42321)
+++ trunk/mcs/mbas/Test/errors/ArrayC10.vb 2005-03-29 04:15:58 UTC (rev
42322)
@@ -0,0 +1,14 @@
+'Author:
+' V. Sudharsan ([EMAIL PROTECTED])
+'
+' (C) 2005 Novell, Inc.
+
+REM LineNo: 12
+REM ExpectedError: BC30439
+REM ErrorMessage: Constant expression not representable in type 'Integer'.
+
+module m
+ sub main()
+ dim Y(Double.NaN) as integer
+ end sub
+end module
Added: trunk/mcs/mbas/Test/errors/ArrayC11.vb
===================================================================
--- trunk/mcs/mbas/Test/errors/ArrayC11.vb 2005-03-28 22:02:09 UTC (rev
42321)
+++ trunk/mcs/mbas/Test/errors/ArrayC11.vb 2005-03-29 04:15:58 UTC (rev
42322)
@@ -0,0 +1,15 @@
+'Author:
+' V. Sudharsan ([EMAIL PROTECTED])
+'
+' (C) 2005 Novell, Inc.
+
+REM LineNo: 13
+REM ExpectedError: BC30415
+REM ErrorMessage: 'ReDim' cannot change the number of dimensions of an array.
+
+module m
+ sub main()
+ dim Y(2) as integer
+ Redim Y(1,2) as integer
+ end sub
+end module
Added: trunk/mcs/mbas/Test/errors/ArrayC7.vb
===================================================================
--- trunk/mcs/mbas/Test/errors/ArrayC7.vb 2005-03-28 22:02:09 UTC (rev
42321)
+++ trunk/mcs/mbas/Test/errors/ArrayC7.vb 2005-03-29 04:15:58 UTC (rev
42322)
@@ -0,0 +1,15 @@
+'Author:
+' V. Sudharsan ([EMAIL PROTECTED])
+'
+' (C) 2005 Novell, Inc.
+
+REM LineNo: 13
+REM ExpectedError: BC30611
+REM ErrorMessage: Array dimensions cannot have a negative size.
+
+module m
+ sub main()
+ dim x(1,5.3434) as integer
+ dim Y(1,-6) as integer
+ end sub
+end module
Added: trunk/mcs/mbas/Test/errors/ArrayC8.vb
===================================================================
--- trunk/mcs/mbas/Test/errors/ArrayC8.vb 2005-03-28 22:02:09 UTC (rev
42321)
+++ trunk/mcs/mbas/Test/errors/ArrayC8.vb 2005-03-29 04:15:58 UTC (rev
42322)
@@ -0,0 +1,14 @@
+'Author:
+' V. Sudharsan ([EMAIL PROTECTED])
+'
+' (C) 2005 Novell, Inc.
+
+REM LineNo: 12
+REM ExpectedError: BC30036
+REM ErrorMessage: Overflow.
+
+module m
+ sub main()
+ dim Y(1,10000000000000000000) as integer
+ end sub
+end module
Added: trunk/mcs/mbas/Test/errors/ArrayC9.vb
===================================================================
--- trunk/mcs/mbas/Test/errors/ArrayC9.vb 2005-03-28 22:02:09 UTC (rev
42321)
+++ trunk/mcs/mbas/Test/errors/ArrayC9.vb 2005-03-29 04:15:58 UTC (rev
42322)
@@ -0,0 +1,14 @@
+'Author:
+' V. Sudharsan ([EMAIL PROTECTED])
+'
+' (C) 2005 Novell, Inc.
+
+REM LineNo: 12
+REM ExpectedError: BC30672
+REM ErrorMessage: Explicit initialization is not permitted for arrays declared
with explicit bounds.
+
+module m
+ sub main()
+ dim Y(1) as integer = {1}
+ end sub
+end module
Added: trunk/mcs/mbas/Test/tests/ArrayH.vb
===================================================================
--- trunk/mcs/mbas/Test/tests/ArrayH.vb 2005-03-28 22:02:09 UTC (rev 42321)
+++ trunk/mcs/mbas/Test/tests/ArrayH.vb 2005-03-29 04:15:58 UTC (rev 42322)
@@ -0,0 +1,30 @@
+'Author:
+' V. Sudharsan ([EMAIL PROTECTED])
+'
+' (C) 2005 Novell, Inc.
+
+module m
+ sub main()
+ dim a1(3) as integer
+ dim a2(3) as Double
+ dim a3(3) as Byte
+ dim a4(3) as Boolean
+ dim a5(3) as String
+
+ if a1(1) <> 0 then
+ Throw New System.Exception("Integer array not working")
+ End if
+ if a2(1) <> 0 then
+ Throw New System.Exception("Double array not working")
+ End if
+ if a3(1) <> 0 then
+ Throw New System.Exception("Byte array not working")
+ End if
+ if a4(1) <> False then
+ Throw New System.Exception("Boolean array not working")
+ End if
+ if a5(1) <> "" then
+ Throw New System.Exception("String array not working")
+ End if
+ end sub
+end module
_______________________________________________
Mono-patches maillist - [email protected]
http://lists.ximian.com/mailman/listinfo/mono-patches
