diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-10 15:39:15 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2021-03-10 15:39:15 (GMT) |
| commit | f6387b0543a2924c6997012081f5c4d15042bab0 (patch) | |
| tree | a4958cb3ca82ac54079b26a0d7315332bd75b55b /generic/tclInt.h | |
| parent | 27ecca46c849a77dde80630d6b9318774a4aca99 (diff) | |
| download | tcl-f6387b0543a2924c6997012081f5c4d15042bab0.zip tcl-f6387b0543a2924c6997012081f5c4d15042bab0.tar.gz tcl-f6387b0543a2924c6997012081f5c4d15042bab0.tar.bz2 | |
Fix [4c591fa487]: [string compare] EIAS violation
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 5da21b0..9fec41e 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -4534,7 +4534,7 @@ MODULE_SCOPE void TclDbInitNewObj(Tcl_Obj *objPtr, const char *file, *---------------------------------------------------------------- */ -#ifdef WORDS_BIGENDIAN +#if defined(WORDS_BIGENDIAN) && (TCL_UTF_MAX != 4) # define TclUniCharNcmp(cs,ct,n) memcmp((cs),(ct),(n)*sizeof(Tcl_UniChar)) #else /* !WORDS_BIGENDIAN */ # define TclUniCharNcmp Tcl_UniCharNcmp |