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 = Tcl_Read(chan, &buffer, 1);
if (size <= 0) {
return EOF;
} else {
return buffer;
}
}
/*
|
|
|
|
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;
size_t size;
size = Tcl_Read(chan, &buffer, 1);
if ((size + 1) < 2) {
return EOF;
} else {
return buffer;
}
}
/*
|