diff options
| author | nijtmans <nijtmans> | 2010-03-27 22:47:04 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-03-27 22:47:04 (GMT) |
| commit | d6b47c13b9de8ed40d1c144b8a70ccec677a5231 (patch) | |
| tree | d65014decff2b760a5c13d4a872918187510515e /unix/dltest/pkgc.c | |
| parent | 419d5645c272033992ce63a5c714a64436e9f189 (diff) | |
| download | tcl-d6b47c13b9de8ed40d1c144b8a70ccec677a5231.zip tcl-d6b47c13b9de8ed40d1c144b8a70ccec677a5231.tar.gz tcl-d6b47c13b9de8ed40d1c144b8a70ccec677a5231.tar.bz2 | |
Provide "lowest supported Tcl version" to
the Tcl_InitStubs functions in unix/dltest,
in stead of "current Tcl version"
Diffstat (limited to 'unix/dltest/pkgc.c')
| -rw-r--r-- | unix/dltest/pkgc.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/unix/dltest/pkgc.c b/unix/dltest/pkgc.c index 3e50863..16c768a 100644 --- a/unix/dltest/pkgc.c +++ b/unix/dltest/pkgc.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: pkgc.c,v 1.11 2010/02/22 23:31:42 nijtmans Exp $ + * RCS: @(#) $Id: pkgc.c,v 1.12 2010/03/27 22:47:04 nijtmans Exp $ */ #include "tcl.h" @@ -122,7 +122,7 @@ Pkgc_Init( { int code; - if (Tcl_InitStubs(interp, TCL_VERSION, 0) == NULL) { + if (Tcl_InitStubs(interp, "8.1", 0) == NULL) { return TCL_ERROR; } code = Tcl_PkgProvide(interp, "Pkgc", "1.7.2"); @@ -159,7 +159,7 @@ Pkgc_SafeInit( { int code; - if (Tcl_InitStubs(interp, TCL_VERSION, 0) == NULL) { + if (Tcl_InitStubs(interp, "8.1", 0) == NULL) { return TCL_ERROR; } code = Tcl_PkgProvide(interp, "Pkgc", "1.7.2"); |