Import Tk 8.6.12
This commit is contained in:
@@ -664,7 +664,7 @@ DoObjConfig(
|
||||
if (internalPtr != NULL) {
|
||||
if (valuePtr != NULL) {
|
||||
value = Tcl_GetStringFromObj(valuePtr, &length);
|
||||
newStr = ckalloc(length + 1);
|
||||
newStr = (char *)ckalloc(length + 1);
|
||||
strcpy(newStr, value);
|
||||
} else {
|
||||
newStr = NULL;
|
||||
@@ -1400,7 +1400,7 @@ Tk_RestoreSavedOptions(
|
||||
= savePtr->items[i].valuePtr;
|
||||
}
|
||||
if (specPtr->internalOffset >= 0) {
|
||||
register char *ptr = (char *) &savePtr->items[i].internalForm;
|
||||
char *ptr = (char *) &savePtr->items[i].internalForm;
|
||||
|
||||
CLANG_ASSERT(internalPtr);
|
||||
switch (specPtr->type) {
|
||||
|
||||
Reference in New Issue
Block a user