Gecko [ www.jdcpatala.org ]

Name	Size	Permission
boost_shared_ptr.i	20.88 KB	-rw-r--r--
carrays.i	129 B	-rw-r--r--
cmalloc.i	32 B	-rw-r--r--
cpointer.i	33 B	-rw-r--r--
exception.i	130 B	-rw-r--r--
matrix.i	149 B	-rw-r--r--
sciarray.swg	3.69 KB	-rw-r--r--
scibool.swg	3.98 KB	-rw-r--r--
scichar.swg	7.76 KB	-rw-r--r--
scicontainer.swg	10.56 KB	-rw-r--r--
scidouble.swg	3.23 KB	-rw-r--r--
scienum.swg	1.12 KB	-rw-r--r--
sciexception.swg	1.85 KB	-rw-r--r--
scifloat.swg	2.17 KB	-rw-r--r--
sciint.swg	6.21 KB	-rw-r--r--
sciiterators.swg	9.08 KB	-rw-r--r--
scilab.swg	148 B	-rw-r--r--
scilist.swg	1.78 KB	-rw-r--r--
scilong.swg	3.98 KB	-rw-r--r--
scilonglong.swg	2.3 KB	-rw-r--r--
scimacros.swg	266 B	-rw-r--r--
scimatrixbool.swg	4.35 KB	-rw-r--r--
scimatrixchar.swg	5.01 KB	-rw-r--r--
scimatrixdouble.swg	4.48 KB	-rw-r--r--
scimatrixint.swg	4.38 KB	-rw-r--r--
scimisctypes.swg	2.12 KB	-rw-r--r--
scipointer.swg	1.4 KB	-rw-r--r--
sciprimtypes.swg	406 B	-rw-r--r--
scirun.swg	14.51 KB	-rw-r--r--
sciruntime.swg	962 B	-rw-r--r--
scisequence.swg	7.14 KB	-rw-r--r--
scisequencebool.swg	2.69 KB	-rw-r--r--
scisequencedouble.swg	2.75 KB	-rw-r--r--
scisequencefloat.swg	2.72 KB	-rw-r--r--
scisequenceint.swg	2.83 KB	-rw-r--r--
scisequencepointer.swg	2.83 KB	-rw-r--r--
scisequencestring.swg	2.61 KB	-rw-r--r--
scishort.swg	5.76 KB	-rw-r--r--
scisignedchar.swg	5.85 KB	-rw-r--r--
scistdcommon.swg	5.75 KB	-rw-r--r--
scitypemaps.swg	9.96 KB	-rw-r--r--
sciunsignedchar.swg	6.04 KB	-rw-r--r--
sciunsignedint.swg	6.46 KB	-rw-r--r--
sciunsignedlong.swg	1.87 KB	-rw-r--r--
sciunsignedshort.swg	6.11 KB	-rw-r--r--
std_alloc.i	28 B	-rw-r--r--
std_basic_string.i	1.16 KB	-rw-r--r--
std_char_traits.i	33 B	-rw-r--r--
std_common.i	2.28 KB	-rw-r--r--
std_container.i	60 B	-rw-r--r--
std_deque.i	802 B	-rw-r--r--
std_except.i	35 B	-rw-r--r--
std_list.i	783 B	-rw-r--r--
std_map.i	2.4 KB	-rw-r--r--
std_multiset.i	854 B	-rw-r--r--
std_pair.i	768 B	-rw-r--r--
std_set.i	782 B	-rw-r--r--
std_shared_ptr.i	68 B	-rw-r--r--
std_string.i	998 B	-rw-r--r--
std_vector.i	813 B	-rw-r--r--
stl.i	291 B	-rw-r--r--
typemaps.i	1.6 KB	-rw-r--r--

Code Editor : sciiterators.swg

/* -----------------------------------------------------------------------------
 * sciiterators.swg
 *
 * Users can derive form the SciSwigIterator to implement their
 * own iterators. As an example (real one since we use it for STL/STD
 * containers), the template SwigSciIterator_T does the
 * implementation for generic C++ iterators.
 * ----------------------------------------------------------------------------- */

%include <std_common.i>

