kolibrios/contrib/media/updf/include/genericobject.h

45 lines
1.1 KiB
C
Raw Normal View History

#ifndef __genericobject_h__
#define __genericobject_h__
#include "yacasbase.h"
/// Not used.
/// This class has pure virtual functions, but no derived classes, so
/// it can never be used.
class LispArgList : public YacasBase
{
public:
virtual ~LispArgList();
virtual LispInt NrArguments()=0;
virtual LispChar * GetArgument(LispInt aIndex, LispInt& aLength)=0;
virtual LispBoolean Compare(LispInt aIndex, LispChar * aString)=0;
};
/// Abstract class which can be put inside a LispGenericClass.
class GenericClass : public YacasBase
{
public:
GenericClass() : iReferenceCount(0) {};
virtual ~GenericClass();
virtual LispChar * Send(LispArgList& aArgList)=0;
virtual LispChar * TypeName()=0;
public:
LispInt iReferenceCount; //TODO: perhaps share the method of reference counting with how it is done in other places
};
/* Definition of DYNCAST: either the cast succeeds, or the variable is assigned NULL.
*/
#define DYNCAST(_type,_name,_var,_object) \
_type * _var = NULL ; \
if (_object != NULL) \
{ \
if (StrEqual((_object)->TypeName(),_name)) _var = (_type *)(_object); \
}
#endif