diff options
Diffstat (limited to 'generic/tcl.decls')
-rw-r--r-- | generic/tcl.decls | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/generic/tcl.decls b/generic/tcl.decls index b6417ff..3254f2c 100644 --- a/generic/tcl.decls +++ b/generic/tcl.decls @@ -11,7 +11,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.113 2005/08/24 17:56:23 andreas_kupries Exp $ +# RCS: @(#) $Id: tcl.decls,v 1.114 2005/10/08 14:42:44 dgp Exp $ library tcl @@ -2003,28 +2003,31 @@ declare 557 generic { declare 558 generic { int Tcl_GetBignumFromObj( Tcl_Interp* interp, Tcl_Obj* obj, mp_int* value ) } +declare 559 generic { + int Tcl_GetBignumAndClearObj( Tcl_Interp* interp, Tcl_Obj* obj, mp_int* value ) +} # TIP #208: -declare 559 generic { +declare 560 generic { int Tcl_TruncateChannel(Tcl_Channel chan, Tcl_WideInt length) } -declare 560 generic { +declare 561 generic { Tcl_DriverTruncateProc *Tcl_ChannelTruncateProc( Tcl_ChannelType *chanTypePtr) } # TIP#219 (Tcl Channel Reflection API) akupries -declare 561 generic { +declare 562 generic { void Tcl_SetChannelErrorInterp (Tcl_Interp* interp, Tcl_Obj* msg) } -declare 562 generic { +declare 563 generic { void Tcl_GetChannelErrorInterp (Tcl_Interp* interp, Tcl_Obj** msg) } -declare 563 generic { +declare 564 generic { void Tcl_SetChannelError (Tcl_Channel chan, Tcl_Obj* msg) } -declare 564 generic { +declare 565 generic { void Tcl_GetChannelError (Tcl_Channel chan, Tcl_Obj** msg) } |