Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | merge trunk |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | mig-nre-mods |
Files: | files | file ages | folders |
SHA1: |
2f274ed277c6f4bbab5922a9691df85a |
User & Date: | mig 2013-01-10 20:28:33.141 |
Context
2013-01-10
| ||
20:43 | tailcall now running in a simpler model, with no eval-flags and no nre-stack rewriting. check-in: ab22e6199f user: mig tags: mig-nre-mods | |
20:28 | merge trunk check-in: 2f274ed277 user: mig tags: mig-nre-mods | |
18:17 | fix off-by-one error introduced in bd7d7a2061 check-in: 6547cc9e7b user: mig tags: trunk | |
02:32 | adding new file, forgotten in last commit check-in: 1c45076f5a user: mig tags: mig-nre-mods | |
Changes
Changes to ChangeLog.
1 2 3 4 | 2013-01-08 Jan Nijtmans <[email protected]> * win/tclWinFile.c: [Bug 3092089]: [file normalize] can remove path components. [Bug 3587096] win vista/7: "can't find init.tcl" when | > > > > > | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | 2013-01-09 Jan Nijtmans <[email protected]> * library/http/http.tcl: [Bug 3599395]: http assumes status line is a proper tcl list. 2013-01-08 Jan Nijtmans <[email protected]> * win/tclWinFile.c: [Bug 3092089]: [file normalize] can remove path components. [Bug 3587096] win vista/7: "can't find init.tcl" when called via junction without folder list access. 2013-01-07 Jan Nijtmans <[email protected]> * generic/tclOOStubLib.c: Restrict the stub library to only use * generic/tclTomMathStubLib.c: Tcl_PkgRequireEx, Tcl_ResetResult and Tcl_AppendResult, not any other function. This puts least restrictions on eventual Tcl 9 stubs re-organization, and it |
︙ | ︙ |
Changes to generic/tclExecute.c.
︙ | ︙ | |||
1081 1082 1083 1084 1085 1086 1087 | * any) and growth to hold the complete stack requirements: add one for * the marker, (WALLOCALIGN-1) for the maximal possible offset. */ if (move) { moveWords = esPtr->tosPtr - MEMSTART(markerPtr) + 1; } | | | 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 | * any) and growth to hold the complete stack requirements: add one for * the marker, (WALLOCALIGN-1) for the maximal possible offset. */ if (move) { moveWords = esPtr->tosPtr - MEMSTART(markerPtr) + 1; } needed = growth + moveWords + WALLOCALIGN; /* * Check if there is enough room in the next stack (if there is one, it * should be both empty and the last one!) */ |
︙ | ︙ |
Changes to library/http/http.tcl.
︙ | ︙ | |||
977 978 979 980 981 982 983 | } } elseif {$state(state) eq "header"} { if {[catch {gets $sock line} n]} { return [Finish $token $n] } elseif {$n == 0} { # We have now read all headers # We ignore HTTP/1.1 100 Continue returns. RFC2616 sec 8.2.3 | | | 977 978 979 980 981 982 983 984 985 986 987 988 989 990 991 | } } elseif {$state(state) eq "header"} { if {[catch {gets $sock line} n]} { return [Finish $token $n] } elseif {$n == 0} { # We have now read all headers # We ignore HTTP/1.1 100 Continue returns. RFC2616 sec 8.2.3 if {$state(http) == "" || ([regexp {^\S+\s(\d+)} $state(http) {} x] && $x == 100)} { return } set state(state) body # If doing a HEAD, then we won't get any body if {$state(-validate)} { |
︙ | ︙ |