summaryrefslogtreecommitdiffstats
path: root/unix/dltest/pkgc.c
diff options
context:
space:
mode:
authorstanton <stanton>1999-03-11 21:47:38 (GMT)
committerstanton <stanton>1999-03-11 21:47:38 (GMT)
commit9ee0bae50a473f5d1a57e71c6cf9c8238cd55f4d (patch)
treee4aa8b6d14f69842c22e62fdcf4c5683bbd26f50 /unix/dltest/pkgc.c
parent5b3a5d29ab16e3e14db11fa869be1e1299bbc9f9 (diff)
downloadtcl-9ee0bae50a473f5d1a57e71c6cf9c8238cd55f4d.zip
tcl-9ee0bae50a473f5d1a57e71c6cf9c8238cd55f4d.tar.gz
tcl-9ee0bae50a473f5d1a57e71c6cf9c8238cd55f4d.tar.bz2
Changed package tests to build against the stubs library.core_8_1_merge_latest
Diffstat (limited to 'unix/dltest/pkgc.c')
-rw-r--r--unix/dltest/pkgc.c8
1 files changed, 7 insertions, 1 deletions
diff --git a/unix/dltest/pkgc.c b/unix/dltest/pkgc.c
index 33a5b43..9aac361 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.2 1998/09/14 18:40:18 stanton Exp $
+ * RCS: @(#) $Id: pkgc.c,v 1.3 1999/03/11 21:47:40 stanton Exp $
*/
#include "tcl.h"
@@ -114,6 +114,9 @@ Pkgc_Init(interp)
{
int code;
+ if (Tcl_InitStubs(interp, TCL_VERSION, 1) == NULL) {
+ return TCL_ERROR;
+ }
code = Tcl_PkgProvide(interp, "Pkgc", "1.7.2");
if (code != TCL_OK) {
return code;
@@ -147,6 +150,9 @@ Pkgc_SafeInit(interp)
Tcl_Interp *interp; /* Interpreter in which the package is
* to be made available. */
{
+ if (Tcl_InitStubs(interp, TCL_VERSION, 1) == NULL) {
+ return TCL_ERROR;
+ }
Tcl_CreateCommand(interp, "pkgc_sub", Pkgc_SubCmd, (ClientData) 0,
(Tcl_CmdDeleteProc *) NULL);
return TCL_OK;