Commit d32bbcb3 authored by Lorenz Huedepohl's avatar Lorenz Huedepohl
Browse files

These members in node_t where unnecessary

parent 3fe6c3d1
......@@ -83,10 +83,6 @@ module ftimings
integer :: count = 0 ! Number of node_stop calls
type(value_t) :: value ! The actual counter data, see ftimings_values.F90
logical :: is_running = .false. ! .true. if still running
logical :: record_memory = .false. ! If set to .true., record also the current resident set size
#ifdef HAVE_LIBPAPI
logical :: record_flop_counts = .false. ! If set to .true., record also FLOP counts via PAPI calls
#endif
type(node_t), pointer :: firstChild => NULL()
type(node_t), pointer :: lastChild => NULL()
type(node_t), pointer :: parent => NULL()
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment