Subversion Repositories Kolibri OS

Rev

Blame | Last modification | View Log | RSS feed

  1.  
  2. #ifndef __arrayclass_h__
  3. #define __arrayclass_h__
  4.  
  5. #include "yacasbase.h"
  6. #include "lispobject.h"
  7. #include "genericobject.h"
  8.  
  9. class ArrayClass : public GenericClass
  10. {
  11. public: //required
  12.     ArrayClass(LispInt aSize,LispObject* aInitialItem);
  13.     virtual ~ArrayClass();
  14.     virtual LispChar * Send(LispArgList& aArgList);
  15.     virtual LispChar * TypeName();
  16. public: //array-specific
  17.     inline LispInt Size();
  18.     inline LispObject* GetElement(LispInt aItem); // TODO: 1-based, ...
  19.     inline void SetElement(LispInt aItem,LispObject* aObject);
  20.  
  21. private:
  22.     LispPtrArray iArray;
  23. };
  24.  
  25. #include "arrayclass.inl"
  26. #endif
  27.  
  28.