Raise error duplicated CLAs passed.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(command_line_argument), | intent(inout) | :: | self |
CLA data. |
||
character(len=*), | intent(in), | optional | :: | switch |
CLA switch name. |
|
character(len=*), | intent(in), | optional | :: | pref |
Prefixing string. |
subroutine raise_error_duplicated_clas(self, switch, pref) !< Raise error duplicated CLAs passed. class(command_line_argument), intent(inout) :: self !< CLA data. character(*), optional, intent(in) :: switch !< CLA switch name. character(*), optional, intent(in) :: pref !< Prefixing string. call self%errored(pref=pref, error=ERROR_DUPLICATED_CLAS, switch=switch) endsubroutine raise_error_duplicated_clas