// -*- C++ -*-

/* $Id: Top.ipp,v 1.3 1999/03/03 19:09:30 philogelos Exp $ */

/*  src/Top.ipp  */


/*
 * Author: Philogelos A. <Philogelos@yahoo.com>
 * Maintainer: Philogelos A.
 * Keywords: C++, library, containers
 *
 * Copyright (C) 1998 Philogelos A.
 *
 * This file is part of Quercus Robusta.
 *
 * Quercus Robusta is free software; you can redistribute it and/or modify
 * it under the terms of the GNU Library General Public License as published by
 * the Free Software Foundation; either version 2, or (at your option)
 * any later version.
 *
 * This software is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU Library General Public License for more details.
 *
 * You should have received a copy of the GNU Library General Public License
 * along with this software; see the file COPYING.LIB.  If not, write to the
 * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
 * Boston, MA 02111-1307, USA.
 *
 */


#if !defined(__TOP_IPP__)
#define __TOP_IPP__

#include "Top.hpp"
#include "Debug.hpp"
#include "PGuard.hpp"

INLINE Top::Top()
{
#if defined(MEMORY_LEAK_TEST)
  prevInAllocatedChain = lastInAllocatedChain;
  nextInAllocatedChain = nil;
  if( prevInAllocatedChain != null )
	{
	  prevInAllocatedChain -> nextInAllocatedChain = this;
	}

  if( firstInAllocatedChain == null )
	{
	  firstInAllocatedChain = this;
	}
  lastInAllocatedChain = this;

#endif
}

#if defined(MEMORY_LEAK_TEST)
#include "MemoryMonitor.hpp"

INLINE void Top::dumpAllocated()
{
  Top *end;
  Top *point;
  Index count;
  
  end = lastInAllocatedChain;
  point = firstInAllocatedChain;

  
  for( count = 0 ; ( point != nil ) && ( point != end ) ; 
	   point = point -> nextInAllocatedChain, ++count )
	{
	  PGuard _point( point, point );
	  Debug::getLogger() -> logObject( point, &Top::toString );
	}
  Debug::getLogger() -> log( "*** Totally allocated: %li, in %li objects", 
							 MemoryMonitor::amount(), count );
}
#if defined(_INLINE)
#include "../src/MemoryMonitor.ipp"
#endif

#endif

/* __TOP_IPP__ */
#endif

/* $Log: Top.ipp,v $
 * Revision 1.3  1999/03/03 19:09:30  philogelos
 * Put sources under GNU Library License
 *
 * Revision 1.2  1999/02/28 15:59:17  philogelos
 * Tuned for inlines. Static definitions moved out to .cpp
 *
 * Revision 1.1.1.1  1998/11/25 20:11:01  philogelos
 * Quercus Robusta
 *
 * Revision 1.1.1.1  1998/06/22 08:47:12  philogelos
 * First version under CVS
 *
 * Revision 1.1.1.1  1998/04/01 17:15:29  philogelos
 * first version under CVS
 * */