From c17e494888e05bc7e834937023147ea365ac4202 Mon Sep 17 00:00:00 2001
From: Dave Beazley <dave-swig@dabeaz.com>
Date: Tue, 25 Nov 2003 16:12:20 +0000
Subject: [PATCH] Fixed [ 848824 ] Bug in dispatch function when having
 overloaded functions.

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@5390 626c5289-ae23-0410-ae9c-e8d60b6d4f22
---
 SWIG/Lib/tcl/tcl8.swg | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/SWIG/Lib/tcl/tcl8.swg b/SWIG/Lib/tcl/tcl8.swg
index e7a2a4f7d..6795b67f9 100644
--- a/SWIG/Lib/tcl/tcl8.swg
+++ b/SWIG/Lib/tcl/tcl8.swg
@@ -475,7 +475,7 @@
   char *tmp;
   int   len;
   tmp = Tcl_GetStringFromObj($input,&len);
-  (len == 1) ? 1 : 0;
+  $1 = (len == 1) ? 1 : 0;
 }
 
 %typecheck(SWIG_TYPECHECK_STRING) char * {