1
0
Fork 0
mirror of git://git.code.sf.net/p/cdesktopenv/code synced 2025-03-09 15:50:02 +00:00

dtdocbook/tcl/tcl.h: Add compatibility defines for old Tcl

dtdocbook/instant has been modified to use a more modern Tcl (8.6),
which means certain functions are not present when we are using the
dtdocbook/tcl (7.5) version of tcl instead of a modern system version.

So, create some defines that should work around this problem.
This commit is contained in:
Jon Trulson 2018-09-20 16:50:28 -06:00
parent 6a72e2cea8
commit 1c40db8eb0

View file

@ -1069,4 +1069,19 @@ EXTERN void Tcl_WatchFile _ANSI_ARGS_((Tcl_File file,
EXTERN int Tcl_Write _ANSI_ARGS_((Tcl_Channel chan,
char *s, int slen));
/* JET 8/2018
*
* dtdocbook/instant has been modified to use a more modern Tcl (8.6),
* which means certain functions are not present when we are using the
* dtdocbook/tcl (7.5) version of tcl instead of a modern system
* version. So, create some defines that should work around this
* problem.
*/
#define Tcl_Alloc(n) malloc(n)
#define Tcl_Free(p) free(p)
#define Tcl_GetStringResult(i) ((i)->result)
#define Tcl_GetErrorLine(i) ((i)->errorLine)
#endif /* _TCL */