summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2008-12-15 18:33:24 (GMT)
committerdgp <dgp@users.sourceforge.net>2008-12-15 18:33:24 (GMT)
commit4a44a570aada5b04e9ffdee9b9f82f7fa34cfe6c (patch)
treed0ed3407fd1898930f5bc28d45d09c610c8775cb /generic
parentfc8e6478bfb02d60c1dc8c861dd80af63e036481 (diff)
downloadtcl-4a44a570aada5b04e9ffdee9b9f82f7fa34cfe6c.zip
tcl-4a44a570aada5b04e9ffdee9b9f82f7fa34cfe6c.tar.gz
tcl-4a44a570aada5b04e9ffdee9b9f82f7fa34cfe6c.tar.bz2
* doc/AddErrInfo.3: Documented Tcl_(Set|Get)ErrorLine (TIP 336).
* doc/CrtCommand.3: Various other documentation updates to * doc/CrtInterp.3: reflect the lack of access to Tcl_Interp fields * doc/Interp.3: by default. * doc/SetResult.3: * doc/tcl.decls:
Diffstat (limited to 'generic')
-rw-r--r--generic/tcl.decls4
-rw-r--r--generic/tclDecls.h6
2 files changed, 5 insertions, 5 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls
index 9cd8da6..334f004 100644
--- a/generic/tcl.decls
+++ b/generic/tcl.decls
@@ -12,7 +12,7 @@
# See the file "license.terms" for information on usage and redistribution
# of this file, and for a DISCLAIMER OF ALL WARRANTIES.
#
-# RCS: @(#) $Id: tcl.decls,v 1.160 2008/12/11 14:16:41 dkf Exp $
+# RCS: @(#) $Id: tcl.decls,v 1.161 2008/12/15 18:33:25 dgp Exp $
library tcl
@@ -2203,7 +2203,7 @@ declare 605 generic {
int Tcl_GetErrorLine(Tcl_Interp *interp)
}
declare 606 generic {
- void Tcl_SetErrorLine(Tcl_Interp *interp, int value)
+ void Tcl_SetErrorLine(Tcl_Interp *interp, int lineNum)
}
# TIP#307 (move results between interpreters)
diff --git a/generic/tclDecls.h b/generic/tclDecls.h
index 45805f2..8c58b9c 100644
--- a/generic/tclDecls.h
+++ b/generic/tclDecls.h
@@ -8,7 +8,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclDecls.h,v 1.161 2008/12/11 14:17:23 dkf Exp $
+ * RCS: @(#) $Id: tclDecls.h,v 1.162 2008/12/15 18:33:25 dgp Exp $
*/
#ifndef _TCLDECLS
@@ -3668,7 +3668,7 @@ EXTERN int Tcl_GetErrorLine (Tcl_Interp * interp);
#ifndef Tcl_SetErrorLine_TCL_DECLARED
#define Tcl_SetErrorLine_TCL_DECLARED
/* 606 */
-EXTERN void Tcl_SetErrorLine (Tcl_Interp * interp, int value);
+EXTERN void Tcl_SetErrorLine (Tcl_Interp * interp, int lineNum);
#endif
#ifndef Tcl_TransferResult_TCL_DECLARED
#define Tcl_TransferResult_TCL_DECLARED
@@ -4423,7 +4423,7 @@ typedef struct TclStubs {
int (*tcl_GetEnsembleParameterList) (Tcl_Interp * interp, Tcl_Command token, Tcl_Obj ** paramListPtr); /* 603 */
int (*tcl_ParseArgsObjv) (Tcl_Interp * interp, const Tcl_ArgvInfo * argTable, int * objcPtr, Tcl_Obj *const * objv, Tcl_Obj *** remObjv); /* 604 */
int (*tcl_GetErrorLine) (Tcl_Interp * interp); /* 605 */
- void (*tcl_SetErrorLine) (Tcl_Interp * interp, int value); /* 606 */
+ void (*tcl_SetErrorLine) (Tcl_Interp * interp, int lineNum); /* 606 */
void (*tcl_TransferResult) (Tcl_Interp * sourceInterp, int result, Tcl_Interp * targetInterp); /* 607 */
int (*tcl_InterpActive) (Tcl_Interp * interp); /* 608 */
void (*tcl_BackgroundException) (Tcl_Interp * interp, int code); /* 609 */