mcs/mbas/Test/tests/typemembers/OptionalParamaters.vb

   1 'Author:
   2 '   V. Sudharsan (vsudharsan@novell.com)
   3 '
   4 ' (C) 2005 Novell, Inc.
   5
   6 Public Enum E
   7         A = 11
   8         B
   9         C
  10 End Enum
  11
  12 Module M
  13         Sub Main()
  14                 fun()
  15         end sub
  16         sub fun(Optional i as E = 1,Optional j as integer = 20)
  17                 if i<>1 or j<>20
  18                         throw new System.Exception("#A1 Not working")
  19                 end if
  20         end sub
  21 End Module