From 51fa3b740f3d76a26942904e151d366699b3eba9 Mon Sep 17 00:00:00 2001
From: Tim Peters <tim.peters@gmail.com>
Date: Wed, 4 Aug 2004 02:16:48 +0000
Subject: [PATCH] Tkapp_New():  Rewrite in C so it compiles again.

---
 Modules/_tkinter.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/Modules/_tkinter.c b/Modules/_tkinter.c
index 74fe0f8d783..852bde4a113 100644
--- a/Modules/_tkinter.c
+++ b/Modules/_tkinter.c
@@ -580,6 +580,7 @@ Tkapp_New(char *screenName, char *baseName, char *className,
 {
 	TkappObject *v;
 	char *argv0;
+
 	v = PyObject_New(TkappObject, &Tkapp_Type);
 	if (v == NULL)
 		return NULL;
@@ -646,13 +647,15 @@ Tkapp_New(char *screenName, char *baseName, char *className,
 
 	/* some initial arguments need to be in argv */
 	if (sync || use) {
+		char *args;
 		int len = 0;
+
 		if (sync)
 			len += sizeof "-sync";
 		if (use)
 			len += strlen(use) + sizeof "-use ";
 
-		char *args = (char*)ckalloc(len);
+		args = (char*)ckalloc(len);
 		if (!args) {
 			PyErr_NoMemory();
 			Py_DECREF(v);