diff options
Diffstat (limited to 'generic/tclStubs.c')
| -rw-r--r-- | generic/tclStubs.c | 61 |
1 files changed, 60 insertions, 1 deletions
diff --git a/generic/tclStubs.c b/generic/tclStubs.c index f562016..d73d0f1 100644 --- a/generic/tclStubs.c +++ b/generic/tclStubs.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStubs.c,v 1.3 1999/03/10 05:52:50 stanton Exp $ + * RCS: @(#) $Id: tclStubs.c,v 1.4 1999/03/10 23:19:10 redman Exp $ */ #include "tcl.h" @@ -2695,5 +2695,64 @@ panicVA(format, argList) (tclStubsPtr->panicVA)(format, argList); } +/* Slot 279 */ +void +Tcl_GetVersion(major, minor, patchLevel, type) + int * major; + int * minor; + int * patchLevel; + Tcl_ReleaseType * type; +{ + (tclStubsPtr->tcl_GetVersion)(major, minor, patchLevel, type); +} + +/* Slot 280 */ +# Reserved for future +use(8.1) + 8.0.x vs. 8.1; +{ + return (tclStubsPtr->use)(8.1); +} + +/* Slot 281 */ +# Reserved for future +use(8.1) + 8.0.x vs. 8.1; +{ + return (tclStubsPtr->use)(8.1); +} + +/* Slot 282 */ +# Reserved for future +use(8.1) + 8.0.x vs. 8.1; +{ + return (tclStubsPtr->use)(8.1); +} + +/* Slot 283 */ +# Reserved for future +use(8.1) + 8.0.x vs. 8.1; +{ + return (tclStubsPtr->use)(8.1); +} + +/* Slot 284 */ +# Reserved for future +use(8.1) + 8.0.x vs. 8.1; +{ + return (tclStubsPtr->use)(8.1); +} + +/* Slot 285 */ +# Reserved for future +use(8.1) + 8.0.x vs. 8.1; +{ + return (tclStubsPtr->use)(8.1); +} + /* !END!: Do not edit above this line. */ |