logger_t Derived Type

type, public :: logger_t


Contents


Components

TypeVisibilityAttributesNameInitial
integer, private :: logging_level
logical, private :: use_prefix

Type-Bound Procedures

procedure, public, nopass :: error

  • private subroutine error(msg)

    Arguments

    TypeIntentOptionalAttributesName
    character(len=*), intent(in) :: msg

procedure, public :: warning

  • private subroutine warning(this, msg)

    Arguments

    TypeIntentOptionalAttributesName
    class(logger_t), intent(in) :: this
    character(len=*), intent(in) :: msg

procedure, public :: info

  • private subroutine info(this, msg)

    Arguments

    TypeIntentOptionalAttributesName
    class(logger_t), intent(in) :: this
    character(len=*), intent(in) :: msg

procedure, public :: debug

  • private subroutine debug(this, msg)

    Arguments

    TypeIntentOptionalAttributesName
    class(logger_t), intent(in) :: this
    character(len=*), intent(in) :: msg

procedure, public :: initialise

  • private pure subroutine initialise(this)

    Arguments

    TypeIntentOptionalAttributesName
    class(logger_t), intent(inout) :: this

procedure, public :: set_logging_level

  • private pure subroutine set_logging_level(this, logging_level)

    Arguments

    TypeIntentOptionalAttributesName
    class(logger_t), intent(inout) :: this
    integer, intent(in) :: logging_level

procedure, public :: get_logging_level

  • private pure function get_logging_level(this) result(logging_level)

    Arguments

    TypeIntentOptionalAttributesName
    class(logger_t), intent(in) :: this

    Return Value integer

procedure, public :: enable_prefix

  • private pure subroutine enable_prefix(this)

    Arguments

    TypeIntentOptionalAttributesName
    class(logger_t), intent(inout) :: this

procedure, public :: disable_prefix

  • private pure subroutine disable_prefix(this)

    Arguments

    TypeIntentOptionalAttributesName
    class(logger_t), intent(inout) :: this