%fragment("SciSwigIterator","header",fragment="<stddef.h>") {
namespace swig {
  struct stop_iteration {
  };

struct SciSwigIterator {
  private:
    SwigSciObject _seq;

protected:
    SciSwigIterator(SwigSciObject seq) : _seq(seq)
    {
    }

public:
    virtual ~SciSwigIterator() {}

virtual SwigSciObject value() const = 0;

virtual SciSwigIterator *incr(size_t n = 1) = 0;

virtual SciSwigIterator *decr(size_t n = 1)
    {
      throw stop_iteration();
    }

virtual ptrdiff_t distance(const SciSwigIterator &x) const
    {
      throw std::invalid_argument("operation not supported");
    }

virtual bool equal (const SciSwigIterator &x) const
    {
      throw std::invalid_argument("operation not supported");
    }

virtual SciSwigIterator *copy() const = 0;

SwigSciObject next()
    {
      SwigSciObject obj = value();
      incr();
      return obj;
    }

SwigSciObject previous()
    {
      decr();
      return value();
    }

SciSwigIterator *advance(ptrdiff_t n)
    {
      return  (n > 0) ?  incr(n) : decr(-n);
    }

bool operator == (const SciSwigIterator& x)  const
    {
      return equal(x);
    }

bool operator != (const SciSwigIterator& x) const
    {
      return ! operator==(x);
    }

SciSwigIterator* operator ++ () {
      incr();
      return this;
    }

SciSwigIterator* operator -- () {
      decr();
      return this;
    }

SciSwigIterator* operator + (ptrdiff_t n) const
    {
      return copy()->advance(n);
    }

SciSwigIterator* operator - (ptrdiff_t n) const
    {
      return copy()->advance(-n);
    }

ptrdiff_t operator - (const SciSwigIterator& x) const
    {
      return x.distance(*this);
    }

static swig_type_info* descriptor() {
      static int init = 0;
      static swig_type_info* desc = 0;
      if (!init) {
	desc = SWIG_TypeQuery("swig::SciSwigIterator *");
	init = 1;
      }
      return desc;
    }
  };
}
}

%fragment("SwigSciIterator_T","header",fragment="<stddef.h>",fragment="SciSwigIterator",fragment="StdTraits",fragment="StdIteratorTraits") {
namespace swig {
  template<typename OutIterator>
  class SwigSciIterator_T :  public SciSwigIterator
  {
  public:
    typedef OutIterator out_iterator;
    typedef typename std::iterator_traits<out_iterator>::value_type value_type;
    typedef SwigSciIterator_T<out_iterator> self_type;

SwigSciIterator_T(out_iterator curr, SwigSciObject seq)
      : SciSwigIterator(seq), current(curr)
    {
    }

const out_iterator& get_current() const
    {
      return current;
    }

bool equal (const SciSwigIterator &iter) const
    {
      const self_type *iters = dynamic_cast<const self_type *>(&iter);
      if (iters) {
	return (current == iters->get_current());
      } else {
	throw std::invalid_argument("bad iterator type");
      }
    }

ptrdiff_t distance(const SciSwigIterator &iter) const
    {
      const self_type *iters = dynamic_cast<const self_type *>(&iter);
      if (iters) {
	return std::distance(current, iters->get_current());
      } else {
	throw std::invalid_argument("bad iterator type");
      }
    }

protected:
    out_iterator current;
  };

template <class ValueType>
  struct from_oper
  {
    typedef const ValueType& argument_type;
    typedef SwigSciObject result_type;
    result_type operator()(argument_type v) const
    {
      return swig::from(v);
    }
  };

template<typename OutIterator,
	   typename ValueType = typename std::iterator_traits<OutIterator>::value_type,
	   typename FromOper = from_oper<ValueType> >
  class SciSwigIteratorOpen_T :  public SwigSciIterator_T<OutIterator>
  {
  public:
    FromOper from;
    typedef OutIterator out_iterator;
    typedef ValueType value_type;
    typedef SwigSciIterator_T<out_iterator>  base;
    typedef SciSwigIteratorOpen_T<OutIterator, ValueType, FromOper> self_type;

SciSwigIteratorOpen_T(out_iterator curr, SwigSciObject seq)
      : SwigSciIterator_T<OutIterator>(curr, seq)
    {
    }

SwigSciObject value() const {
      return from(static_cast<const value_type&>(*(base::current)));
    }

SciSwigIterator *copy() const
    {
      return new self_type(*this);
    }

SciSwigIterator *incr(size_t n = 1)
    {
      while (n--) {
	++base::current;
      }
      return this;
    }

SciSwigIterator *decr(size_t n = 1)
    {
      while (n--) {
	--base::current;
      }
      return this;
    }
  };

template<typename OutIterator,
	   typename ValueType = typename std::iterator_traits<OutIterator>::value_type,
	   typename FromOper = from_oper<ValueType> >
  class SciSwigIteratorClosed_T :  public SwigSciIterator_T<OutIterator>
  {
  public:
    FromOper from;
    typedef OutIterator out_iterator;
    typedef ValueType value_type;
    typedef SwigSciIterator_T<out_iterator>  base;
    typedef SciSwigIteratorClosed_T<OutIterator, ValueType, FromOper> self_type;

SciSwigIteratorClosed_T(out_iterator curr, out_iterator first, out_iterator last, SwigSciObject seq)
      : SwigSciIterator_T<OutIterator>(curr, seq), begin(first), end(last)
    {
    }

SwigSciObject value() const {
      if (base::current == end) {
	throw stop_iteration();
      } else {
	return from(static_cast<const value_type&>(*(base::current)));
      }
    }

SciSwigIterator *copy() const
    {
      return new self_type(*this);
    }

SciSwigIterator *incr(size_t n = 1)
    {
      while (n--) {
	if (base::current == end) {
	  throw stop_iteration();
	} else {
	  ++base::current;
	}
      }
      return this;
    }

SciSwigIterator *decr(size_t n = 1)
    {
      while (n--) {
	if (base::current == begin) {
	  throw stop_iteration();
	} else {
	  --base::current;
	}
      }
      return this;
    }

private:
    out_iterator begin;
    out_iterator end;
  };

template<typename OutIter>
  inline SciSwigIterator*
  make_output_iterator(const OutIter& current, const OutIter& begin,const OutIter& end, SwigSciObject seq = SwigSciObject())
  {
    return new SciSwigIteratorClosed_T<OutIter>(current, begin, end, seq);
  }

template<typename OutIter>
  inline SciSwigIterator*
  make_output_iterator(const OutIter& current, SwigSciObject seq = SwigSciObject())
  {
    return new SciSwigIteratorOpen_T<OutIter>(current, seq);
  }
}
}

