diff options
Diffstat (limited to 'ext/tcltklib/tcltklib.c')
-rw-r--r-- | ext/tcltklib/tcltklib.c | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/ext/tcltklib/tcltklib.c b/ext/tcltklib/tcltklib.c index 2792e53388..0217ab8feb 100644 --- a/ext/tcltklib/tcltklib.c +++ b/ext/tcltklib/tcltklib.c @@ -97,7 +97,8 @@ static VALUE ip_invoke _((int, VALUE*, VALUE)); /* from tkAppInit.c */ -#if !defined __MINGW32__ +#if TCL_MAJOR_VERSION < 8 || (TCL_MAJOR_VERSION == 8 && TCL_MINOR_VERSION < 4) +# if !defined __MINGW32__ && !defined __BORLANDC__ /* * The following variable is a special hack that is needed in order for * Sun shared libraries to be used for Tcl. @@ -105,6 +106,7 @@ static VALUE ip_invoke _((int, VALUE*, VALUE)); extern int matherr(); int *tclDummyMathPtr = (int *) matherr; +# endif #endif /*---- module TclTkLib ----*/ |