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/pkga.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/pkga.c')
| -rw-r--r-- | unix/dltest/pkga.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/unix/dltest/pkga.c b/unix/dltest/pkga.c index c58e11a..18ff997 100644 --- a/unix/dltest/pkga.c +++ b/unix/dltest/pkga.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: pkga.c,v 1.14 2010/02/22 23:31:42 nijtmans Exp $ + * RCS: @(#) $Id: pkga.c,v 1.15 2010/03/27 22:47:04 nijtmans Exp $ */ #include "tcl.h" @@ -132,7 +132,7 @@ Pkga_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, "Pkga", "1.0"); |