Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | PushLiteral() is no longer happy with a length argument of -1. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | dgp-refactor |
| Files: | files | file ages | folders |
| SHA3-256: |
f886387b13c9426b87a4b19c5e85fc12 |
| User & Date: | dgp 2018-11-16 03:51:20 |
Context
|
2018-11-16
| ||
| 04:10 | silence compiler warnings check-in: 6364870a14 user: dgp tags: dgp-refactor | |
| 03:51 | PushLiteral() is no longer happy with a length argument of -1. check-in: f886387b13 user: dgp tags: dgp-refactor | |
| 03:03 | Revise code that assumed you could pass any negative string length, not only -1. check-in: 57b63a61eb user: dgp tags: dgp-refactor | |
Changes
Changes to generic/tclCompCmdsSZ.c.
4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045 |
/* TODO: Consider support for compiling expanded args. */
for (words=1 ; words<parsePtr->numWords ; words++) {
tokenPtr = TokenAfter(tokenPtr);
CompileWord(envPtr, tokenPtr, interp, words);
}
if (parsePtr->numWords <= 2) {
PushLiteral(envPtr, identity, -1);
words++;
}
if (words > 3) {
/*
* Reverse order of arguments to get precise agreement with [expr] in
* calcuations, including roundoff errors.
*/
|
| |
4031 4032 4033 4034 4035 4036 4037 4038 4039 4040 4041 4042 4043 4044 4045 |
/* TODO: Consider support for compiling expanded args. */
for (words=1 ; words<parsePtr->numWords ; words++) {
tokenPtr = TokenAfter(tokenPtr);
CompileWord(envPtr, tokenPtr, interp, words);
}
if (parsePtr->numWords <= 2) {
PushLiteral(envPtr, identity, strlen(identity));
words++;
}
if (words > 3) {
/*
* Reverse order of arguments to get precise agreement with [expr] in
* calcuations, including roundoff errors.
*/
|