Import Tk 8.6.10
This commit is contained in:
@@ -21,7 +21,7 @@ typedef struct ConvertInfo {
|
||||
* offset of the next chunk of data to
|
||||
* transfer. */
|
||||
Tcl_EncodingState state; /* The encoding state needed across chunks. */
|
||||
char buffer[TCL_UTF_MAX]; /* A buffer to hold part of a UTF character
|
||||
char buffer[4]; /* A buffer to hold part of a UTF character
|
||||
* that is split across chunks.*/
|
||||
} ConvertInfo;
|
||||
|
||||
@@ -68,7 +68,7 @@ typedef struct IncrInfo {
|
||||
* currently pending. */
|
||||
} IncrInfo;
|
||||
|
||||
typedef struct ThreadSpecificData {
|
||||
typedef struct {
|
||||
IncrInfo *pendingIncrs; /* List of all incr structures currently
|
||||
* active. */
|
||||
} ThreadSpecificData;
|
||||
@@ -446,7 +446,7 @@ TkSelPropProc(
|
||||
* Preserve any left-over bytes.
|
||||
*/
|
||||
|
||||
if (srcLen > TCL_UTF_MAX) {
|
||||
if (srcLen > 3) {
|
||||
Tcl_Panic("selection conversion left too many bytes unconverted");
|
||||
}
|
||||
memcpy(incrPtr->converts[i].buffer, src, (size_t) srcLen+1);
|
||||
|
||||
Reference in New Issue
Block a user