diff options
| author | dgp@users.sourceforge.net <dgp> | 2004-06-17 19:41:45 (GMT) |
|---|---|---|
| committer | dgp@users.sourceforge.net <dgp> | 2004-06-17 19:41:45 (GMT) |
| commit | bdfa69af59b49d10ca67c09607f99f94f51aa09c (patch) | |
| tree | a94a1c3393eba190e4e5294df994bb81d9edda49 /win/tclWinInit.c | |
| parent | 209074731fed6545c30d54ce302a2f98b7efb644 (diff) | |
| download | tcl-bdfa69af59b49d10ca67c09607f99f94f51aa09c.zip tcl-bdfa69af59b49d10ca67c09607f99f94f51aa09c.tar.gz tcl-bdfa69af59b49d10ca67c09607f99f94f51aa09c.tar.bz2 | |
more compiler fixes
Diffstat (limited to 'win/tclWinInit.c')
| -rw-r--r-- | win/tclWinInit.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/win/tclWinInit.c b/win/tclWinInit.c index bc58859..824a8eb 100644 --- a/win/tclWinInit.c +++ b/win/tclWinInit.c @@ -7,7 +7,7 @@ * Copyright (c) 1998-1999 by Scriptics Corporation. * All rights reserved. * - * RCS: @(#) $Id: tclWinInit.c,v 1.50 2004/06/17 19:37:30 dgp Exp $ + * RCS: @(#) $Id: tclWinInit.c,v 1.51 2004/06/17 19:41:45 dgp Exp $ */ #include "tclWinInt.h" @@ -202,8 +202,6 @@ SetDefaultLibraryDir(directory) static Tcl_Obj * GetDefaultLibraryDir() { - int numBytes; - CONST char *bytes; Tcl_Obj **savedDirectoryPtr = (Tcl_Obj **) Tcl_GetThreadData(&defaultLibraryDirKey, (int)sizeof(Tcl_Obj *)); @@ -304,7 +302,7 @@ TclpInitLibraryPath(path) /* the path to the executable name. */ { #define LIBRARY_SIZE 32 - Tcl_Obj *pathPtr, *objPtr, objv[]; + Tcl_Obj *pathPtr, *objPtr, **objv; CONST char *str; Tcl_DString ds; int objc, pathc; |