summaryrefslogtreecommitdiffstats
path: root/generic/tclAlloc.c
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2020-03-18 12:51:30 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2020-03-18 12:51:30 (GMT)
commitaf7fa225c1d0ec592c7af29ead5922f45c1c15fb (patch)
tree3582411900a7dd47db3f96290226a1dea37804e4 /generic/tclAlloc.c
parent27c27e941a08c8ea873a5de4333a498788a22c33 (diff)
downloadtcl-af7fa225c1d0ec592c7af29ead5922f45c1c15fb.zip
tcl-af7fa225c1d0ec592c7af29ead5922f45c1c15fb.tar.gz
tcl-af7fa225c1d0ec592c7af29ead5922f45c1c15fb.tar.bz2
More uppercase HEX representations in source-code.
Diffstat (limited to 'generic/tclAlloc.c')
-rw-r--r--generic/tclAlloc.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclAlloc.c b/generic/tclAlloc.c
index cda1f38..f4755b3 100644
--- a/generic/tclAlloc.c
+++ b/generic/tclAlloc.c
@@ -68,7 +68,7 @@ union overhead {
};
-#define MAGIC 0xef /* magic # on accounting info */
+#define MAGIC 0xEF /* magic # on accounting info */
#define RMAGIC 0x5555 /* magic # on range info */
#ifndef NDEBUG
@@ -288,7 +288,7 @@ TclpAlloc(
overPtr = (union overhead *) (bigBlockPtr + 1);
overPtr->overMagic0 = overPtr->overMagic1 = MAGIC;
- overPtr->bucketIndex = 0xff;
+ overPtr->bucketIndex = 0xFF;
#ifdef MSTATS
numMallocs[NBUCKETS]++;
#endif
@@ -469,7 +469,7 @@ TclpFree(
RANGE_ASSERT(overPtr->rangeCheckMagic == RMAGIC);
RANGE_ASSERT(BLOCK_END(overPtr) == RMAGIC);
size = overPtr->bucketIndex;
- if (size == 0xff) {
+ if (size == 0xFF) {
#ifdef MSTATS
numMallocs[NBUCKETS]--;
#endif
@@ -543,7 +543,7 @@ TclpRealloc(
* If the block isn't in a bin, just realloc it.
*/
- if (i == 0xff) {
+ if (i == 0xFF) {
struct block *prevPtr, *nextPtr;
bigBlockPtr = (struct block *) overPtr - 1;
prevPtr = bigBlockPtr->prevPtr;