Octopus
debug_oct_m Module Reference

Data Types

type  debug_t
 
interface  debug_verrou_start_instrumentation
 
interface  debug_verrou_stop_instrumentation
 

Functions/Subroutines

subroutine, public debug_init (this, namespace)
 
subroutine, public debug_enable (this)
 
subroutine, public debug_disable (this)
 
subroutine, public debug_delete_trace ()
 
subroutine, public debug_open_trace (iunit)
 
subroutine from_bits (this)
 
subroutine, public epoch_time_diff (sec, usec)
 
subroutine time_diff (sec1, usec1, sec2, usec2)
 Computes t2 <- t2-t1. sec1,2 and usec1,2 are seconds,microseconds of t1,2. More...
 
subroutine, public debug_push_sub (sub_name)
 Push a routine to the debug trace. More...
 
subroutine, public debug_pop_sub (sub_name)
 Pop a routine from the debug trace. More...
 
character(len=max_path_len) function, public debug_clean_path (filename)
 Prune a filename path to only include subdirectories of the "src" directory. More...
 

Variables

type(debug_t), save, public debug
 
integer, parameter unit_offset = 1000
 max_lun is currently 99, i.e. we can hardwire unit_offset above 1000 More...
 

Function/Subroutine Documentation

◆ debug_init()

subroutine, public debug_oct_m::debug_init ( type(debug_t), intent(out)  this,
type(namespace_t), intent(in)  namespace 
)

Definition at line 169 of file debug.F90.

◆ debug_enable()

subroutine, public debug_oct_m::debug_enable ( type(debug_t), intent(inout)  this)

Definition at line 317 of file debug.F90.

◆ debug_disable()

subroutine, public debug_oct_m::debug_disable ( type(debug_t), intent(inout)  this)

Definition at line 332 of file debug.F90.

◆ debug_delete_trace()

subroutine, public debug_oct_m::debug_delete_trace

Definition at line 341 of file debug.F90.

◆ debug_open_trace()

subroutine, public debug_oct_m::debug_open_trace ( integer, intent(out)  iunit)

Definition at line 355 of file debug.F90.

◆ from_bits()

subroutine debug_oct_m::from_bits ( type(debug_t), intent(inout)  this)
private

Definition at line 370 of file debug.F90.

◆ epoch_time_diff()

subroutine, public debug_oct_m::epoch_time_diff ( integer, intent(inout)  sec,
integer, intent(inout)  usec 
)

Definition at line 387 of file debug.F90.

◆ time_diff()

subroutine debug_oct_m::time_diff ( integer, intent(in)  sec1,
integer, intent(in)  usec1,
integer, intent(inout)  sec2,
integer, intent(inout)  usec2 
)
private

Computes t2 <- t2-t1. sec1,2 and usec1,2 are seconds,microseconds of t1,2.

Definition at line 400 of file debug.F90.

◆ debug_push_sub()

subroutine, public debug_oct_m::debug_push_sub ( character(len=*), intent(in)  sub_name)

Push a routine to the debug trace.

Definition at line 428 of file debug.F90.

◆ debug_pop_sub()

subroutine, public debug_oct_m::debug_pop_sub ( character(len=*), intent(in)  sub_name)

Pop a routine from the debug trace.

Definition at line 497 of file debug.F90.

◆ debug_clean_path()

character(len=max_path_len) function, public debug_oct_m::debug_clean_path ( character(len=*), intent(in)  filename)

Prune a filename path to only include subdirectories of the "src" directory.

Definition at line 579 of file debug.F90.

Variable Documentation

◆ debug

type(debug_t), save, public debug_oct_m::debug

Definition at line 154 of file debug.F90.

◆ unit_offset

integer, parameter debug_oct_m::unit_offset = 1000
private

max_lun is currently 99, i.e. we can hardwire unit_offset above 1000

Definition at line 157 of file debug.F90.