Tcl Source Code

Check-in [8f2bc5aa20]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:fix comments
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | mig-alloc-reform
Files: files | file ages | folders
SHA1: 8f2bc5aa20a16d80737d22d9fde9f61ee95080c9
User & Date: mig 2011-03-24 12:05:10
Context
2011-03-24
19:24
merge trunk into feature branch check-in: 7649a6b239 user: mig tags: mig-alloc-reform
12:05
fix comments check-in: 8f2bc5aa20 user: mig tags: mig-alloc-reform
11:39
merge trunk check-in: 4bc0292a61 user: mig tags: mig-alloc-reform
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclAlloc.c.

147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
#define magicNum2	u.s.magic2
#define used	        u.s.inUse
#define MAGIC		0xEF

/*
 * The following defines the minimum and maximum block sizes and the number
 * of buckets in the bucket cache.
 *                        32b    64b    Apple-32b
 *     TCL_ALLOCALIGN       8     16       16
 *     sizeof(Block)        8     16       16
 *     OFFSET               8     16       16
 *     ALLOCBASE           24     48       24
 *     MINALLOC            24     48       24
 *     NBUCKETS            11     10       11
 *     MAXALLOC         24576  24576    24576
 *     small allocs      1024    512     1024
 *        at a time
 */

#define MINALLOC    ALIGN(OFFSET+8)
#define NBUCKETS    (11 - (MINALLOC >> 5))
#define MAXALLOC    (MINALLOC << (NBUCKETS - 1))







|



<
|
|
|







147
148
149
150
151
152
153
154
155
156
157

158
159
160
161
162
163
164
165
166
167
#define magicNum2	u.s.magic2
#define used	        u.s.inUse
#define MAGIC		0xEF

/*
 * The following defines the minimum and maximum block sizes and the number
 * of buckets in the bucket cache.
 *                        32b    64b    Apple-32b(?)
 *     TCL_ALLOCALIGN       8     16       16
 *     sizeof(Block)        8     16       16
 *     OFFSET               8     16       16

 *     MINALLOC            16     32       32
 *     NBUCKETS            11     10       10
 *     MAXALLOC         16384  16384    16384
 *     small allocs      1024    512     1024
 *        at a time
 */

#define MINALLOC    ALIGN(OFFSET+8)
#define NBUCKETS    (11 - (MINALLOC >> 5))
#define MAXALLOC    (MINALLOC << (NBUCKETS - 1))