From 431a22dc31640fce5b98963823ff3b11208c4415 Mon Sep 17 00:00:00 2001
From: mescalinum <mescalinum@users.sourceforge.net>
Date: Wed, 16 Nov 2011 11:55:24 +0000
Subject: correctly determine the mangled SWIGTYPE

svn path=/trunk/externals/loaders/tclpd/; revision=15756
---
 tclpd.i | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/tclpd.i b/tclpd.i
index 442787f..a072f5b 100644
--- a/tclpd.i
+++ b/tclpd.i
@@ -91,7 +91,7 @@ void name_setitem(type *ary, int index, type value)
 }
 
 %typemap(in) t_text * {
-    int res = SWIG_ConvertPtr($input, &$1, SWIGTYPE_p__text, 0 |  0 );
+    int res = SWIG_ConvertPtr($input, &$1, $1_descriptor, 0 |  0 );
     if(!SWIG_IsOK(res)) {
         const char *str = Tcl_GetStringFromObj($input, NULL);
         t_tcl *x = object_table_get(str);
-- 
cgit v1.2.1