Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | another bit of fconfigure guts |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | tip-400-impl |
| Files: | files | file ages | folders |
| SHA1: |
3703d50e0a6950d02c21dfa2eea963c3 |
| User & Date: | dkf 2012-04-20 10:22:03 |
Context
|
2012-04-26
| ||
| 13:52 | merge trunk check-in: b440e1e4c3 user: dkf tags: tip-400-impl | |
|
2012-04-20
| ||
| 10:22 | another bit of fconfigure guts check-in: 3703d50e0a user: dkf tags: tip-400-impl | |
| 09:45 | merge trunk check-in: b857802eb5 user: dkf tags: tip-400-impl | |
Changes
Changes to generic/tclZlib.c.
| ︙ | ︙ | |||
2855 2856 2857 2858 2859 2860 2861 |
} else {
Tcl_DStringAppend(dsPtr, buf, -1);
return TCL_OK;
}
}
if (optionName == NULL || strcmp(optionName, "-dictionary") == 0) {
| > > > | > > > > > > > > > > > > > > | 2855 2856 2857 2858 2859 2860 2861 2862 2863 2864 2865 2866 2867 2868 2869 2870 2871 2872 2873 2874 2875 2876 2877 2878 2879 2880 2881 2882 2883 2884 2885 2886 |
} else {
Tcl_DStringAppend(dsPtr, buf, -1);
return TCL_OK;
}
}
if (optionName == NULL || strcmp(optionName, "-dictionary") == 0) {
/*
* Embedded NUL bytes are ok; they'll be C080-encoded.
*/
if (optionName == NULL) {
Tcl_DStringAppendElement(dsPtr, "-dictionary");
if (cd->compDictObj) {
Tcl_DStringAppendElement(dsPtr,
Tcl_GetString(cd->compDictObj));
} else {
Tcl_DStringAppendElement(dsPtr, "");
}
} else {
int len;
const char *str = Tcl_GetStringFromObj(cd->compDictObj, &len);
Tcl_DStringAppend(dsPtr, str, len);
}
}
/*
* The "header" option, which is only valid on inflating gzip channels,
* reports the header that has been read from the start of the stream.
*/
|
| ︙ | ︙ |