From 0f991243d30dfaa9bcefb55aa5cb0d138b98da14 Mon Sep 17 00:00:00 2001
From: Marcelo Matus <mmatus@acms.arizona.edu>
Date: Thu, 15 Jan 2004 09:58:09 +0000
Subject: [PATCH] added new testing case

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@5638 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 SWIG/Examples/test-suite/typemap_self.i | 33 +++++++++++++++++++++++++
 1 file changed, 33 insertions(+)
 create mode 100644 SWIG/Examples/test-suite/typemap_self.i

diff --git a/SWIG/Examples/test-suite/typemap_self.i b/SWIG/Examples/test-suite/typemap_self.i
new file mode 100644
index 000000000..ec3723331
--- /dev/null
+++ b/SWIG/Examples/test-suite/typemap_self.i
@@ -0,0 +1,33 @@
+%module typemap_self
+
+// This typemap should be ignored for self?
+%typemap(in) A* (A* ptr) {
+  if (SWIG_ConvertPtr($input, (void**) &ptr, $1_descriptor, 0) != -1) {
+    $1 = ptr;
+  } else  {
+    $1 = new A();
+  }
+ }
+
+// Simple but unsecure current fix
+//%apply SWIGTYPE* {A* self}
+
+
+%inline %{
+  
+  struct A
+  {
+    int foo() 
+    {
+      return 1;
+    }
+  };
+  
+  struct B
+  {
+    B(A*) 
+    {
+    }
+  };
+  
+%}