swig/Examples/test-suite/valuewrapper_opaque.i
Marcelo Matus c388088863 fix for bug 901706
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@6438 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2004-10-18 09:10:23 +00:00

136 lines
1.5 KiB
OpenEdge ABL

%module valuewrapper_opaque
/*
* Opaque types
*/
%{
template<typename T> class TemplateClass {
public:
TemplateClass<T>(T a) {}
};
struct B
{
};
class C
{
public:
C(int){}
};
%}
/*
* Hint swig that the Opaque type B don't need the value wrapper.
* This hint is only necessary in very very special cases.
*/
%feature("novaluewrapper") B;
class B;
/*
* Force swig to use the value wrapper, even when the class
* has a default constructor, in case you want to save a
* instance construction.
*
*/
%feature("valuewrapper") D;
class D;
%inline %{
class A
{
public:
A(int){}
};
class D {};
class Klass {};
TemplateClass<Klass> getKlass(Klass k) {
TemplateClass<Klass> t(k);
return t;
}
TemplateClass<A> getA(A a) {
TemplateClass<A> t(a);
return t;
}
TemplateClass<B> getA(B b) {
TemplateClass<B> t(b);
return t;
}
TemplateClass<C> getC(C a) {
TemplateClass<C> t(a);
return t;
}
TemplateClass<int> getInt(int a) {
TemplateClass<int> t(a);
return t;
}
A sgetA(A a) {
return a;
}
Klass sgetKlass(Klass a) {
return a;
}
template <class T>
struct auto_ptr
{
auto_ptr(T a){}
};
auto_ptr<A> getPtrA(auto_ptr<A> a) {
return a;
}
B getB(B a) {
return a;
}
D getD(D a) {
return a;
}
%}
%template() auto_ptr<A>;
/***** Another strange case, member var + opaque, bug #901706 ******/
%{
class BB {
friend class AA;
protected:
BB(int a) { this->a = a; };
BB() {};
int a;
};
%}
%inline %{
class AA {
public:
AA(){}
BB innerObj;
};
%}