mcs/btests/ShadowsB.vb

   1 ' As per MS VB Specification (section 4.3.3)
   2 ' this program should compile.
   3 ' But MS VB compiler 7.0 is unable to compile it.
   4 ' Still I am keeping this in positive test cases
   5 ' May move it later to negative tests section
   6 ' after clarifying it with later versions of MS VB compilers.
   7
   8 ' In derived class if you
   9 ' override a method whithout
  10 ' shadowing or overloading should get shadowed
  11 ' in the derived class by default
  12 ' But it should throw an warning during compilation
  13
  14
  15 Class B
  16     Function F()
  17     End Function
  18
  19     Function F(ByVal i As Integer)
  20     End Function
  21 End Class
  22
  23 Class D
  24     Inherits B
  25
  26     Function F()
  27     End Function
  28 End Class
  29
  30 Module ShadowsB\r
  31     Sub Main()
  32     End Sub\r
  33 \r
  34 End Module\r