Tcl Source Code

Check-in [ac3d594d13]
Login
Bounty program for improvements to Tcl and certain Tcl packages.
Tcl 2019 Conference, Houston/TX, US, Nov 4-8
Send your abstracts to [email protected]
or submit via the online form by Sep 9.

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

Overview
Comment:merge 8.7
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA3-256: ac3d594d13258e52d7bef38745dbe3d1c0a049b9bd1a105cb841cf9eb9a6b25f
User & Date: jan.nijtmans 2018-03-25 17:43:52
Context
2018-03-25
19:21
merge 8.7 check-in: ca6015cda1 user: jan.nijtmans tags: trunk
17:43
merge 8.7 check-in: ac3d594d13 user: jan.nijtmans tags: trunk
17:43
workaround for TclFormatInt on CYGWIN is no longer necessary now. check-in: 740e91a7f8 user: jan.nijtmans tags: core-8-branch
2018-03-24
10:22
Update TZ info to tzdata2018d. check-in: 4432824433 user: jima tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to generic/tclStubInit.c.

206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
   return Tcl_UtfNcasecmp(s1, s2, (unsigned long)n);
}
#define Tcl_UtfNcasecmp (int(*)(const char*,const char*,unsigned long))utfNcasecmp
static int uniCharNcasecmp(const Tcl_UniChar *ucs, const Tcl_UniChar *uct, unsigned int n){
   return Tcl_UniCharNcasecmp(ucs, uct, (unsigned long)n);
}
#define Tcl_UniCharNcasecmp (int(*)(const Tcl_UniChar*,const Tcl_UniChar*,unsigned long))uniCharNcasecmp
static int formatInt(char *buffer, int n){
   return TclFormatInt(buffer, (long)n);
}
#define TclFormatInt (int(*)(char *, long))formatInt

#endif /* TCL_WIDE_INT_IS_LONG */

#endif /* __CYGWIN__ */

#if defined(TCL_NO_DEPRECATED)
#   undef Tcl_SetBooleanObj






<
<
<
<







206
207
208
209
210
211
212




213
214
215
216
217
218
219
   return Tcl_UtfNcasecmp(s1, s2, (unsigned long)n);
}
#define Tcl_UtfNcasecmp (int(*)(const char*,const char*,unsigned long))utfNcasecmp
static int uniCharNcasecmp(const Tcl_UniChar *ucs, const Tcl_UniChar *uct, unsigned int n){
   return Tcl_UniCharNcasecmp(ucs, uct, (unsigned long)n);
}
#define Tcl_UniCharNcasecmp (int(*)(const Tcl_UniChar*,const Tcl_UniChar*,unsigned long))uniCharNcasecmp





#endif /* TCL_WIDE_INT_IS_LONG */

#endif /* __CYGWIN__ */

#if defined(TCL_NO_DEPRECATED)
#   undef Tcl_SetBooleanObj