diff options
| author | dgp <dgp@users.sourceforge.net> | 2021-08-26 19:12:39 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2021-08-26 19:12:39 (GMT) |
| commit | a0d2c4332f99377ecd5aef74d42b0041501be806 (patch) | |
| tree | 0985e7a4150c1863b22f5e0eff119fe962340aa7 | |
| parent | 9c9b2cacae6577f7e44679f67806acc56c981bb8 (diff) | |
| download | tcl-a0d2c4332f99377ecd5aef74d42b0041501be806.zip tcl-a0d2c4332f99377ecd5aef74d42b0041501be806.tar.gz tcl-a0d2c4332f99377ecd5aef74d42b0041501be806.tar.bz2 | |
repair broken build
| -rw-r--r-- | generic/tclOO.decls | 2 | ||||
| -rw-r--r-- | generic/tclOODecls.h | 8 | ||||
| -rw-r--r-- | generic/tclOOStubInit.c | 4 |
3 files changed, 7 insertions, 7 deletions
diff --git a/generic/tclOO.decls b/generic/tclOO.decls index 13d6ffa..8a4fd1e 100644 --- a/generic/tclOO.decls +++ b/generic/tclOO.decls @@ -127,7 +127,7 @@ declare 28 { Tcl_Obj *Tcl_GetObjectName(Tcl_Interp *interp, Tcl_Object object) } declare 31 { - void TclUnusedStubEntry(void) + void TclOOUnusedStubEntry(void) } ###################################################################### diff --git a/generic/tclOODecls.h b/generic/tclOODecls.h index c31828e..888b474 100644 --- a/generic/tclOODecls.h +++ b/generic/tclOODecls.h @@ -119,7 +119,7 @@ TCLAPI Tcl_Obj * Tcl_GetObjectName(Tcl_Interp *interp, /* Slot 29 is reserved */ /* Slot 30 is reserved */ /* 31 */ -TCLAPI void TclUnusedStubEntry(void); +TCLAPI void TclOOUnusedStubEntry(void); typedef struct { const struct TclOOIntStubs *tclOOIntStubs; @@ -160,7 +160,7 @@ typedef struct TclOOStubs { Tcl_Obj * (*tcl_GetObjectName) (Tcl_Interp *interp, Tcl_Object object); /* 28 */ void (*reserved29)(void); void (*reserved30)(void); - void (*tclUnusedStubEntry) (void); /* 31 */ + void (*tclOOUnusedStubEntry) (void); /* 31 */ } TclOOStubs; extern const TclOOStubs *tclOOStubsPtr; @@ -235,8 +235,8 @@ extern const TclOOStubs *tclOOStubsPtr; (tclOOStubsPtr->tcl_GetObjectName) /* 28 */ /* Slot 29 is reserved */ /* Slot 30 is reserved */ -#define TclUnusedStubEntry \ - (tclOOStubsPtr->tclUnusedStubEntry) /* 31 */ +#define TclOOUnusedStubEntry \ + (tclOOStubsPtr->tclOOUnusedStubEntry) /* 31 */ #endif /* defined(USE_TCLOO_STUBS) */ diff --git a/generic/tclOOStubInit.c b/generic/tclOOStubInit.c index 651b20e..e8534eb 100644 --- a/generic/tclOOStubInit.c +++ b/generic/tclOOStubInit.c @@ -14,7 +14,7 @@ MODULE_SCOPE const TclOOStubs tclOOStubs; #pragma GCC dependency "tclOO.decls" #endif -#define TclUnusedStubEntry 0 +#define TclOOUnusedStubEntry 0 /* !BEGIN!: Do not edit below this line. */ @@ -77,7 +77,7 @@ const TclOOStubs tclOOStubs = { Tcl_GetObjectName, /* 28 */ 0, /* 29 */ 0, /* 30 */ - TclUnusedStubEntry, /* 31 */ + TclOOUnusedStubEntry, /* 31 */ }; /* !END!: Do not edit above this line. */ |