Determines if a passed exit_code
instance has the same code
as the passed integer.
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
class(exit_code), | intent(in) | :: | self | |||
integer, | intent(in) | :: | code |
logical function code_matches_integer(self, code)
implicit none
class(exit_code), intent(in) :: self
integer, intent(in) :: code
code_matches_integer = (self%code == code)
end function code_matches_integer