Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | * generic/tclExecute.c (TclCompileObj): earlier return if Tip280 gymnastics not needed. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
63b453f5842f81a4a311e7ae3cd9bdb4 |
| User & Date: | mig 2011-04-07 02:56:45 |
Context
|
2011-04-12
| ||
| 07:26 | revert 6b6ef4e0b1, removing the temporary tests again check-in: b580ef3c9e user: jan.nijtmans tags: trunk | |
|
2011-04-07
| ||
| 10:19 | Add some (temporary) test cases showing the problem with --export-dynamic check-in: 6b6ef4e0b1 user: jan.nijtmans tags: trunk | |
| 02:57 | merge trunk to feature branch check-in: fec12a456e user: mig tags: mig-no280 | |
| 02:56 | * generic/tclExecute.c (TclCompileObj): earlier return if Tip280 gymnastics not needed. check-in: 63b453f584 user: mig tags: trunk | |
| 02:53 | * generic/tclExecute.c (TclCompEvalObj): earlier return if Tip280 gymnastics not needed check-in: 9ac9ca33b6 user: mig tags: core-8-5-branch | |
| 00:11 | last bugfix was incomplete check-in: df052ad59f user: mig tags: trunk | |
Changes
Changes to ChangeLog.
1 2 3 4 | 2011-04-06 Miguel Sofer <[email protected]> * generic/tclExecute.c: fix for [Bug 3274728], making *catchTop an unsigned long. | > > > | | 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 | 2011-04-06 Miguel Sofer <[email protected]> * generic/tclExecute.c (TclCompileObj): earlier return if Tip280 gymnastics not needed. * generic/tclExecute.c: fix for [Bug 3274728], making *catchTop an unsigned long. 2011-04-06 Jan Nijtmans <[email protected]> * unix/tclAppInit.c: Make symbols "main" and "Tcl_AppInit" MODULE_SCOPE: there is absolutely no reason for exporting them. * unix/tcl.m4: Don't use -fvisibility=hidden with static * unix/configure libraries (--disable-shared) |
| ︙ | ︙ |
Changes to generic/tclExecute.c.
| ︙ | ︙ | |||
1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 |
* offset between saved starting line and actual one. Then modify
* the users to adjust the locations they have by this offset.
*
* (3) Alternative 2: Do not fully recompile, adjust just the location
* information.
*/
{
Tcl_HashEntry *hePtr =
Tcl_FindHashEntry(iPtr->lineBCPtr, codePtr);
ExtCmdLoc *eclPtr;
CmdFrame *ctxPtr;
int redo;
| > > > > | | 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698 1699 1700 1701 1702 1703 1704 1705 1706 1707 1708 1709 |
* offset between saved starting line and actual one. Then modify
* the users to adjust the locations they have by this offset.
*
* (3) Alternative 2: Do not fully recompile, adjust just the location
* information.
*/
if (!invoker) {
return codePtr;
}
{
Tcl_HashEntry *hePtr =
Tcl_FindHashEntry(iPtr->lineBCPtr, codePtr);
ExtCmdLoc *eclPtr;
CmdFrame *ctxPtr;
int redo;
if (!hePtr) {
return codePtr;
}
eclPtr = Tcl_GetHashValue(hePtr);
redo = 0;
ctxPtr = TclStackAlloc(interp, sizeof(CmdFrame));
*ctxPtr = *invoker;
|
| ︙ | ︙ |