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 : scistdcommon.swg

%fragment("StdTraits","header",fragment="StdTraitsCommon")
{
namespace swig {
// Traits that provides the from method
  template <class Type> struct traits_from_ptr {
    static SwigSciObject from(Type *val, int owner = 0) {
        return SWIG_OK; //SWIG_NewPointerObj(val, type_info<Type>(), owner);
    }
  };

template <class Type> struct traits_from {
    static SwigSciObject from(const Type& val) {
      return traits_from_ptr<Type>::from(new Type(val), 1);
    }
  };

template <class Type> struct traits_from<Type *> {
    static SwigSciObject from(Type* val) {
      return traits_from_ptr<Type>::from(val, 0);
    }
  };

template <class Type> struct traits_from<const Type *> {
    static SwigSciObject from(const Type* val) {
      return traits_from_ptr<Type>::from(const_cast<Type*>(val), 0);
    }
  };

template <class Type>
  inline SwigSciObject from(const Type& val) {
    return traits_from<Type>::from(val);
  }

template <class Type>
  inline SwigSciObject from_ptr(Type* val, int owner) {
    return traits_from_ptr<Type>::from(val, owner);
  }

// Traits that provides the asval/as/check method
  template <class Type>
  struct traits_asptr {
    static int asptr(const SwigSciObject& obj, Type **val) {
      Type *p = 0;
      swig_type_info *descriptor = type_info<Type>();
      int res = descriptor ? SWIG_ConvertPtr(obj, (void **)&p, descriptor, 0) : SWIG_ERROR;
      if (SWIG_IsOK(res)) {
	if (val) *val = p;
      }
      return res;
    }
  };

template <class Type>
  inline int asptr(const SwigSciObject& obj, Type **vptr) {
    return traits_asptr<Type>::asptr(obj, vptr);
  }

template <class Type>
  struct traits_asval {
    static int asval(const SwigSciObject& obj, Type *val) {
      if (val) {
	Type *p = 0;
	int res = traits_asptr<Type>::asptr(obj, &p);
	if (!SWIG_IsOK(res))
    return res;
	if (p) {
	  typedef typename noconst_traits<Type>::noconst_type noconst_type;
	  *(const_cast<noconst_type*>(val)) = *p;
	  if (SWIG_IsNewObj(res)){
	    %delete(p);
	    res = SWIG_DelNewMask(res);
	  }
	  return res;
	} else {
	  return SWIG_ERROR;
	}
      } else {
	return traits_asptr<Type>::asptr(obj, (Type **)(0));
      }
    }
  };

template <class Type> struct traits_asval<Type*> {
    static int asval(const SwigSciObject& obj, Type **val) {
      if (val) {
        typedef typename noconst_traits<Type>::noconst_type noconst_type;
        noconst_type *p = 0;
        int res = traits_asptr<noconst_type>::asptr(obj,  &p);
        if (SWIG_IsOK(res)) {
          *(const_cast<noconst_type**>(val)) = p;
	}
	return res;
      } else {
	return traits_asptr<Type>::asptr(obj, (Type **)(0));
      }
    }
  };

template <class Type>
  inline int asval(const SwigSciObject& obj, Type *val) {
    return traits_asval<Type>::asval(obj, val);
  }

template <class Type>
  struct traits_as<Type, value_category> {
    static Type as(const SwigSciObject& obj) {
      Type v;
      int res = asval(obj, &v);
      if (SWIG_IsOK(res)) {
        return v;
      } else {
        %type_error(swig::type_name<Type>());
        throw std::invalid_argument("bad type");
      }
    }
  };

template <class Type>
  struct traits_as<Type, pointer_category> {
    static Type as(const SwigSciObject& obj) {
      Type *v = 0;
      int res = traits_asptr<Type>::asptr(obj, &v);
      if (SWIG_IsOK(res) && v) {
	if (SWIG_IsNewObj(res)) {
	  Type r(*v);
	  %delete(v);
	  return r;
	} else {
	  return *v;
	}
      } else {
        %type_error(swig::type_name<Type>());
        throw std::invalid_argument("bad type");
      }
    }
  };

template <class Type>
  struct traits_as<Type*, pointer_category> {
    static Type* as(const SwigSciObject& obj) {
      Type *v = 0;
      int res = traits_asptr<Type>::asptr(obj, &v);
      if (SWIG_IsOK(res)) {
	return v;
      } else {
        %type_error(swig::type_name<Type>());
        throw std::invalid_argument("bad type");
      }
    }
  };

template <class Type>
  inline Type as(const SwigSciObject& obj) {
    return traits_as<Type, typename traits<Type>::category>::as(obj);
  }

template <class Type>
  struct traits_check<Type, value_category> {
    static bool check(const SwigSciObject& obj) {
      int res = asval(obj, (Type *)(0));
      return SWIG_IsOK(res) ? true : false;
    }
  };

template <class Type>
  struct traits_check<Type, pointer_category> {
    static bool check(const SwigSciObject& obj) {
      int res = asptr(obj, (Type **)(0));
      return SWIG_IsOK(res) ? true : false;
    }
  };

template <class Type>
  inline bool check(const SwigSciObject& obj) {
    return traits_check<Type, typename traits<Type>::category>::check(obj);
  }
}
}

%define %specialize_std_container(Type,Check,As,From)
%{
namespace swig {
  template <>  struct traits_asval<Type > {
    typedef Type value_type;
    static int asval(const SwigSciObject& obj, value_type *val) {
      if (Check(obj)) {
	if (val) *val = As(obj);
	return SWIG_OK;
      }
      return SWIG_ERROR;
    }
  };
  template <>  struct traits_from<Type > {
    typedef Type value_type;
    static SwigSciObject from(const value_type& val) {
      return From(val);
    }
  };

template <>
  struct traits_check<Type, value_category> {
    static int check(const SwigSciObject& obj) {
      int res = Check(obj);
      return obj && res ? res : 0;
    }
  };
}
%}
%enddef

#define specialize_std_vector(Type,Check,As,From) %specialize_std_container(%arg(Type),Check,As,From)
#define specialize_std_list(Type,Check,As,From) %specialize_std_container(%arg(Type),Check,As,From)
#define specialize_std_deque(Type,Check,As,From) %specialize_std_container(%arg(Type),Check,As,From)
#define specialize_std_set(Type,Check,As,From) %specialize_std_container(%arg(Type),Check,As,From)
#define specialize_std_multiset(Type,Check,As,From) %specialize_std_container(%arg(Type),Check,As,From)

${this.title}

Code Editor : scistdcommon.swg