s3_log_debug Subroutine

public subroutine s3_log_debug(message)

Log a debug message.

@param[in] message Debug message to log

Arguments

Type	Intent	Optional	Attributes		Name
character(len=*),	intent(in)			::	message

Source Code

    subroutine s3_log_debug(message)
        character(len=*), intent(in) :: message
        if (current_log_level >= S3_LOG_LEVEL_DEBUG) then
            write(*, '(A,A)') '[S3 DEBUG] ', trim(message)
        end if
    end subroutine s3_log_debug