forked from KolibriOS/kolibrios
28 lines
617 B
C++
28 lines
617 B
C++
|
|
#ifndef __arrayclass_h__
|
|
#define __arrayclass_h__
|
|
|
|
#include "yacasbase.h"
|
|
#include "lispobject.h"
|
|
#include "genericobject.h"
|
|
|
|
class ArrayClass : public GenericClass
|
|
{
|
|
public: //required
|
|
ArrayClass(LispInt aSize,LispObject* aInitialItem);
|
|
virtual ~ArrayClass();
|
|
virtual LispChar * Send(LispArgList& aArgList);
|
|
virtual LispChar * TypeName();
|
|
public: //array-specific
|
|
inline LispInt Size();
|
|
inline LispObject* GetElement(LispInt aItem); // TODO: 1-based, ...
|
|
inline void SetElement(LispInt aItem,LispObject* aObject);
|
|
|
|
private:
|
|
LispPtrArray iArray;
|
|
};
|
|
|
|
#include "arrayclass.inl"
|
|
#endif
|
|
|