diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-07-10 13:53:49 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-07-10 13:53:49 (GMT) |
| commit | 569dc6043445e22c0b79c5f860dd2716c0cafef7 (patch) | |
| tree | e70b34b9c6aafcca166742af3b48bd790566cefa /generic/tkInt.h | |
| parent | 365059dd56e66d2056e28432b1420bfe676c260b (diff) | |
| download | tk-569dc6043445e22c0b79c5f860dd2716c0cafef7.zip tk-569dc6043445e22c0b79c5f860dd2716c0cafef7.tar.gz tk-569dc6043445e22c0b79c5f860dd2716c0cafef7.tar.bz2 | |
Add TkLengthOne() function, just as TclLengthOne() in Tcl, for optimization within Tk internal objTypes. No need to define TCL_OBJTYPE_V0 in tclInt.h anymore (Tcl 8.7+ has it)
Diffstat (limited to 'generic/tkInt.h')
| -rw-r--r-- | generic/tkInt.h | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/generic/tkInt.h b/generic/tkInt.h index c293306..6448c92 100644 --- a/generic/tkInt.h +++ b/generic/tkInt.h @@ -1069,10 +1069,6 @@ typedef struct { size_t version; } TkObjType; -#ifndef TCL_OBJTYPE_V0 -# define TCL_OBJTYPE_V0 /* just empty */ -#endif - MODULE_SCOPE const TkObjType tkBorderObjType; MODULE_SCOPE const TkObjType tkBitmapObjType; MODULE_SCOPE const TkObjType tkColorObjType; @@ -1264,6 +1260,7 @@ MODULE_SCOPE void TkpDrawFrameEx(Tk_Window tkwin, Drawable drawable, int borderWidth, int relief); MODULE_SCOPE void TkpShowBusyWindow(TkBusy busy); MODULE_SCOPE void TkpHideBusyWindow(TkBusy busy); +MODULE_SCOPE Tcl_Size TkLengthOne(Tcl_Obj *); MODULE_SCOPE void TkpMakeTransparentWindowExist(Tk_Window tkwin, Window parent); MODULE_SCOPE void TkpCreateBusy(Tk_FakeWin *winPtr, Tk_Window tkRef, |