dbcsr_error_handling Module

Module that contains the routines for error handling



Contents


Variables

TypeVisibilityAttributesNameInitial
character(len=*), private, parameter:: moduleN ='dbcsr_error_handling'
integer, public, SAVE:: warning_counter =0

Functions

private function next_linebreak(message, pos, rowlen) result(ibreak)

Helper routine for print_abort_message()

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: message
integer, intent(in) :: pos
integer, intent(in) :: rowlen

Return Value integer


Subroutines

public subroutine dbcsr_error_handling_setup()

Registers handlers with base_hooks.F

Arguments

None

public subroutine dbcsr_abort_handler(location, message)

Abort program with error message

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: location
character(len=*), intent(in) :: message

public subroutine dbcsr_warn_handler(location, message)

Signal a warning

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: location
character(len=*), intent(in) :: message

private subroutine delay_non_master()

Delay non-master ranks/threads, used by dbcsr_abort_handler()

Arguments

None

private subroutine print_abort_message(message, location, output_unit)

Prints a nicely formatted abort message box

Arguments

TypeIntentOptionalAttributesName
character(len=*), intent(in) :: message
character(len=*), intent(in) :: location
integer, intent(in) :: output_unit