diff options
author | dgp <dgp@users.sourceforge.net> | 2005-09-14 03:46:50 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2005-09-14 03:46:50 (GMT) |
commit | d6a5a988b1a1360a77a043ec10d175c8a6c0fd36 (patch) | |
tree | 5488ff4bffc012fb31318be36a9b541fe2419992 /generic/tclInt.h | |
parent | c483a47557d64385bc3cc9f65aedf8b6bf387843 (diff) | |
download | tcl-d6a5a988b1a1360a77a043ec10d175c8a6c0fd36.zip tcl-d6a5a988b1a1360a77a043ec10d175c8a6c0fd36.tar.gz tcl-d6a5a988b1a1360a77a043ec10d175c8a6c0fd36.tar.bz2 |
* generic/tclBasic.c: First caller of TclFormatToErrorInfo.
* generic/tclInt.h: Using stdarg.h conventions, add more
* generic/tclStringObj.c: fixed arguments to TclFormatObj() and
TclObjPrintf(). Added new routine TclFormatToErrorInfo().
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 43d12c7..b810845 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -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: tclInt.h,v 1.251 2005/09/13 21:23:51 dgp Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.252 2005/09/14 03:46:50 dgp Exp $ */ #ifndef _TCLINT @@ -2001,7 +2001,10 @@ MODULE_SCOPE void TclFinalizePreserve(void); MODULE_SCOPE void TclFinalizeSynchronization(void); MODULE_SCOPE void TclFinalizeThreadData(void); MODULE_SCOPE void TclFormatNaN(double value, char* buffer); -MODULE_SCOPE int TclFormatObj(Tcl_Interp *arg1, ...); +MODULE_SCOPE int TclFormatObj(Tcl_Interp *interp, Tcl_Obj *objPtr, + CONST char *format, ...); +MODULE_SCOPE int TclFormatToErrorInfo(Tcl_Interp *interp, + CONST char *format, ...); MODULE_SCOPE int TclFSFileAttrIndex(Tcl_Obj *pathPtr, CONST char *attributeName, int *indexPtr); MODULE_SCOPE Tcl_Obj * TclGetBgErrorHandler(Tcl_Interp *interp); @@ -2053,7 +2056,8 @@ MODULE_SCOPE int TclMergeReturnOptions(Tcl_Interp *interp, int objc, MODULE_SCOPE int TclObjInvokeNamespace(Tcl_Interp *interp, int objc, Tcl_Obj *CONST objv[], Tcl_Namespace *nsPtr, int flags); -MODULE_SCOPE int TclObjPrintf(Tcl_Interp *arg1, ...); +MODULE_SCOPE int TclObjPrintf(Tcl_Interp *interp, Tcl_Obj *objPtr, + CONST char *format, ...); MODULE_SCOPE int TclParseBackslash(CONST char *src, int numBytes, int *readPtr, char *dst); MODULE_SCOPE int TclParseHex(CONST char *src, int numBytes, |