Revision 1247 trunk/src/linad99/ivector.cpp

ivector.cpp (revision 1247)
26 26
long int farptr_tolong(void *);
27 27

  
28 28
/**
29
 * Description not yet available.
30
 * \param
31
 */
32
 ivector::~ivector()
33
 {
34
   if (shape)
35
   {
36
     if (shape->ncopies)
37
     {
38
       (shape->ncopies)--;
39
     }
40
     else
41
     {
42
       if ( v == NULL)
43
       {
29
Destructor
30
*/
31
ivector::~ivector()
32
{
33
  if (shape)
34
  {
35
    if (shape->ncopies)
36
    {
37
      (shape->ncopies)--;
38
    }
39
    else
40
    {
41
      if ( v == NULL)
42
      {
44 43
         cerr << " Trying to delete NULL pointer in ~ivector\n";
45 44
         ad_exit(21);
46
       }
47
       deallocate();
48
     }
49
   }
50
 }
45
      }
46
      deallocate();
47
    }
48
  }
49
}
51 50

  
52 51
/**
53 52
 * Description not yet available.

Also available in: Unified diff