diff options
| author | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-23 08:13:11 (GMT) |
|---|---|---|
| committer | apnadkarni <apnmbx-wits@yahoo.com> | 2023-04-23 08:13:11 (GMT) |
| commit | 2b41b2d12bf50d873436d0ce09e1e7b8345d5540 (patch) | |
| tree | 6fb5f61f31dda4cc65bf9b4b66a9c598995749fe /generic/tclCompile.c | |
| parent | 9cd23041f3a73559c43adb6120b1ccdf4bd15604 (diff) | |
| parent | 6f566fc406752600f7ae67df0c7356d987b753fe (diff) | |
| download | tcl-2b41b2d12bf50d873436d0ce09e1e7b8345d5540.zip tcl-2b41b2d12bf50d873436d0ce09e1e7b8345d5540.tar.gz tcl-2b41b2d12bf50d873436d0ce09e1e7b8345d5540.tar.bz2 | |
Fix gcc type mismatch warnings exposed by disabling casts using disabletcl8api
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)) { |