X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mcs%2Fclass%2FMicrosoft.VisualBasic%2FTest%2Fstandalone%2F5025.vb;fp=mcs%2Fclass%2FMicrosoft.VisualBasic%2FTest%2Fstandalone%2F5025.vb;h=e0659b445ccafbbe4a6add88ad20172b4d9dc24f;hb=13bbfef28c7175701866862dfd24b1ba044947a1;hp=66443bed46eb8af40a44cb0abc4277ce1905d25a;hpb=3108144fd6ff0314520d7701de2fe1b0b4b99953;p=mono.git diff --git a/mcs/class/Microsoft.VisualBasic/Test/standalone/5025.vb b/mcs/class/Microsoft.VisualBasic/Test/standalone/5025.vb index 66443bed46e..e0659b445cc 100644 --- a/mcs/class/Microsoft.VisualBasic/Test/standalone/5025.vb +++ b/mcs/class/Microsoft.VisualBasic/Test/standalone/5025.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,15 +23,14 @@ ' 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 Integer - 'Begin Code - On Error Resume Next - Err.Raise (-514) - Return Err.Number - 'End Code - End Function -End Class +Imports Microsoft.VisualBasic +Imports System +Public Class TestClass + Public Function Test() As Integer + 'Begin Code + On Error Resume Next + Err.Raise (-514) + Return Err.Number + 'End Code + End Function +End Class