summaryrefslogtreecommitdiffstats
path: root/unix/dltest
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2022-06-28 09:42:08 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2022-06-28 09:42:08 (GMT)
commit9fccffbdfa31fc7c5ba41fe81b3c25c07721cb46 (patch)
tree450bb073ba0f58c2843adc5a754a71e7416190a8 /unix/dltest
parent8a3c1f7a687d580fed696e02ed7a5ee71c73fadd (diff)
parent3de10aae37fac8bfdeca16f87a6fc3f65d8cde7f (diff)
downloadtcl-9fccffbdfa31fc7c5ba41fe81b3c25c07721cb46.zip
tcl-9fccffbdfa31fc7c5ba41fe81b3c25c07721cb46.tar.gz
tcl-9fccffbdfa31fc7c5ba41fe81b3c25c07721cb46.tar.bz2
Merge 8.7. Don't worry about Tcl_GetErrorLine() any more
Diffstat (limited to 'unix/dltest')
-rw-r--r--unix/dltest/pkgb.c4
-rw-r--r--unix/dltest/pkgooa.c6
2 files changed, 3 insertions, 7 deletions
diff --git a/unix/dltest/pkgb.c b/unix/dltest/pkgb.c
index e9645a4..651c132 100644
--- a/unix/dltest/pkgb.c
+++ b/unix/dltest/pkgb.c
@@ -31,10 +31,6 @@
*----------------------------------------------------------------------
*/
-#ifndef Tcl_GetErrorLine
-# define Tcl_GetErrorLine(interp) ((interp)->errorLine)
-#endif
-
static int
Pkgb_SubObjCmd(
void *dummy, /* Not used. */
diff --git a/unix/dltest/pkgooa.c b/unix/dltest/pkgooa.c
index 369d894..ec9fbfd 100644
--- a/unix/dltest/pkgooa.c
+++ b/unix/dltest/pkgooa.c
@@ -115,7 +115,7 @@ Pkgooa_Init(
return TCL_ERROR;
}
if (tclStubsPtr == NULL) {
- Tcl_AppendResult(interp, "Tcl stubs are not inialized, "
+ Tcl_AppendResult(interp, "Tcl stubs are not initialized, "
"did you compile using -DUSE_TCL_STUBS? ");
return TCL_ERROR;
}
@@ -123,11 +123,11 @@ Pkgooa_Init(
return TCL_ERROR;
}
if (tclOOStubsPtr == NULL) {
- Tcl_AppendResult(interp, "TclOO stubs are not inialized");
+ Tcl_AppendResult(interp, "TclOO stubs are not initialized");
return TCL_ERROR;
}
if (tclOOIntStubsPtr == NULL) {
- Tcl_AppendResult(interp, "TclOO internal stubs are not inialized");
+ Tcl_AppendResult(interp, "TclOO internal stubs are not initialized");
return TCL_ERROR;
}