diff options
| author | dgp <dgp@users.sourceforge.net> | 2008-12-15 18:33:24 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2008-12-15 18:33:24 (GMT) |
| commit | 4a44a570aada5b04e9ffdee9b9f82f7fa34cfe6c (patch) | |
| tree | d0ed3407fd1898930f5bc28d45d09c610c8775cb /generic | |
| parent | fc8e6478bfb02d60c1dc8c861dd80af63e036481 (diff) | |
| download | tcl-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.decls | 4 | ||||
| -rw-r--r-- | generic/tclDecls.h | 6 |
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 */ |