X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mcs%2Fclass%2FMicrosoft.VisualBasic%2FTest%2Fstandalone%2F5062.vb;h=7eb30bfba9091acf52408f7340a18e26e1f800e3;hb=13bbfef28c7175701866862dfd24b1ba044947a1;hp=aa75277c3b7efb50169ffdff607523f9c7c1077a;hpb=3108144fd6ff0314520d7701de2fe1b0b4b99953;p=mono.git

diff --git a/mcs/class/Microsoft.VisualBasic/Test/standalone/5062.vb b/mcs/class/Microsoft.VisualBasic/Test/standalone/5062.vb
index aa75277c3b7..7eb30bfba90 100644
--- a/mcs/class/Microsoft.VisualBasic/Test/standalone/5062.vb
+++ b/mcs/class/Microsoft.VisualBasic/Test/standalone/5062.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,21 +23,20 @@
 ' 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 
-Imports System
-Public Class TestClass 
-	Public Function Test() As Double
-		'Begin Code
-			Dim a As String = Nothing
-			Try
-				Dim d As double = Asc (a)
-				Throw New Exception ("#Asc01")
-			Catch e As Exception
-				If (e.GetType ().ToString ()) <> "System.ArgumentException" Then
-					Throw New Exception ("#Asc01: Expected System.ArgumentException but got " + e.GetType ().ToString ())
-				End If
-			End Try
-		'End Code
-	End Function
-End Class
+Imports Microsoft.VisualBasic 
+Imports System
+Public Class TestClass 
+	Public Function Test() As Double
+		'Begin Code
+			Dim a As String = Nothing
+			Try
+				Dim d As double = Asc (a)
+				Throw New Exception ("#Asc01")
+			Catch e As Exception
+				If (e.GetType ().ToString ()) <> "System.ArgumentException" Then
+					Throw New Exception ("#Asc01: Expected System.ArgumentException but got " + e.GetType ().ToString ())
+				End If
+			End Try
+		'End Code
+	End Function
+End Class