Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | add tcl upstream changes |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
3567d254c3e3a1a5b6ce106d1bbceffc |
User & Date: | chw 2019-07-02 04:06:35.005 |
Context
2019-07-02
| ||
04:40 | add selected tcllib upstream changes check-in: b811cbd1a6 user: chw tags: trunk | |
04:07 | merge with trunk check-in: d751ac6185 user: chw tags: wtf-8-experiment | |
04:06 | add tcl upstream changes check-in: 3567d254c3 user: chw tags: trunk | |
04:04 | add tk upstream changes check-in: 4063ca24da user: chw tags: trunk | |
Changes
Changes to jni/tcl/generic/tclHash.c.
︙ | ︙ | |||
835 836 837 838 839 840 841 842 843 844 845 846 847 848 | unsigned int size, allocsize; allocsize = size = strlen(string) + 1; if (size < sizeof(hPtr->key)) { allocsize = sizeof(hPtr->key); } hPtr = ckalloc(TclOffset(Tcl_HashEntry, key) + allocsize); memcpy(hPtr->key.string, string, size); hPtr->clientData = 0; return hPtr; } /* *---------------------------------------------------------------------- | > | 835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 | unsigned int size, allocsize; allocsize = size = strlen(string) + 1; if (size < sizeof(hPtr->key)) { allocsize = sizeof(hPtr->key); } hPtr = ckalloc(TclOffset(Tcl_HashEntry, key) + allocsize); memset(hPtr, 0, sizeof(Tcl_HashEntry) + allocsize - sizeof(hPtr->key)); memcpy(hPtr->key.string, string, size); hPtr->clientData = 0; return hPtr; } /* *---------------------------------------------------------------------- |
︙ | ︙ |