error_has_error Function

private pure function error_has_error(self) result(has_err)

Check if an error is set

Type Bound

error_t

Arguments

Type IntentOptional Attributes Name
class(error_t), intent(in) :: self

Return Value logical


Called by

proc~~error_has_error~~CalledByGraph proc~error_has_error error_t%error_has_error interface~operator(.haserror.) operator(.haserror.) interface~operator(.haserror.)->proc~error_has_error proc~error_fatal error_t%error_fatal proc~error_fatal->proc~error_has_error proc~error_print_trace error_t%error_print_trace proc~error_fatal->proc~error_print_trace proc~error_get_full_trace error_t%error_get_full_trace proc~error_get_full_trace->proc~error_has_error proc~error_print_trace->proc~error_has_error proc~error_wrap error_t%error_wrap proc~error_wrap->proc~error_has_error

Source Code

   pure function error_has_error(self) result(has_err)
      !! Check if an error is set
      class(error_t), intent(in) :: self
      logical :: has_err
      has_err = (self%code /= SUCCESS)
   end function error_has_error