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() |
| |