~vbursian/research-assistant/intervers

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
////////////////////////////////////////////////////////////////////////////////
/*! @file TestMemUsage.cpp Трассировка числа элементов сети.
- Part of RANet - Research Assistant Net Library (based on ANSI C++).
- Copyright(C) 1994-2010, Viktor E. Bursian, St.Petersburg, Russia.
                     Viktor.Bursian@mail.ioffe.ru
*///////////////////////////////////////////////////////////////////////////////
#include "TestMemUsage.h"
#include "Log.h"
#include "Attribute.h"
#include "Nodes.h"
namespace RA {
//------------------------------------------------------------------------------

#ifdef RANET_DEBUG

void  TestMemoryUsage (literal   test_memory_usage______comment
                      ,long int  attr_names_expected
                      ,long int  attrs_expected
                      ,long int  ptrs_expected
                      ,long int  nodes_expected
                      )
{
  sString                     T;
  T += test_memory_usage______comment;
  if( sAttrName::Counter != attr_names_expected )
    T += sString("\n\t\t\t\t   sAttrName::Counter=")
        +sString::FromInteger(sAttrName::Counter);
  if( sAttribute::Counter != attrs_expected )
    T += sString("\n\t\t\t\t   sAttribute::Counter=")
        +sString::FromInteger(sAttribute::Counter);
  if( sNodePtr::Counter != ptrs_expected )
    T += sString("\n\t\t\t\t   sNodePtr::Counter=")
        +sString::FromInteger(sNodePtr::Counter);
                               /* NullNode.Redirector
                                 ,NullNodePtr
                                 ,sNet::Manager->Root */
  if( sNode::Counter != nodes_expected )
    T += sString("\n\t\t\t\t   sNode::Counter=")
        +sString::FromInteger(sNode::Counter);
  RANet::Log.Put(sLog::Debug,"MemoryUsage",T);
}

#else

void  TestMemoryUsage (literal
                      ,long int
                      ,long int
                      ,long int
                      ,long int
                      )
{
}

#endif

//------------------------------------------------------------------------------
} //namespace RA