Imported from /srv/lorry/lorry-area/swig-tarball/swig-1.3.40.tar.gz.HEADswig-1.3.40master

1 files changed, 47 insertions, 0 deletions

diff --git a/Examples/test-suite/primitive_ref.i b/Examples/test-suite/primitive_ref.i
new file mode 100644
index 0000000..1e228f2
--- /dev/null
+++ b/Examples/test-suite/primitive_ref.i
@@ -0,0 +1,47 @@
+// Tests passing of references to primitive datatypes
+%module primitive_ref
+
+%define ref(type,name)
+%inline %{
+const type &ref_##name(const type &x) {
+   static type y = x;
+   return y;
+}
+%}
+%enddef
+
+ref(int,int);
+ref(unsigned int, uint);
+ref(short, short);
+ref(unsigned short, ushort);
+ref(long,long);
+ref(unsigned long, ulong);
+ref(signed char, schar);
+ref(unsigned char, uchar);
+ref(char, char);
+ref(float, float);
+ref(double, double);
+ref(bool, bool);
+ref(long long, longlong);
+ref(unsigned long long, ulonglong);
+
+
+%inline %{
+
+int ref_over(int a)
+{
+  return a;
+}
+
+ struct A 
+ {
+   int v;
+   A(int V) :v(V) {}
+ };
+ 
+int ref_over(const A& a)
+{
+  return a.v;
+}
+
+%}