Call RegisterDiagnoseBuffer()

master
xieguigang 4 years ago
parent 13075014d8
commit 4e39ff9fe2

@ -1,45 +1,51 @@
#Region "Microsoft.VisualBasic::6899da998f0554355d5fe6b72ae3dc0c, Parallel\Extensions.vb"
' Author:
'
' asuka (amethyst.asuka@gcmodeller.org)
' xie (genetics@smrucc.org)
' xieguigang (xie.guigang@live.com)
'
' Copyright (c) 2018 GPL3 Licensed
'
'
' GNU GENERAL PUBLIC LICENSE (GPL3)
'
'
' This program is free software: you can redistribute it and/or modify
' it under the terms of the GNU General Public License as published by
' the Free Software Foundation, either version 3 of the License, or
' (at your option) any later version.
'
' This program is distributed in the hope that it will be useful,
' but WITHOUT ANY WARRANTY; without even the implied warranty of
' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
' GNU General Public License for more details.
'
' You should have received a copy of the GNU General Public License
' along with this program. If not, see <http://www.gnu.org/licenses/>.
' /********************************************************************************/
' Summaries:
' Module Extensions
'
'
'
' /********************************************************************************/
' Author:
'
' asuka (amethyst.asuka@gcmodeller.org)
' xie (genetics@smrucc.org)
' xieguigang (xie.guigang@live.com)
'
' Copyright (c) 2018 GPL3 Licensed
'
'
' GNU GENERAL PUBLIC LICENSE (GPL3)
'
'
' This program is free software: you can redistribute it and/or modify
' it under the terms of the GNU General Public License as published by
' the Free Software Foundation, either version 3 of the License, or
' (at your option) any later version.
'
' This program is distributed in the hope that it will be useful,
' but WITHOUT ANY WARRANTY; without even the implied warranty of
' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
' GNU General Public License for more details.
'
' You should have received a copy of the GNU General Public License
' along with this program. If not, see <http://www.gnu.org/licenses/>.
' /********************************************************************************/
' Summaries:
' Module Extensions
'
'
'
' /********************************************************************************/
#End Region
Imports Microsoft.VisualBasic.Data.IO.MessagePack
<HideModuleName>
Public Module Extensions
Public Sub RegisterDiagnoseBuffer()
Call MsgPackSerializer.DefaultContext.RegisterSerializer(New Serialization.StackFrameBuffer)
Call MsgPackSerializer.DefaultContext.RegisterSerializer(New Serialization.StackMethodBuffer)
End Sub
End Module

@ -52,7 +52,6 @@
Imports System.IO
Imports System.Runtime.CompilerServices
Imports System.Text
Imports Microsoft.VisualBasic.Data.IO.MessagePack
Imports Microsoft.VisualBasic.ValueTypes
Namespace IpcStream
@ -63,8 +62,7 @@ Namespace IpcStream
Public Delegate Function loadBuffer(buf As Stream) As Object
Sub New()
Call MsgPackSerializer.DefaultContext.RegisterSerializer(New Serialization.StackFrameBuffer)
Call MsgPackSerializer.DefaultContext.RegisterSerializer(New Serialization.StackMethodBuffer)
Call RegisterDiagnoseBuffer()
End Sub
Public Iterator Function PopulatePrimitiveHandles() As IEnumerable(Of (target As Type, emit As toBuffer))

Loading…
Cancel
Save