diff options
| -rw-r--r-- | generic/tk.decls | 8 | ||||
| -rw-r--r-- | generic/tkDecls.h | 10 | ||||
| -rw-r--r-- | generic/tkStubInit.c | 3 |
3 files changed, 18 insertions, 3 deletions
diff --git a/generic/tk.decls b/generic/tk.decls index e607105..78564de 100644 --- a/generic/tk.decls +++ b/generic/tk.decls @@ -11,7 +11,7 @@ # See the file "license.terms" for information on usage and redistribution # of this file, and for a DISCLAIMER OF ALL WARRANTIES. # -# RCS: @(#) $Id: tk.decls,v 1.17 2002/01/31 04:42:00 dgp Exp $ +# RCS: @(#) $Id: tk.decls,v 1.18 2002/04/05 08:38:22 hobbs Exp $ library tk @@ -1158,6 +1158,12 @@ declare 244 generic { int minWidth, int minHeight) } +# New in 8.4a5 +# +declare 245 generic { + void Tk_SetCaretPos (Tk_Window tkwin, int x, int y, int height) +} + # Define the platform specific public Tk interface. These functions are # only available on the designated platform. diff --git a/generic/tkDecls.h b/generic/tkDecls.h index d787cf6..057295e 100644 --- a/generic/tkDecls.h +++ b/generic/tkDecls.h @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkDecls.h,v 1.17 2002/01/31 04:42:00 dgp Exp $ + * RCS: @(#) $Id: tkDecls.h,v 1.18 2002/04/05 08:38:22 hobbs Exp $ */ #ifndef _TKDECLS @@ -843,6 +843,9 @@ EXTERN void Tk_SetInternalBorderEx _ANSI_ARGS_((Tk_Window tkwin, /* 244 */ EXTERN void Tk_SetMinimumRequestSize _ANSI_ARGS_(( Tk_Window tkwin, int minWidth, int minHeight)); +/* 245 */ +EXTERN void Tk_SetCaretPos _ANSI_ARGS_((Tk_Window tkwin, int x, + int y, int height)); typedef struct TkStubHooks { struct TkPlatStubs *tkPlatStubs; @@ -1100,6 +1103,7 @@ typedef struct TkStubs { void (*tk_SetClassProcs) _ANSI_ARGS_((Tk_Window tkwin, Tk_ClassProcs * procs, ClientData instanceData)); /* 242 */ void (*tk_SetInternalBorderEx) _ANSI_ARGS_((Tk_Window tkwin, int left, int right, int top, int bottom)); /* 243 */ void (*tk_SetMinimumRequestSize) _ANSI_ARGS_((Tk_Window tkwin, int minWidth, int minHeight)); /* 244 */ + void (*tk_SetCaretPos) _ANSI_ARGS_((Tk_Window tkwin, int x, int y, int height)); /* 245 */ } TkStubs; #ifdef __cplusplus @@ -2090,6 +2094,10 @@ extern TkStubs *tkStubsPtr; #define Tk_SetMinimumRequestSize \ (tkStubsPtr->tk_SetMinimumRequestSize) /* 244 */ #endif +#ifndef Tk_SetCaretPos +#define Tk_SetCaretPos \ + (tkStubsPtr->tk_SetCaretPos) /* 245 */ +#endif #endif /* defined(USE_TK_STUBS) && !defined(USE_TK_STUB_PROCS) */ diff --git a/generic/tkStubInit.c b/generic/tkStubInit.c index 80ce36b..450bab7 100644 --- a/generic/tkStubInit.c +++ b/generic/tkStubInit.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tkStubInit.c,v 1.30 2001/12/04 03:07:43 mdejong Exp $ + * RCS: @(#) $Id: tkStubInit.c,v 1.31 2002/04/05 08:38:22 hobbs Exp $ */ #include "tkInt.h" @@ -879,6 +879,7 @@ TkStubs tkStubs = { Tk_SetClassProcs, /* 242 */ Tk_SetInternalBorderEx, /* 243 */ Tk_SetMinimumRequestSize, /* 244 */ + Tk_SetCaretPos, /* 245 */ }; /* !END!: Do not edit above this line. */ |