A single deferred log entry
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| logical, | public | :: | has_module | = | .false. | ||
| logical, | public | :: | has_procedure | = | .false. | ||
| character(len=max_label_len), | public | :: | level | = | ' ' | ||
| character(len=max_message_len), | public | :: | message | = | ' ' | ||
| character(len=max_name_len), | public | :: | module_name | = | ' ' | ||
| character(len=max_name_len), | public | :: | procedure_name | = | ' ' | ||
| logical, | public | :: | truncated | = | .false. |
True if the message or names exceeded their max length |
type, public :: log_entry_type !! A single deferred log entry character(len=max_message_len) :: message = ' ' character(len=max_label_len) :: level = ' ' character(len=max_name_len) :: module_name = ' ' character(len=max_name_len) :: procedure_name = ' ' logical :: has_module = .false. logical :: has_procedure = .false. logical :: truncated = .false. !! True if the message or names exceeded their max length end type log_entry_type