diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-21 06:16:53 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-21 06:16:53 (GMT) |
| commit | c7f27e3c8788c57a0e58d4b31140a4c4652a422f (patch) | |
| tree | b75c4e99c0169e29c90064020a7e6b69e081544c /generic/tclCompile.c | |
| parent | e86259d193d2c7ad6628755161cc75a706e194cb (diff) | |
| download | tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.zip tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.tar.gz tcl-c7f27e3c8788c57a0e58d4b31140a4c4652a422f.tar.bz2 | |
Fix warnings generated on disable8api builds
Diffstat (limited to 'generic/tclCompile.c')
| -rw-r--r-- | generic/tclCompile.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclCompile.c b/generic/tclCompile.c index 6940448..5da5cf1 100644 --- a/generic/tclCompile.c +++ b/generic/tclCompile.c @@ -776,7 +776,7 @@ TclSetByteCodeFromAny( Interp *iPtr = (Interp *) interp; CompileEnv compEnv; /* Compilation environment structure allocated * in frame. */ - size_t length; + Tcl_Size length; int result = TCL_OK; const char *stringPtr; Proc *procPtr = iPtr->compiledProcPtr; @@ -1328,7 +1328,7 @@ CompileSubstObj( } if (codePtr == NULL) { CompileEnv compEnv; - size_t numBytes; + Tcl_Size numBytes; const char *bytes = Tcl_GetStringFromObj(objPtr, &numBytes); /* TODO: Check for more TIP 280 */ @@ -1812,7 +1812,7 @@ CompileCmdLiteral( const char *bytes; Command *cmdPtr; int cmdLitIdx, extraLiteralFlags = LITERAL_CMD_NAME; - size_t length; + Tcl_Size length; cmdPtr = (Command *) Tcl_GetCommandFromObj(interp, cmdObj); if ((cmdPtr != NULL) && (cmdPtr->flags & CMD_VIA_RESOLVER)) { |