diff options
Diffstat (limited to 'bindings/swig/swkey.i')
-rw-r--r-- | bindings/swig/swkey.i | 75 |
1 files changed, 0 insertions, 75 deletions
diff --git a/bindings/swig/swkey.i b/bindings/swig/swkey.i deleted file mode 100644 index 2fa3f69..0000000 --- a/bindings/swig/swkey.i +++ /dev/null @@ -1,75 +0,0 @@ -%{ -#include "swkey.h" -#include "versekey.h" -using namespace sword; -%} - -class SW_POSITION { -public: - SW_POSITION(char ipos); -}; - -#define POS_TOP ((char)1) -#define POS_BOTTOM ((char)2) - -#define TOP SW_POSITION(POS_TOP) -#define BOTTOM SW_POSITION(POS_BOTTOM) - -/** -* The SWKey class for the SWIG-Perl interface. -*/ -class SWKey { -public: - SWKey(const char *ikey = 0); - SWKey(SWKey const &k); - virtual SWKey *clone () const; - virtual ~SWKey(); - - char Persist() const; - -%extend { - void setPersist(signed char persists) { - self->Persist(persists); - }; -} - - virtual char Error (); - - virtual void setText(const char *ikey); - virtual const char *getText() const; - virtual const char *getShortText() const; - - virtual int compare (const SWKey & ikey); - virtual bool equals(const SWKey &ikey); - //virtual void setPosition(SW_POSITION); - - virtual void decrement(int steps = 1); - virtual void increment(int steps = 1); - virtual char Traversable (); - - virtual long Index() const; - //virtual long Index(long iindex); - -%extend { - /** - * Goes to the next key. Only useful for VerseKeys at the moment. - */ - void next() { - (*self)++; - }; - void prev() { - (*self)++; - }; - void setKey(const SWKey* key) { - self->copyFrom(*key); - }; - - /** - * We define here some casting functions since Perl etc. don't support casts of pointers. - */ - VerseKey* toVerseKey() { - return dynamic_cast<VerseKey*>(self); - }; -} - -}; |