2005-08-04 Satya Sudha K <ksathyasudha@novell.com>

[mono.git] / mcs / class / Microsoft.VisualBasic / Test / standalone / 5087.vb

diff --git a/mcs/class/Microsoft.VisualBasic/Test/standalone/5087.vb b/mcs/class/Microsoft.VisualBasic/Test/standalone/5087.vb
index ac671edb7df589b7ba0e1ed5748aa45b63bd58e1..05d234ad770f6c0eea4c7031fa2598d97f12c499 100644 (file)
--- a/mcs/class/Microsoft.VisualBasic/Test/standalone/5087.vb
+++ b/mcs/class/Microsoft.VisualBasic/Test/standalone/5087.vb
@@ -2,7 +2,6 @@
 '
 ' Author:
 '   Roopa Wilson (rowilson@novell.com)
-
 ' Copyright (C) 2004 Novell, Inc (http://www.novell.com)
 '
 ' Permission is hereby granted, free of charge, to any person obtaining
@@ -24,17 +23,16 @@
 ' OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
 ' WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
 '
-
-Imports Microsoft.VisualBasic \r
-Imports System\r
-Public Class TestClass \r
-       Public Function Test() As Integer\r
-               'Begin Code\r
-                       Dim a As Integer =  InStrRev ("", "Hello")\r
-                       If a <> 0 Then\r
-                               Throw New Exception ("Expected 0 got " + a.ToString ())\r
-                       End If\r
-                       Return a\r
-               'End Code\r
-       End Function\r
-End Class\r
+Imports Microsoft.VisualBasic 
+Imports System
+Public Class TestClass 
+       Public Function Test() As Integer
+               'Begin Code
+                       Dim a As Integer =  InStrRev ("", "Hello")
+                       If a <> 0 Then
+                               Throw New Exception ("Expected 0 got " + a.ToString ())
+                       End If
+                       Return a
+               'End Code
+       End Function
+End Class