PageRenderTime 36ms CodeModel.GetById 34ms app.highlight 0ms RepoModel.GetById 2ms app.codeStats 0ms

/trunk/Lib/octave/std_pair.i

#
Swig | 129 lines | 117 code | 12 blank | 0 comment | 0 complexity | de6512ec2828c7df73a206e2eac789c4 MD5 | raw file
  1// Pairs
  2
  3%include <octstdcommon.swg>
  4
  5//#define SWIG_STD_PAIR_ASVAL
  6
  7%fragment("StdPairTraits","header",fragment="StdTraits") {
  8  namespace swig {
  9#ifdef SWIG_STD_PAIR_ASVAL
 10    template <class T, class U >
 11    struct traits_asval<std::pair<T,U> >  {
 12      typedef std::pair<T,U> value_type;
 13
 14      static int get_pair(const octave_value& first, octave_value second,
 15			  std::pair<T,U> *val)
 16      {
 17	if (val) {
 18	  T *pfirst = &(val->first);
 19	  int res1 = swig::asval(first, pfirst);
 20	  if (!SWIG_IsOK(res1))
 21	    return res1;
 22	  U *psecond = &(val->second);
 23	  int res2 = swig::asval(second, psecond);
 24	  if (!SWIG_IsOK(res2))
 25	    return res2;
 26	  return res1 > res2 ? res1 : res2;
 27	} else {
 28	  T *pfirst = 0;
 29	  int res1 = swig::asval(first, pfirst);
 30	  if (!SWIG_IsOK(res1))
 31	    return res1;
 32	  U *psecond = 0;
 33	  int res2 = swig::asval((PyObject*)second, psecond);
 34	  if (!SWIG_IsOK(res2))
 35	    return res2;
 36	  return res1 > res2 ? res1 : res2;
 37	}
 38      }
 39
 40      static int asval(const octave_value& obj, std::pair<T,U> *val) {
 41	if (obj.is_cell()) {
 42	  Cell c=obj.cell_value();
 43	  if (c.numel()<2) {
 44	    error("pair from Cell array requires at least two elements");
 45	    return SWIG_ERROR;
 46	  }
 47	  return get_pair(c(0),c(1),val);
 48	} else {
 49	  value_type *p;
 50	  int res = SWIG_ConvertPtr(obj,(void**)&p,swig::type_info<value_type>(),0);
 51	  if (SWIG_IsOK(res) && val)
 52	    *val = *p;
 53	  return res;
 54	}
 55	return SWIG_ERROR;
 56      }
 57    };
 58
 59#else
 60    template <class T, class U >
 61    struct traits_asptr<std::pair<T,U> >  {
 62      typedef std::pair<T,U> value_type;
 63
 64      static int get_pair(const octave_value& first, octave_value second,
 65			  std::pair<T,U> **val) 
 66      {
 67	if (val) {
 68	  value_type *vp = %new_instance(std::pair<T,U>);
 69	  T *pfirst = &(vp->first);
 70	  int res1 = swig::asval(first, pfirst);
 71	  if (!SWIG_IsOK(res1))
 72	    return res1;
 73	  U *psecond = &(vp->second);
 74	  int res2 = swig::asval(second, psecond);
 75	  if (!SWIG_IsOK(res2))
 76	    return res2;
 77	  *val = vp;
 78	  return SWIG_AddNewMask(res1 > res2 ? res1 : res2);
 79	} else {
 80	  T *pfirst = 0;
 81	  int res1 = swig::asval(first, pfirst);
 82	  if (!SWIG_IsOK(res1))
 83	    return res1;
 84	  U *psecond = 0;
 85	  int res2 = swig::asval(second, psecond);
 86	  if (!SWIG_IsOK(res2))
 87	    return res2;
 88	  return res1 > res2 ? res1 : res2;
 89	}
 90	return SWIG_ERROR;
 91      }
 92
 93      static int asptr(const octave_value& obj, std::pair<T,U> **val) {
 94	if (obj.is_cell()) {
 95	  Cell c=obj.cell_value();
 96	  if (c.numel()<2) {
 97	    error("pair from Cell array requires at least two elements");
 98	    return SWIG_ERROR;
 99	  }
100	  return get_pair(c(0),c(1),val);
101	} else {
102	  value_type *p;
103	  int res = SWIG_ConvertPtr(obj,(void**)&p,swig::type_info<value_type>(),0);
104	  if (SWIG_IsOK(res) && val)
105	    *val = p;
106	  return res;
107	}
108	return SWIG_ERROR;
109      }
110    };
111
112#endif
113    template <class T, class U >
114    struct traits_from<std::pair<T,U> >   {
115      static octave_value from(const std::pair<T,U>& val) {
116	Cell c(1,2);
117	c(0)=swig::from(val.first);
118	c(1)=swig::from(val.second);
119	return c;
120      }
121    };
122  }
123}
124
125%define %swig_pair_methods(pair...)
126%enddef
127
128%include <std/std_pair.i>
129