mcs/btests/ShiftOperatorsC2.vb

   1 ' BC30201: Expression expected\r
   2 \r
   3 Imports System\r
   4 \r
   5 \r
   6 Module ShiftOperatorsC2\r
   7 \r
   8     Sub Main()\r
   9         Dim a1 As Integer = 20\r
  10         a1 = a1 <<\r
  11         Console.WriteLine(a1)\r
  12 \r
  13         a1 =  << 30\r
  14         Console.WriteLine(a1)\r
  15 \r
  16     End Sub\r
  17 \r
  18 End Module