// $Revision: 1.4 $

    // Copyright (C) 1994-1995 Taligent, Inc. All rights reserved.

#ifndef TaligentSamples_PROTOCOLON
#define TaligentSamples_PROTOCOLON

#ifndef Taligent_COREPRIMITIVECLASSES
#include <Taligent/CorePrimitiveClasses.h>
#endif

#ifndef TaligentSamples_STANDARDFUNCTORON
#include "StandardFunctorOn.h"
#endif


//---- MProtocolOn -----------------------------------------------------------

template<class AType >
class MProtocolOn {
  public:
    TaligentTypeExtensionTemplateDeclarationsMacro_Abstract(MProtocolOn,AType)
  public:
                        MProtocolOn();
    virtual             ~MProtocolOn();
                        
    virtual TStream&    operator>>=(TStream& toStream) const;
    virtual TStream&    operator<<=(TStream& fromStream);
                        
    virtual void        Do(TStandardFunctorOn<AType >& functor) = 0;
    
  private:
    enum {kOriginalVersion};
};

//---- MProtocolOn ---------------------------------------------------------

TaligentTypeExtensionTemplateMacro_Abstract(MProtocolOn,AType)

template<class AType >
MProtocolOn<AType >::MProtocolOn()
{
}

template<class AType >
MProtocolOn<AType >::~MProtocolOn()
{
}

template<class AType >
TStream&
MProtocolOn<AType >::operator>>=(TStream& toStream) const
{
    ::WriteVersion(toStream, kOriginalVersion);
    return toStream;
}

template<class AType >
TStream&
MProtocolOn<AType >::operator<<=(TStream& fromStream)
{
    ::ReadVersion(fromStream, kOriginalVersion, kOriginalVersion);
    return fromStream;
}

#endif