From dcefa8ad300d780206a24ea3da6adad1cabcc035 Mon Sep 17 00:00:00 2001 From: Dave Beazley Date: Mon, 4 Sep 2000 15:53:40 +0000 Subject: [PATCH] Fixed constant creation bug with pointers. git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@843 626c5289-ae23-0410-ae9c-e8d60b6d4f22 --- Source/Modules1.1/tcl8.cxx | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Source/Modules1.1/tcl8.cxx b/Source/Modules1.1/tcl8.cxx index 61fcb1307..8ed1ed4fc 100644 --- a/Source/Modules1.1/tcl8.cxx +++ b/Source/Modules1.1/tcl8.cxx @@ -842,7 +842,7 @@ TCL8::declare_const(char *name, char *, SwigType *type, char *value) { break; case T_POINTER: case T_ARRAY: case T_REFERENCE: - Printf(f_header,"static %s %s = %s;\n", SwigType_lstr(type,0), var_name, value); + Printf(f_header,"static %s = %s;\n", SwigType_lstr(type,var_name), value); Printf(f_header,"static char *%s_char;\n", var_name); if (CPlusPlus) Printf(f_init,"\t %s_char = new char[%d];\n",var_name,(int) Len(SwigType_manglestr(type))+ 20);