Make Tk_CanvasTextInfo and tkScrollbar.h usable for Tk 8.x-compiles t…

…oo. See [22d2341c9d]
tcltk · Nov 14, 2024 · 12311eb · 12311eb
2 parents f01cc2b + 37b89a8
commit 12311eb
Show file tree

Hide file tree

Showing 2 changed files with 5 additions and 0 deletions.
diff --git a/generic/tk.h b/generic/tk.h
@@ -1154,9 +1154,11 @@ typedef struct Tk_CanvasTextInfo {
     int cursorOn;		/* Non-zero means that an insertion cursor
 				 * should be displayed in focusItemPtr.
 				 * Read-only to items.*/
+#if TK_MAJOR_VERSION > 8
     void *reserved1;		/* reserved for future use */
     void *reserved2;
     void *reserved3;
+#endif
 } Tk_CanvasTextInfo;
 
 /*

diff --git a/generic/tkScrollbar.h b/generic/tkScrollbar.h
@@ -107,6 +107,9 @@ typedef struct TkScrollbar {
      * is provided by the application by invoking the "set" widget command.
      */
 
+#if TK_MAJOR_VERSION < 9
+    int dummy1, dummy2, dummy3, dummy4; /* deprecated, for "old" form. */
+#endif
     double firstFraction;	/* Position of first visible thing in window,
 				 * specified as a fraction between 0 and 1.0. */
     double lastFraction;	/* Position of last visible thing in window,