From f9c3c819472813905c28f23456d1e94d8a167aa1 Mon Sep 17 00:00:00 2001 From: dgp Date: Thu, 26 Apr 2012 13:21:01 +0000 Subject: Repair more build breakage. --- unix/tclUnixFile.c | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) diff --git a/unix/tclUnixFile.c b/unix/tclUnixFile.c index c187e0e..b4a1012 100644 --- a/unix/tclUnixFile.c +++ b/unix/tclUnixFile.c @@ -43,13 +43,6 @@ TclpFindExecutable( int length; char buf[PATH_MAX * TCL_UTF_MAX + 1]; char name[PATH_MAX * TCL_UTF_MAX + 1]; -#else - const char *name, *p; - Tcl_StatBuf statBuf; - Tcl_DString buffer, nameString, cwd, utfName; -#endif - -#ifdef __CYGWIN__ /* Make some symbols available without including */ # define CP_UTF8 65001 @@ -69,6 +62,11 @@ TclpFindExecutable( TclSetObjNameOfExecutable( Tcl_NewStringObj(name, length), Tcl_GetEncoding(NULL, NULL)); #else + const char *name, *p; + Tcl_StatBuf statBuf; + Tcl_DString buffer, nameString, cwd, utfName; + Tcl_Encoding encoding; + if (argv0 == NULL) { return; } -- cgit v0.12