| 1 | #Region "Microsoft.VisualBasic::ca349d6e0759460572ca0507a22010cd, Microsoft.VisualBasic.Core\Language\Value\ByRefValueExtensions.vb" | 
| 2 | |
| 3 |     ' Author: | 
| 4 |     '  | 
| 5 |     '       asuka (amethyst.asuka@gcmodeller.org) | 
| 6 |     '       xie (genetics@smrucc.org) | 
| 7 |     '       xieguigang (xie.guigang@live.com) | 
| 8 |     '  | 
| 9 |     ' Copyright (c) 2018 GPL3 Licensed | 
| 10 |     '  | 
| 11 |     '  | 
| 12 |     ' GNU GENERAL PUBLIC LICENSE (GPL3) | 
| 13 |     '  | 
| 14 |     '  | 
| 15 |     ' This program is free software: you can redistribute it and/or modify | 
| 16 |     ' it under the terms of the GNU General Public License as published by | 
| 17 |     ' the Free Software Foundation, either version 3 of the License, or | 
| 18 |     ' (at your option) any later version. | 
| 19 |     '  | 
| 20 |     ' This program is distributed in the hope that it will be useful, | 
| 21 |     ' but WITHOUT ANY WARRANTY; without even the implied warranty of | 
| 22 |     ' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the | 
| 23 |     ' GNU General Public License for more details. | 
| 24 |     '  | 
| 25 |     ' You should have received a copy of the GNU General Public License | 
| 26 |     ' along with this program. If not, see <http://www.gnu.org/licenses/>. | 
| 27 | |
| 28 | |
| 29 | |
| 30 |     ' /********************************************************************************/ | 
| 31 | |
| 32 |     ' Summaries: | 
| 33 | |
| 34 |     '     Module ByRefValueExtensions | 
| 35 |     '  | 
| 36 |     '         Function: Split | 
| 37 |     '  | 
| 38 |     '  | 
| 39 |     ' /********************************************************************************/ | 
| 40 | |
| 41 | #End Region | 
| 42 | |
| 43 | Imports System.Runtime.CompilerServices | 
| 44 | Imports ByRefString = Microsoft.VisualBasic.Language.Value(Of String) | 
| 45 | |
| 46 | Namespace Language.Values | 
| 47 | |
| 48 |     Public Module ByRefValueExtensions | 
| 49 | |
| 50 |         <MethodImpl(MethodImplOptions.AggressiveInlining)> | 
| 51 |         <Extension> Public Function Split(s As ByRefString, ParamArray delimiter As Char()) As String() | 
| 52 |             Return s.Value.Split(delimiter) | 
| 53 |         End Function | 
| 54 |     End Module | 
| 55 | End Namespace |