dtdocbook/instant: add Tcl_GetErrorLine check for older versions of Tcl
This commit is contained in:
@@ -55,6 +55,11 @@ static char *gen_h_RCSid =
|
|||||||
/* get Tcl header so the variables make sense */
|
/* get Tcl header so the variables make sense */
|
||||||
#include <tcl.h>
|
#include <tcl.h>
|
||||||
|
|
||||||
|
/* Compatibility with pre 8.6 versions */
|
||||||
|
#if (TCL_MAJOR_VERSION < 8) || (TCL_MAJOR_VERSION == 8) && (TCL_MINOR_VERSION < 6)
|
||||||
|
# define Tcl_GetErrorLine(x) ((x)->errorLine)
|
||||||
|
#endif
|
||||||
|
|
||||||
/* instant variable delimiter (can't use '$', collides with Tcl) */
|
/* instant variable delimiter (can't use '$', collides with Tcl) */
|
||||||
#define VDELIM '@'
|
#define VDELIM '@'
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user