summaryrefslogtreecommitdiffstats
path: root/unix/dltest/pkgc.c
diff options
context:
space:
mode:
authornijtmans <nijtmans>2010-03-27 22:47:04 (GMT)
committernijtmans <nijtmans>2010-03-27 22:47:04 (GMT)
commitd6b47c13b9de8ed40d1c144b8a70ccec677a5231 (patch)
treed65014decff2b760a5c13d4a872918187510515e /unix/dltest/pkgc.c
parent419d5645c272033992ce63a5c714a64436e9f189 (diff)
downloadtcl-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.c6
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");