diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-22 11:32:30 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2020-05-22 11:32:30 (GMT) |
| commit | 4ff5c4550c95c7826e799567115b825bbc402d81 (patch) | |
| tree | 248a1cba93c46b3e455088839c0f88f5f101ace8 /generic/tkInt.h | |
| parent | 47959a65e0ee7afdac78bdd4e9364143071c8c99 (diff) | |
| parent | 418047d43e5fde9bc3489580cc881324f5f3da7d (diff) | |
| download | tk-4ff5c4550c95c7826e799567115b825bbc402d81.zip tk-4ff5c4550c95c7826e799567115b825bbc402d81.tar.gz tk-4ff5c4550c95c7826e799567115b825bbc402d81.tar.bz2 | |
More progress
Diffstat (limited to 'generic/tkInt.h')
| -rw-r--r-- | generic/tkInt.h | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/generic/tkInt.h b/generic/tkInt.h index a4c2891..f23aa74 100644 --- a/generic/tkInt.h +++ b/generic/tkInt.h @@ -113,10 +113,6 @@ # endif #endif -#ifndef TCL_AUTO_LENGTH -# define TCL_AUTO_LENGTH (-1) -#endif - #ifndef TCL_Z_MODIFIER # if defined(_WIN64) # define TCL_Z_MODIFIER "I" @@ -1287,6 +1283,15 @@ MODULE_SCOPE int TkGetDoublePixels(Tcl_Interp *interp, Tk_Window tkwin, MODULE_SCOPE int TkPostscriptImage(Tcl_Interp *interp, Tk_Window tkwin, Tk_PostscriptInfo psInfo, XImage *ximage, int x, int y, int width, int height); +#if TCL_MAJOR_VERSION > 8 +MODULE_SCOPE int TkCanvasTagsParseProc(ClientData clientData, Tcl_Interp *interp, + Tk_Window tkwin, const char *value, char *widgRec, size_t offset); +MODULE_SCOPE const char *TkCanvasTagsPrintProc(ClientData clientData, Tk_Window tkwin, + char *widgRec, size_t offset, Tcl_FreeProc **freeProcPtr); +#else +#define TkCanvasTagsParseProc Tk_CanvasTagsParseProc +#define TkCanvasTagsPrintProc Tk_CanvasTagsPrintProc +#endif MODULE_SCOPE void TkMapTopFrame(Tk_Window tkwin); MODULE_SCOPE XEvent * TkpGetBindingXEvent(Tcl_Interp *interp); MODULE_SCOPE void TkCreateExitHandler(Tcl_ExitProc *proc, |