%fragment("SciSwigIterator");
namespace swig
{
// Throw a StopIteration exception
  %ignore stop_iteration;
  struct stop_iteration {};

%typemap(throws, noblock=1) stop_iteration
  {
    SWIG_Scilab_Raise(0, "stop_iteration", NULL);
    return SWIG_ERROR;
  }

// Mark methods that return new objects
  %newobject SciSwigIterator::copy;
  %newobject SciSwigIterator::operator + (ptrdiff_t n) const;
  %newobject SciSwigIterator::operator - (ptrdiff_t n) const;

%nodirector SciSwigIterator;

%catches(swig::stop_iteration) SciSwigIterator::value() const;
  %catches(swig::stop_iteration) SciSwigIterator::incr(size_t n = 1);
  %catches(swig::stop_iteration) SciSwigIterator::decr(size_t n = 1);
  %catches(std::invalid_argument) SciSwigIterator::distance(const SciSwigIterator &x) const;
  %catches(std::invalid_argument) SciSwigIterator::equal (const SciSwigIterator &x) const;
  %catches(swig::stop_iteration) SciSwigIterator::next();
  %catches(swig::stop_iteration) SciSwigIterator::previous();
  %catches(swig::stop_iteration) SciSwigIterator::advance(ptrdiff_t n);
  %catches(swig::stop_iteration) SciSwigIterator::operator += (ptrdiff_t n);
  %catches(swig::stop_iteration) SciSwigIterator::operator -= (ptrdiff_t n);
  %catches(swig::stop_iteration) SciSwigIterator::operator + (ptrdiff_t n) const;
  %catches(swig::stop_iteration) SciSwigIterator::operator - (ptrdiff_t n) const;

%ignore SciSwigIterator::operator==;
  %ignore SciSwigIterator::operator!=;
  %ignore SciSwigIterator::operator++;
  %ignore SciSwigIterator::operator--;
  %ignore SciSwigIterator::operator+;
  %ignore SciSwigIterator::operator-;

struct SciSwigIterator
  {
  protected:
    SciSwigIterator(SwigSciObject seq);

public:
    virtual ~SciSwigIterator();

virtual SwigSciObject value() const = 0;

virtual SciSwigIterator *incr(size_t n = 1) = 0;

virtual SciSwigIterator *decr(size_t n = 1);

virtual ptrdiff_t distance(const SciSwigIterator &x) const;

virtual bool equal (const SciSwigIterator &x) const;

virtual SciSwigIterator *copy() const = 0;

SwigSciObject next();
    SwigSciObject previous();
    SciSwigIterator *advance(ptrdiff_t n);

bool operator == (const SciSwigIterator& x)  const;
    bool operator != (const SciSwigIterator& x) const;
    SciSwigIterator* operator ++ ();
    SciSwigIterator* operator -- ();
    SciSwigIterator* operator + (ptrdiff_t n) const;
    SciSwigIterator* operator - (ptrdiff_t n) const;
    ptrdiff_t operator - (const SciSwigIterator& x) const;
  };
}

${this.title}

Code Editor : sciiterators.swg