summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-06-13 12:01:47 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-06-13 12:01:47 (GMT)
commitbf1528403276733a85426e74357783d937c7faed (patch)
tree32cd7251725b2d7b287c2657cc2077da1e86ebe3
parentdd9fc01a38ab12c48224f9e335f0415b9594a1b8 (diff)
downloadtcl-bf1528403276733a85426e74357783d937c7faed.zip
tcl-bf1528403276733a85426e74357783d937c7faed.tar.gz
tcl-bf1528403276733a85426e74357783d937c7faed.tar.bz2
Some int argc -> size_t argc
-rw-r--r--unix/tclUnixPipe.c6
-rw-r--r--win/tclWinPipe.c10
2 files changed, 8 insertions, 8 deletions
diff --git a/unix/tclUnixPipe.c b/unix/tclUnixPipe.c
index 27e8182..16e56b2 100644
--- a/unix/tclUnixPipe.c
+++ b/unix/tclUnixPipe.c
@@ -381,7 +381,7 @@ TclpCreateProcess(
* occurred when creating the child process.
* Error messages from the child process
* itself are sent to errorFile. */
- size_t argc1, /* Number of arguments in following array. */
+ size_t argc, /* Number of arguments in following array. */
const char **argv, /* Array of argument strings in UTF-8.
* argv[0] contains the name of the executable
* translated using Tcl_TranslateFileName
@@ -410,8 +410,8 @@ TclpCreateProcess(
char errSpace[200 + TCL_INTEGER_SPACE];
Tcl_DString *dsArray;
char **newArgv;
- int pid, i;
- int argc = argc1;
+ int pid;
+ size_t i;
errPipeIn = NULL;
errPipeOut = NULL;
diff --git a/win/tclWinPipe.c b/win/tclWinPipe.c
index b4f9ff0..5d928f3 100644
--- a/win/tclWinPipe.c
+++ b/win/tclWinPipe.c
@@ -171,7 +171,7 @@ typedef struct {
static int ApplicationType(Tcl_Interp *interp,
const char *fileName, char *fullName);
-static void BuildCommandLine(const char *executable, int argc,
+static void BuildCommandLine(const char *executable, size_t argc,
const char **argv, Tcl_DString *linePtr);
static BOOL HasConsole(void);
static int PipeBlockModeProc(ClientData instanceData, int mode);
@@ -911,7 +911,7 @@ TclpCreateProcess(
* occurred when creating the child process.
* Error messages from the child process
* itself are sent to errorFile. */
- size_t argc1, /* Number of arguments in following array. */
+ size_t argc, /* Number of arguments in following array. */
const char **argv, /* Array of argument strings. argv[0] contains
* the name of the executable converted to
* native format (using the
@@ -943,7 +943,6 @@ TclpCreateProcess(
HANDLE hProcess, h, inputHandle, outputHandle, errorHandle;
char execPath[MAX_PATH * 3];
WinFile *filePtr;
- int argc = argc1;
PipeInit();
@@ -1537,13 +1536,14 @@ static void
BuildCommandLine(
const char *executable, /* Full path of executable (including
* extension). Replacement for argv[0]. */
- int argc, /* Number of arguments. */
+ size_t argc, /* Number of arguments. */
const char **argv, /* Argument strings in UTF. */
Tcl_DString *linePtr) /* Initialized Tcl_DString that receives the
* command line (WCHAR). */
{
const char *arg, *start, *special, *bspos;
- int quote = 0, i;
+ int quote = 0;
+ size_t i;
Tcl_DString ds;
static const char specMetaChars[] = "&|^<>!()%";
/* Characters to enclose in quotes if unpaired