forbear project, definition of element_object.
Bar element class.
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| character(len=:), | public, | allocatable | :: | color_bg | Background color. |
||
| character(len=:), | public, | allocatable | :: | color_fg | Foreground color. |
||
| character(kind=len=:,UCS4), | public, | allocatable | :: | string | Element string. |
||
| character(len=:), | public, | allocatable | :: | style | Style. |
| procedure, private, pass(lhs) :: assign_element | Operator |
| generic, public :: assignment(=) => assign_element | Overload |
| procedure, public, pass(self) :: destroy | Destroy element. |
| procedure, public, pass(self) :: initialize | Initialize element. |
| procedure, public, pass(self) :: output | Return formatted output of element. |
Return formatted output of element.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(element_object), | intent(in) | :: | self | element. |
Formatted output.
Operator =.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(element_object), | intent(inout) | :: | lhs | Left hand side. |
||
| type(element_object), | intent(in) | :: | rhs | Right hand side. |
Destroy element.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(element_object), | intent(inout) | :: | self | element. |
Initialize element.
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(element_object), | intent(inout) | :: | self | element. |
||
| class(*), | intent(in), | optional | :: | string | Element string. |
|
| character(len=*), | intent(in), | optional | :: | color_fg | Foreground color. |
|
| character(len=*), | intent(in), | optional | :: | color_bg | Background color. |
|
| character(len=*), | intent(in), | optional | :: | style | Style. |