parquet_get_message_stream Subroutine

public subroutine parquet_get_message_stream(stream)

Reports the current message stream as the same token parquet_set_message_stream accepts.

Arguments

Type IntentOptional Attributes Name
character(len=:), intent(out), allocatable :: stream

"stdout" | "stderr".

Source Code

    subroutine parquet_get_message_stream(stream)
        character(len=:), allocatable, intent(out) :: stream !! "stdout" | "stderr".

        if (cfg_message_stream == stream_stderr) then
            stream = "stderr"
        else
            stream = "stdout"
        end if
    end subroutine parquet_get_message_stream