diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-13 16:53:43 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-13 16:53:43 (GMT) |
| commit | 46a5d4b5fa40f76f18980d1995c96698335ad4b2 (patch) | |
| tree | a58fd7d23391c0eaafbfa7ce8cadc298e07c851d | |
| parent | 874327229c5e64a52e1fc3b4da6a31936ec07ed2 (diff) | |
| download | tcl-46a5d4b5fa40f76f18980d1995c96698335ad4b2.zip tcl-46a5d4b5fa40f76f18980d1995c96698335ad4b2.tar.gz tcl-46a5d4b5fa40f76f18980d1995c96698335ad4b2.tar.bz2 | |
Fix compilation error for STATS=memdbg. Fix incorrect comment
| -rw-r--r-- | generic/tclInt.h | 2 | ||||
| -rw-r--r-- | generic/tclLink.c | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 036c653..2d29e1d 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4906,7 +4906,7 @@ MODULE_SCOPE Tcl_LibraryInitProc Procbodytest_SafeInit; if (uw_ > WIDE_MAX) { \ mp_int bignumValue_; \ if (mp_init_u64(&bignumValue_, uw_) == MP_OKAY) { \ - (objPtr) = Tcl_NewBignumObj(&bignumValue_)); \ + (objPtr) = Tcl_NewBignumObj(&bignumValue_); \ } else { \ (objPtr) = NULL; \ } \ diff --git a/generic/tclLink.c b/generic/tclLink.c index af48302..1973067 100644 --- a/generic/tclLink.c +++ b/generic/tclLink.c @@ -557,9 +557,9 @@ GetUWide( while (numBytes-- > 0) { value = (value << CHAR_BIT) | *bytes++; } -#else /* !WORDS_BIGENDIAN */ +#else /* WORDS_BIGENDIAN */ /* - * Little-endian can read the value directly. + * Big-endian can read the value directly. */ value = scratch.value; #endif /* WORDS_BIGENDIAN */ |