From 20b21aaa691a3ef96c4e9972cead7b5eba58b23f Mon Sep 17 00:00:00 2001 From: "jan.nijtmans" Date: Sat, 7 Jul 2018 20:11:05 +0000 Subject: Fix build on MacOSX --- generic/tclExecute.c | 2 +- macosx/tclMacOSXBundle.c | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/generic/tclExecute.c b/generic/tclExecute.c index f37c7ea..6650b53 100644 --- a/generic/tclExecute.c +++ b/generic/tclExecute.c @@ -8919,7 +8919,7 @@ GetSrcInfoForPc( * of the command containing the pc should * be stored. */ { - size_t pcOffset = (pc - codePtr->codeStart); + size_t pcOffset = (size_t)(pc - codePtr->codeStart); size_t numCmds = codePtr->numCommands; unsigned char *codeDeltaNext, *codeLengthNext; unsigned char *srcDeltaNext, *srcLengthNext; diff --git a/macosx/tclMacOSXBundle.c b/macosx/tclMacOSXBundle.c index dad3733..eeaf7b9 100644 --- a/macosx/tclMacOSXBundle.c +++ b/macosx/tclMacOSXBundle.c @@ -167,7 +167,7 @@ Tcl_MacOSXOpenBundleResources( Tcl_Interp *interp, const char *bundleName, int hasResourceFile, - int maxPathLen, + size_t maxPathLen, char *libraryPath) { return Tcl_MacOSXOpenVersionedBundleResources(interp, bundleName, NULL, @@ -201,7 +201,7 @@ Tcl_MacOSXOpenVersionedBundleResources( const char *bundleName, const char *bundleVersion, int hasResourceFile, - int maxPathLen, + size_t maxPathLen, char *libraryPath) { #ifdef HAVE_COREFOUNDATION -- cgit v0.12