Option Strict On
Option Explicit On

Namespace Nexamas.UI.Motion

    ''' <summary>
    ''' Diagnostic finding emitted by the motion integration gate.
    ''' </summary>
    Friend NotInheritable Class MASMotionIntegrationFinding

        Friend Sub New(code As String, message As String)
            Me.Code = If(code, String.Empty)
            Me.Message = If(message, String.Empty)
        End Sub

        Friend ReadOnly Property Code As String

        Friend ReadOnly Property Message As String

    End Class

End Namespace