Go to the source code of this file.
|
module | base_hooks |
| Central dispatch for basic hooks.
|
|
|
subroutine, public | base_hooks::cp_abort (location, message) |
| Terminate the program.
|
|
subroutine, public | base_hooks::cp_warn (location, message) |
| Issue a warning.
|
|
subroutine, public | base_hooks::cp_hint (location, message) |
| Issue a hint.
|
|
subroutine, public | base_hooks::timeset (routinen, handle) |
| Start timer.
|
|
subroutine, public | base_hooks::timestop (handle) |
| Stop timer.
|
|
subroutine, public | base_hooks::cp__a (filename, linenr) |
| CPASSERT handler.
|
|
subroutine, public | base_hooks::cp__b (filename, linenr, message) |
| CPABORT handler.
|
|
subroutine, public | base_hooks::cp__w (filename, linenr, message) |
| CPWARN handler.
|
|
subroutine, public | base_hooks::cp__h (filename, linenr, message) |
| CPHINT handler.
|
|
character(len=default_string_length) function, public | base_hooks::cp__l (filename, linenr) |
| Helper routine to assemble LOCATION
|
|
|
procedure(cp_abort_interface), pointer, public | base_hooks::cp_abort_hook => Null() |
|
procedure(cp_warn_interface), pointer, public | base_hooks::cp_warn_hook => Null() |
|
procedure(cp_hint_interface), pointer, public | base_hooks::cp_hint_hook => Null() |
|
procedure(timeset_interface), pointer, public | base_hooks::timeset_hook => Null() |
|
procedure(timestop_interface), pointer, public | base_hooks::timestop_hook => Null() |
|