diff options
Diffstat (limited to 'generic/tkCanvPs.c')
| -rw-r--r-- | generic/tkCanvPs.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tkCanvPs.c b/generic/tkCanvPs.c index 2bfdcc5..496e0a7 100644 --- a/generic/tkCanvPs.c +++ b/generic/tkCanvPs.c @@ -491,7 +491,7 @@ TkCanvPostscriptCmd( Tcl_AppendObjToObj(psObj, preambleObj); if (psInfo.chan != NULL) { - if (Tcl_WriteObj(psInfo.chan, psObj) == -1) { + if ((size_t)Tcl_WriteObj(psInfo.chan, psObj) == (size_t)-1) { channelWriteFailed: Tcl_SetObjResult(interp, Tcl_ObjPrintf( "problem writing postscript data to channel: %s", @@ -545,7 +545,7 @@ TkCanvPostscriptCmd( psInfo.x, Tk_PostscriptY((double)psInfo.y2, (Tk_PostscriptInfo)psInfoPtr)); if (psInfo.chan != NULL) { - if (Tcl_WriteObj(psInfo.chan, psObj) == -1) { + if ((size_t)Tcl_WriteObj(psInfo.chan, psObj) == (size_t)-1) { goto channelWriteFailed; } Tcl_DecrRefCount(psObj); @@ -587,7 +587,7 @@ TkCanvPostscriptCmd( Tcl_AppendToObj(psObj, "grestore\n", -1); if (psInfo.chan != NULL) { - if (Tcl_WriteObj(psInfo.chan, psObj) == -1) { + if ((size_t)Tcl_WriteObj(psInfo.chan, psObj) == (size_t)-1) { goto channelWriteFailed; } Tcl_DecrRefCount(psObj); @@ -608,7 +608,7 @@ TkCanvPostscriptCmd( "%%EOF\n", -1); if (psInfo.chan != NULL) { - if (Tcl_WriteObj(psInfo.chan, psObj) == -1) { + if ((size_t)Tcl_WriteObj(psInfo.chan, psObj) == (size_t)-1) { goto channelWriteFailed; } } |