// Copyright: 	Matra-Datavision 1991
// File:	PCollection_AdjacentVerticesIterator.gxx
// Created:	Wed May 29 17:42:37 1991
// Author:	Denis PASCAL
//		<dp>
// Revised by:  Mireille MERCIEN
//              Sep,7 1992

#include <Standard_NoMoreObject.hxx>
#include <Standard_NoSuchObject.hxx>


//---------------------------------------------------------------------------
// Constructor
//---------------------------------------------------------------------------
PCollection_AdjacentVerticesIterator::PCollection_AdjacentVerticesIterator
   (const Handle(PCollection_Vertex)& V):MyEdgeIterator(V->GetFrontEdges())
{
  HasMore = MyEdgeIterator.More();
}

//---------------------------------------------------------------------------
// More
//---------------------------------------------------------------------------
Boolean PCollection_AdjacentVerticesIterator::More () const 
{
  return HasMore;
}


//---------------------------------------------------------------------------
// Next
//---------------------------------------------------------------------------
void PCollection_AdjacentVerticesIterator::Next () 
{
  if (!HasMore) Standard_NoMoreObject::Raise();
  MyEdgeIterator.Next();
  HasMore = MyEdgeIterator.More();
}


//---------------------------------------------------------------------------
// Value
//---------------------------------------------------------------------------
Handle(PCollection_Vertex) PCollection_AdjacentVerticesIterator::Value () const 
{
  if (!HasMore) Standard_NoSuchObject::Raise();
  Handle(PCollection_Edge) AnEdge = MyEdgeIterator.Value();
  return AnEdge->Destination();
}


//---------------------------------------------------------------------------
// Clear
//---------------------------------------------------------------------------
void PCollection_AdjacentVerticesIterator::Clear () 
{
  HasMore = False;
}