From 2e98fddd785ca9f817508a9b8ed137bc49ed2894 Mon Sep 17 00:00:00 2001
From: Olly Betts <olly@survex.com>
Date: Tue, 13 Dec 2016 09:34:48 +1300
Subject: [PATCH] Remove pointless casting away of const

---
 Lib/tcl/tclrun.swg | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Lib/tcl/tclrun.swg b/Lib/tcl/tclrun.swg
index 3009a77ec..90ed98148 100644
--- a/Lib/tcl/tclrun.swg
+++ b/Lib/tcl/tclrun.swg
@@ -231,7 +231,7 @@ SWIG_Tcl_MakePtr(char *c, void *ptr, swig_type_info *ty, int SWIGUNUSEDPARM(flag
     c = SWIG_PackData(c,&ptr,sizeof(void *));
     strcpy(c,ty->name);
   } else {
-    strcpy(c,(char *)"NULL");
+    strcpy(c,"NULL");
   }
 }