AddExtCollectionMessage Derived Type

type, public, extends(AbstractMessage) :: AddExtCollectionMessage


Inherits

type~~addextcollectionmessage~~InheritsGraph type~addextcollectionmessage AddExtCollectionMessage type~abstractmessage AbstractMessage type~addextcollectionmessage->type~abstractmessage

Components

Type Visibility Attributes Name Initial
character(len=:), public, allocatable :: template

Constructor

public interface AddExtCollectionMessage

  • private function new_AddExtCollectionMessage(template) result(message)

    Arguments

    Type IntentOptional Attributes Name
    character(len=*), intent(in) :: template

    Return Value type(AddExtCollectionMessage)


Type-Bound Procedures

procedure, public :: deserialize

  • private subroutine deserialize(this, buffer, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(AddExtCollectionMessage), intent(inout) :: this
    integer, intent(in) :: buffer(:)
    integer, intent(out), optional :: rc

procedure, public :: dispatch

  • private recursive subroutine dispatch(this, visitor, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(AbstractMessage), intent(in) :: this
    class(SurrogateMessageVisitor), intent(inout), target :: visitor
    integer, intent(out), optional :: rc

procedure, public :: get_length

  • private function get_length(this) result(length)

    Arguments

    Type IntentOptional Attributes Name
    class(AddExtCollectionMessage), intent(in) :: this

    Return Value integer

procedure, public, nopass :: get_type_id

  • private function get_type_id() result(type_id)

    Arguments

    None

    Return Value integer

procedure, public :: serialize

  • private subroutine serialize(this, buffer, rc)

    Arguments

    Type IntentOptional Attributes Name
    class(AddExtCollectionMessage), intent(in) :: this
    integer, intent(inout) :: buffer(:)
    integer, intent(out), optional :: rc

Source Code

   type, extends(AbstractMessage) :: AddExtCollectionMessage
      character(len=:), allocatable :: template
   contains
      procedure, nopass :: get_type_id
      procedure :: get_length
      procedure :: serialize
      procedure :: deserialize
   end type AddExtCollectionMessage