Tk Source Code

Differences From Artifact [10023589]:

• File generic/tkImgBmap.c — part of check-in [54ff80e8] at 2017-02-13 09:57:07 on branch trunk — Make tk.h work unchanged with Tcl 9.0 (novem), account for possible missing TCL_STORAGE_CLASS definition. More internal use of size_t in stead of int. (user: jan.nijtmans size: 39547) [more...]

To Artifact [9cf86629]:

• File generic/tkImgBmap.c — part of check-in [785b85f4] at 2018-07-10 19:22:52 on branch tip-494 — Make Tk sufficiently 64-bit aware in order to withstand TIP #494 possible problems (user: jan.nijtmans size: 39555) [more...]

1075
1076
1077
1078
1079
1080
1081
1082

1083
1084
1085

1086
1087
1088
1089
1090
1091
1092

1075
1076
1077
1078
1079
1080
1081

1082
1083
1084

1085
1086
1087
1088
1089
1090
1091
1092

-
+


-
+

 */

static int
GetByte(
    Tcl_Channel chan)	/* The channel we read from. */
{
    char buffer;
    int size;
    size_t size;

    size = Tcl_Read(chan, &buffer, 1);
    if (size <= 0) {
    if ((size + 1) < 2) {
	return EOF;
    } else {
	return buffer;
    }
}

/*