Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | remove one level of indirection in non-mem-debug builds |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | mig-alloc-reform |
| Files: | files | file ages | folders |
| SHA1: |
0e843f63e5917d51127cf5a128dc2040 |
| User & Date: | mig 2011-03-21 13:41:50 |
Context
|
2011-03-21
| ||
| 14:38 | fix last commit check-in: 54811e2ece user: mig tags: mig-alloc-reform | |
| 13:41 | remove one level of indirection in non-mem-debug builds check-in: 0e843f63e5 user: mig tags: mig-alloc-reform | |
| 11:42 | some cleanup re obj deletion check-in: ca6e8a9e5e user: mig tags: mig-alloc-reform | |
Changes
Changes to generic/tclCkalloc.c.
| ︙ | ︙ | |||
16 17 18 19 20 21 22 23 24 25 26 27 28 29 | */ #include "tclInt.h" #define FALSE 0 #define TRUE 1 #ifdef TCL_MEM_DEBUG /* * One of the following structures is allocated each time the * "memory tag" command is invoked, to hold the current tag. */ | > > > > > > | 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 | */ #include "tclInt.h" #define FALSE 0 #define TRUE 1 #undef Tcl_Alloc #undef Tcl_Free #undef Tcl_Realloc #undef Tcl_AttemptAlloc #undef Tcl_AttemptRealloc #ifdef TCL_MEM_DEBUG /* * One of the following structures is allocated each time the * "memory tag" command is invoked, to hold the current tag. */ |
| ︙ | ︙ | |||
732 733 734 735 736 737 738 | * * Side effects: * Same as the debug versions. * *---------------------------------------------------------------------- */ | < < < < < < | 738 739 740 741 742 743 744 745 746 747 748 749 750 751 |
*
* Side effects:
* Same as the debug versions.
*
*----------------------------------------------------------------------
*/
char *
Tcl_Alloc(
unsigned int size)
{
return Tcl_DbCkalloc(size, "unknown", 0);
}
|
| ︙ | ︙ |
Changes to generic/tclInt.h.
| ︙ | ︙ | |||
4495 4496 4497 4498 4499 4500 4501 4502 4503 4504 4505 4506 4507 4508 | #else #define NRE_ASSERT(expr) #endif #include "tclIntDecls.h" #include "tclIntPlatDecls.h" #include "tclTomMathDecls.h" #endif /* _TCLINT */ /* * Local Variables: * mode: c * c-basic-offset: 4 | > > > > > > | 4495 4496 4497 4498 4499 4500 4501 4502 4503 4504 4505 4506 4507 4508 4509 4510 4511 4512 4513 4514 | #else #define NRE_ASSERT(expr) #endif #include "tclIntDecls.h" #include "tclIntPlatDecls.h" #include "tclTomMathDecls.h" #if !defined(USE_TCL_STUBS) && !defined(TCL_MEM_DEBUG) #define Tcl_AttemptAlloc TclpAlloc #define Tcl_AttemptRealloc TclpRealloc #define Tcl_Free TclpFree #endif #endif /* _TCLINT */ /* * Local Variables: * mode: c * c-basic-offset: 4 |
| ︙ | ︙ |