operator(//) Interface

public interface operator(//)

Module Procedures

private pure function concat_left(lval, code) result(str)

Concatenate an escape code with a string and turn it into an actual escape sequence

Arguments

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

String to add the escape code to
type(ansi_code), intent(in) :: code

Escape sequence

Return Value character(len=:), allocatable

Concatenated string

private pure function concat_right(code, rval) result(str)

Concatenate an escape code with a string and turn it into an actual escape sequence

Arguments

Type IntentOptional Attributes Name
type(ansi_code), intent(in) :: code

Escape sequence
character(len=*), intent(in) :: rval

String to add the escape code to

Return Value character(len=:), allocatable

Concatenated string