You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
Darwinism/Google.Protobuf/Reflection/DescriptorUtil.vb

62 lines
2.8 KiB

#Region "Copyright notice and license"
' Protocol Buffers - Google's data interchange format
' Copyright 2008 Google Inc. All rights reserved.
' https://developers.google.com/protocol-buffers/
'
' Redistribution and use in source and binary forms, with or without
' modification, are permitted provided that the following conditions are
' met:
'
' * Redistributions of source code must retain the above copyright
' notice, this list of conditions and the following disclaimer.
' * Redistributions in binary form must reproduce the above
' copyright notice, this list of conditions and the following disclaimer
' in the documentation and/or other materials provided with the
' distribution.
' * Neither the name of Google Inc. nor the names of its
' contributors may be used to endorse or promote products derived from
' this software without specific prior written permission.
'
' THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
' "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
' LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
' A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
' OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
' SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
' LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
' DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
' THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
' (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
' OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
#End Region
Imports System.Collections.Generic
Imports System.Collections.ObjectModel
Namespace Google.Protobuf.Reflection
''' <summary>
''' Internal class containing utility methods when working with descriptors.
''' </summary>
Friend Module DescriptorUtil
''' <summary>
''' Equivalent to Func[TInput, int, TOutput] but usable in .NET 2.0. Only used to convert
''' arrays.
''' </summary>
Friend Delegate Function IndexedConverter(Of TInput, TOutput)(element As TInput, index As Integer) As TOutput
''' <summary>
''' Converts the given array into a read-only list, applying the specified conversion to
''' each input element.
''' </summary>
Friend Function ConvertAndMakeReadOnly(Of TInput, TOutput)(input As IList(Of TInput), converter As IndexedConverter(Of TInput, TOutput)) As IList(Of TOutput)
Dim array = New TOutput(input.Count - 1) {}
For i = 0 To array.Length - 1
array(i) = converter(input(i), i)
Next
Return New ReadOnlyCollection(Of TOutput)(array)
End Function
End Module
End Namespace