tcl.h   tcl.h 
skipping to change at line 15 skipping to change at line 15
* of the Tcl interpreter. * of the Tcl interpreter.
* *
* Copyright (c) 1987-1994 The Regents of the University of California. * Copyright (c) 1987-1994 The Regents of the University of California.
* Copyright (c) 1993-1996 Lucent Technologies. * Copyright (c) 1993-1996 Lucent Technologies.
* Copyright (c) 1994-1998 Sun Microsystems, Inc. * Copyright (c) 1994-1998 Sun Microsystems, Inc.
* Copyright (c) 1998-1999 by Scriptics Corporation. * Copyright (c) 1998-1999 by Scriptics Corporation.
* *
* See the file "license.terms" for information on usage and redistribution * See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES. * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
* *
* RCS: @(#) $Id: tcl.h,v 1.57.2.3 1999/11/19 23:32:02 hobbs Exp $ * RCS: @(#) $Id: tcl.h,v 1.63 2000/02/08 10:05:40 hobbs Exp $
*/ */
#ifndef _TCL #ifndef _TCL
#define _TCL #define _TCL
/* /*
* For C++ compilers, use extern "C" * For C++ compilers, use extern "C"
*/ */
#ifdef __cplusplus #ifdef __cplusplus
skipping to change at line 44 skipping to change at line 44
#define TCL_BETA_RELEASE 1 #define TCL_BETA_RELEASE 1
#define TCL_FINAL_RELEASE 2 #define TCL_FINAL_RELEASE 2
/* /*
* When version numbers change here, must also go into the following files * When version numbers change here, must also go into the following files
* and update the version numbers: * and update the version numbers:
* *
* library/init.tcl (only if Major.minor changes, not patchlevel) 1 LOC * library/init.tcl (only if Major.minor changes, not patchlevel) 1 LOC
* unix/configure.in (2 LOC Major, 2 LOC minor, 1 LOC patch) * unix/configure.in (2 LOC Major, 2 LOC minor, 1 LOC patch)
* win/configure.in (as above) * win/configure.in (as above)
* win/tcl.m4 (not patchlevel)
* win/makefile.vc (not patchlevel) 2 LOC * win/makefile.vc (not patchlevel) 2 LOC
* win/pkgIndex.tcl (not patchlevel, for tclregNN.dll) * win/pkgIndex.tcl (not patchlevel, for tclregNN.dll)
* README (sections 0 and 2) * README (sections 0 and 2)
* mac/README (2 LOC) * mac/README (2 LOC, not patchlevel)
* win/README.binary (sections 0-4) * win/README.binary (sections 0-4)
* win/README (not patchlevel) (sections 0 and 2) * win/README (not patchlevel) (sections 0 and 2)
* unix/README (not patchlevel) (part (h)) * unix/README (not patchlevel) (part (h))
* tests/basic.test (not patchlevel) (version checks) * tests/basic.test (not patchlevel) (version checks)
* tools/tcl.hpj.in (not patchlevel, for windows installer) * tools/tcl.hpj.in (not patchlevel, for windows installer)
* tools/tcl.wse.in (for windows installer) * tools/tcl.wse.in (for windows installer)
* tools/tclSplash.bmp (not patchlevel)
*/ */
#define TCL_MAJOR_VERSION 8 #define TCL_MAJOR_VERSION 8
#define TCL_MINOR_VERSION 2 #define TCL_MINOR_VERSION 3
#define TCL_RELEASE_LEVEL TCL_FINAL_RELEASE #define TCL_RELEASE_LEVEL TCL_FINAL_RELEASE
#define TCL_RELEASE_SERIAL 3 #define TCL_RELEASE_SERIAL 0
#define TCL_VERSION "8.2" #define TCL_VERSION "8.3"
#define TCL_PATCH_LEVEL "8.2.3" #define TCL_PATCH_LEVEL "8.3.0"
/* /*
* The following definitions set up the proper options for Windows * The following definitions set up the proper options for Windows
* compilers. We use this method because there is no autoconf equivalent. * compilers. We use this method because there is no autoconf equivalent.
*/ */
#ifndef __WIN32__ #ifndef __WIN32__
# if defined(_WIN32) || defined(WIN32) # if defined(_WIN32) || defined(WIN32)
# define __WIN32__ # define __WIN32__
# endif # endif
skipping to change at line 279 skipping to change at line 281
#if ((defined(__STDC__) || defined(SABER)) && !defined(NO_PROTOTYPE)) || de fined(__cplusplus) || defined(USE_PROTOTYPE) #if ((defined(__STDC__) || defined(SABER)) && !defined(NO_PROTOTYPE)) || de fined(__cplusplus) || defined(USE_PROTOTYPE)
# define _USING_PROTOTYPES_ 1 # define _USING_PROTOTYPES_ 1
# define _ANSI_ARGS_(x) x # define _ANSI_ARGS_(x) x
# define CONST const # define CONST const
#else #else
# define _ANSI_ARGS_(x) () # define _ANSI_ARGS_(x) ()
# define CONST # define CONST
#endif #endif
/*
* Make sure EXTERN isn't defined elsewhere
*/
#ifdef EXTERN
#undef EXTERN
#endif /* EXTERN */
#ifdef __cplusplus #ifdef __cplusplus
# define EXTERN extern "C" TCL_STORAGE_CLASS # define EXTERN extern "C" TCL_STORAGE_CLASS
#else #else
# define EXTERN extern TCL_STORAGE_CLASS # define EXTERN extern TCL_STORAGE_CLASS
#endif #endif
/* /*
* Macro to use instead of "void" for arguments that must have * Macro to use instead of "void" for arguments that must have
* type "void *" in ANSI C; maps them to type "char *" in * type "void *" in ANSI C; maps them to type "char *" in
* non-ANSI systems. * non-ANSI systems.
skipping to change at line 683 skipping to change at line 692
Tcl_Obj *objResultPtr; Tcl_Obj *objResultPtr;
char *appendResult; char *appendResult;
int appendAvl; int appendAvl;
int appendUsed; int appendUsed;
char resultSpace[TCL_RESULT_SIZE+1]; char resultSpace[TCL_RESULT_SIZE+1];
} Tcl_SavedResult; } Tcl_SavedResult;
/* /*
* The following definitions support Tcl's namespace facility. * The following definitions support Tcl's namespace facility.
* Note: the first five fields must match exactly the fields in a * Note: the first five fields must match exactly the fields in a
* Namespace structure (see tcl.h). * Namespace structure (see tclInt.h).
*/ */
typedef struct Tcl_Namespace { typedef struct Tcl_Namespace {
char *name; /* The namespace's name within its parent char *name; /* The namespace's name within its parent
* namespace. This contains no ::'s. The * namespace. This contains no ::'s. The
* name of the global namespace is "" * name of the global namespace is ""
* although "::" is an synonym. */ * although "::" is an synonym. */
char *fullName; /* The namespace's fully qualified name. char *fullName; /* The namespace's fully qualified name.
* This starts with ::. */ * This starts with ::. */
ClientData clientData; /* Arbitrary value associated with this ClientData clientData; /* Arbitrary value associated with this
 End of changes. 9 change blocks. 
7 lines changed or deleted 16 lines changed or added


 tclDecls.h   tclDecls.h 
/* /*
* tclDecls.h -- * tclDecls.h --
* *
* Declarations of functions in the platform independent public Tcl API . * Declarations of functions in the platform independent public Tcl API .
* *
* Copyright (c) 1998-1999 by Scriptics Corporation. * Copyright (c) 1998-1999 by Scriptics Corporation.
* *
* See the file "license.terms" for information on usage and redistribution * See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES. * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
* *
* RCS: @(#) $Id: tclDecls.h,v 1.28 1999/08/10 22:45:11 redman Exp $ * RCS: @(#) $Id: tclDecls.h,v 1.31 2000/02/08 10:05:41 hobbs Exp $
*/ */
#ifndef _TCLDECLS #ifndef _TCLDECLS
#define _TCLDECLS #define _TCLDECLS
/* /*
* WARNING: This file is automatically generated by the tools/genStubs.tcl * WARNING: This file is automatically generated by the tools/genStubs.tcl
* script. Any modifications to the function declarations below should be made * script. Any modifications to the function declarations below should be made
* in the generic/tcl.decls script. * in the generic/tcl.decls script.
*/ */
skipping to change at line 544 skipping to change at line 544
Tcl_Interp * slaveInterp)); Tcl_Interp * slaveInterp));
/* 164 */ /* 164 */
EXTERN Tcl_Interp * Tcl_GetMaster _ANSI_ARGS_((Tcl_Interp * interp)); EXTERN Tcl_Interp * Tcl_GetMaster _ANSI_ARGS_((Tcl_Interp * interp));
/* 165 */ /* 165 */
EXTERN CONST char * Tcl_GetNameOfExecutable _ANSI_ARGS_((void)); EXTERN CONST char * Tcl_GetNameOfExecutable _ANSI_ARGS_((void));
/* 166 */ /* 166 */
EXTERN Tcl_Obj * Tcl_GetObjResult _ANSI_ARGS_((Tcl_Interp * interp)); EXTERN Tcl_Obj * Tcl_GetObjResult _ANSI_ARGS_((Tcl_Interp * interp));
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
/* 167 */ /* 167 */
EXTERN int Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp * interp, EXTERN int Tcl_GetOpenFile _ANSI_ARGS_((Tcl_Interp * interp,
char * str, int write, int checkUsage, char * str, int forWriting, int checkUsage,
ClientData * filePtr)); ClientData * filePtr));
#endif /* UNIX */ #endif /* UNIX */
/* 168 */ /* 168 */
EXTERN Tcl_PathType Tcl_GetPathType _ANSI_ARGS_((char * path)); EXTERN Tcl_PathType Tcl_GetPathType _ANSI_ARGS_((char * path));
/* 169 */ /* 169 */
EXTERN int Tcl_Gets _ANSI_ARGS_((Tcl_Channel chan, EXTERN int Tcl_Gets _ANSI_ARGS_((Tcl_Channel chan,
Tcl_DString * dsPtr)); Tcl_DString * dsPtr));
/* 170 */ /* 170 */
EXTERN int Tcl_GetsObj _ANSI_ARGS_((Tcl_Channel chan, EXTERN int Tcl_GetsObj _ANSI_ARGS_((Tcl_Channel chan,
Tcl_Obj * objPtr)); Tcl_Obj * objPtr));
skipping to change at line 1202 skipping to change at line 1202
EXTERN int Tcl_GetCharLength _ANSI_ARGS_((Tcl_Obj * objPtr)); EXTERN int Tcl_GetCharLength _ANSI_ARGS_((Tcl_Obj * objPtr));
/* 381 */ /* 381 */
EXTERN Tcl_UniChar Tcl_GetUniChar _ANSI_ARGS_((Tcl_Obj * objPtr, EXTERN Tcl_UniChar Tcl_GetUniChar _ANSI_ARGS_((Tcl_Obj * objPtr,
int index)); int index));
/* 382 */ /* 382 */
EXTERN Tcl_UniChar * Tcl_GetUnicode _ANSI_ARGS_((Tcl_Obj * objPtr)); EXTERN Tcl_UniChar * Tcl_GetUnicode _ANSI_ARGS_((Tcl_Obj * objPtr));
/* 383 */ /* 383 */
EXTERN Tcl_Obj * Tcl_GetRange _ANSI_ARGS_((Tcl_Obj * objPtr, EXTERN Tcl_Obj * Tcl_GetRange _ANSI_ARGS_((Tcl_Obj * objPtr,
int first, int last)); int first, int last));
/* 384 */ /* 384 */
EXTERN void Tcl_AppendUnicodeToObj _ANSI_ARGS_(( EXTERN void Tcl_AppendUnicodeToObj _ANSI_ARGS_((Tcl_Obj * objPtr
register Tcl_Obj * objPtr, ,
Tcl_UniChar * unicode, int length)); Tcl_UniChar * unicode, int length));
/* 385 */ /* 385 */
EXTERN int Tcl_RegExpMatchObj _ANSI_ARGS_((Tcl_Interp * interp, EXTERN int Tcl_RegExpMatchObj _ANSI_ARGS_((Tcl_Interp * interp,
Tcl_Obj * stringObj, Tcl_Obj * patternObj)); Tcl_Obj * stringObj, Tcl_Obj * patternObj));
/* 386 */ /* 386 */
EXTERN void Tcl_SetNotifier _ANSI_ARGS_(( EXTERN void Tcl_SetNotifier _ANSI_ARGS_((
Tcl_NotifierProcs * notifierProcPtr)); Tcl_NotifierProcs * notifierProcPtr));
/* 387 */ /* 387 */
EXTERN Tcl_Mutex * Tcl_GetAllocMutex _ANSI_ARGS_((void)); EXTERN Tcl_Mutex * Tcl_GetAllocMutex _ANSI_ARGS_((void));
/* 388 */ /* 388 */
EXTERN int Tcl_GetChannelNames _ANSI_ARGS_((Tcl_Interp * interp )); EXTERN int Tcl_GetChannelNames _ANSI_ARGS_((Tcl_Interp * interp ));
/* 389 */
EXTERN int Tcl_GetChannelNamesEx _ANSI_ARGS_((
Tcl_Interp * interp, char * pattern));
/* 390 */
EXTERN int Tcl_ProcObjCmd _ANSI_ARGS_((ClientData clientData,
Tcl_Interp * interp, int objc,
Tcl_Obj *CONST objv[]));
typedef struct TclStubHooks { typedef struct TclStubHooks {
struct TclPlatStubs *tclPlatStubs; struct TclPlatStubs *tclPlatStubs;
struct TclIntStubs *tclIntStubs; struct TclIntStubs *tclIntStubs;
struct TclIntPlatStubs *tclIntPlatStubs; struct TclIntPlatStubs *tclIntPlatStubs;
} TclStubHooks; } TclStubHooks;
typedef struct TclStubs { typedef struct TclStubs {
int magic; int magic;
struct TclStubHooks *hooks; struct TclStubHooks *hooks;
skipping to change at line 1418 skipping to change at line 1424
Tcl_ChannelType * (*tcl_GetChannelType) _ANSI_ARGS_((Tcl_Channel chan)) ; /* 158 */ Tcl_ChannelType * (*tcl_GetChannelType) _ANSI_ARGS_((Tcl_Channel chan)) ; /* 158 */
int (*tcl_GetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdN ame, Tcl_CmdInfo * infoPtr)); /* 159 */ int (*tcl_GetCommandInfo) _ANSI_ARGS_((Tcl_Interp * interp, char * cmdN ame, Tcl_CmdInfo * infoPtr)); /* 159 */
char * (*tcl_GetCommandName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Comm and command)); /* 160 */ char * (*tcl_GetCommandName) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Comm and command)); /* 160 */
int (*tcl_GetErrno) _ANSI_ARGS_((void)); /* 161 */ int (*tcl_GetErrno) _ANSI_ARGS_((void)); /* 161 */
char * (*tcl_GetHostName) _ANSI_ARGS_((void)); /* 162 */ char * (*tcl_GetHostName) _ANSI_ARGS_((void)); /* 162 */
int (*tcl_GetInterpPath) _ANSI_ARGS_((Tcl_Interp * askInterp, Tcl_Inter p * slaveInterp)); /* 163 */ int (*tcl_GetInterpPath) _ANSI_ARGS_((Tcl_Interp * askInterp, Tcl_Inter p * slaveInterp)); /* 163 */
Tcl_Interp * (*tcl_GetMaster) _ANSI_ARGS_((Tcl_Interp * interp)); /* 16 4 */ Tcl_Interp * (*tcl_GetMaster) _ANSI_ARGS_((Tcl_Interp * interp)); /* 16 4 */
CONST char * (*tcl_GetNameOfExecutable) _ANSI_ARGS_((void)); /* 165 */ CONST char * (*tcl_GetNameOfExecutable) _ANSI_ARGS_((void)); /* 165 */
Tcl_Obj * (*tcl_GetObjResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 16 6 */ Tcl_Obj * (*tcl_GetObjResult) _ANSI_ARGS_((Tcl_Interp * interp)); /* 16 6 */
#if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */ #if !defined(__WIN32__) && !defined(MAC_TCL) /* UNIX */
int (*tcl_GetOpenFile) _ANSI_ARGS_((Tcl_Interp * interp, char * str, in t write, int checkUsage, ClientData * filePtr)); /* 167 */ int (*tcl_GetOpenFile) _ANSI_ARGS_((Tcl_Interp * interp, char * str, in t forWriting, int checkUsage, ClientData * filePtr)); /* 167 */
#endif /* UNIX */ #endif /* UNIX */
#ifdef __WIN32__ #ifdef __WIN32__
void *reserved167; void *reserved167;
#endif /* __WIN32__ */ #endif /* __WIN32__ */
#ifdef MAC_TCL #ifdef MAC_TCL
void *reserved167; void *reserved167;
#endif /* MAC_TCL */ #endif /* MAC_TCL */
Tcl_PathType (*tcl_GetPathType) _ANSI_ARGS_((char * path)); /* 168 */ Tcl_PathType (*tcl_GetPathType) _ANSI_ARGS_((char * path)); /* 168 */
int (*tcl_Gets) _ANSI_ARGS_((Tcl_Channel chan, Tcl_DString * dsPtr)); / * 169 */ int (*tcl_Gets) _ANSI_ARGS_((Tcl_Channel chan, Tcl_DString * dsPtr)); / * 169 */
int (*tcl_GetsObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); / * 170 */ int (*tcl_GetsObj) _ANSI_ARGS_((Tcl_Channel chan, Tcl_Obj * objPtr)); / * 170 */
skipping to change at line 1666 skipping to change at line 1672
int (*tcl_UniCharIsPrint) _ANSI_ARGS_((int ch)); /* 374 */ int (*tcl_UniCharIsPrint) _ANSI_ARGS_((int ch)); /* 374 */
int (*tcl_UniCharIsPunct) _ANSI_ARGS_((int ch)); /* 375 */ int (*tcl_UniCharIsPunct) _ANSI_ARGS_((int ch)); /* 375 */
int (*tcl_RegExpExecObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp r egexp, Tcl_Obj * objPtr, int offset, int nmatches, int flags)); /* 376 */ int (*tcl_RegExpExecObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_RegExp r egexp, Tcl_Obj * objPtr, int offset, int nmatches, int flags)); /* 376 */
void (*tcl_RegExpGetInfo) _ANSI_ARGS_((Tcl_RegExp regexp, Tcl_RegExpInf o * infoPtr)); /* 377 */ void (*tcl_RegExpGetInfo) _ANSI_ARGS_((Tcl_RegExp regexp, Tcl_RegExpInf o * infoPtr)); /* 377 */
Tcl_Obj * (*tcl_NewUnicodeObj) _ANSI_ARGS_((Tcl_UniChar * unicode, int numChars)); /* 378 */ Tcl_Obj * (*tcl_NewUnicodeObj) _ANSI_ARGS_((Tcl_UniChar * unicode, int numChars)); /* 378 */
void (*tcl_SetUnicodeObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_UniChar * unicode, int numChars)); /* 379 */ void (*tcl_SetUnicodeObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_UniChar * unicode, int numChars)); /* 379 */
int (*tcl_GetCharLength) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 380 */ int (*tcl_GetCharLength) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 380 */
Tcl_UniChar (*tcl_GetUniChar) _ANSI_ARGS_((Tcl_Obj * objPtr, int index) ); /* 381 */ Tcl_UniChar (*tcl_GetUniChar) _ANSI_ARGS_((Tcl_Obj * objPtr, int index) ); /* 381 */
Tcl_UniChar * (*tcl_GetUnicode) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 382 */ Tcl_UniChar * (*tcl_GetUnicode) _ANSI_ARGS_((Tcl_Obj * objPtr)); /* 382 */
Tcl_Obj * (*tcl_GetRange) _ANSI_ARGS_((Tcl_Obj * objPtr, int first, int last)); /* 383 */ Tcl_Obj * (*tcl_GetRange) _ANSI_ARGS_((Tcl_Obj * objPtr, int first, int last)); /* 383 */
void (*tcl_AppendUnicodeToObj) _ANSI_ARGS_((register Tcl_Obj * objPtr, Tcl_UniChar * unicode, int length)); /* 384 */ void (*tcl_AppendUnicodeToObj) _ANSI_ARGS_((Tcl_Obj * objPtr, Tcl_UniCh ar * unicode, int length)); /* 384 */
int (*tcl_RegExpMatchObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * s tringObj, Tcl_Obj * patternObj)); /* 385 */ int (*tcl_RegExpMatchObj) _ANSI_ARGS_((Tcl_Interp * interp, Tcl_Obj * s tringObj, Tcl_Obj * patternObj)); /* 385 */
void (*tcl_SetNotifier) _ANSI_ARGS_((Tcl_NotifierProcs * notifierProcPt r)); /* 386 */ void (*tcl_SetNotifier) _ANSI_ARGS_((Tcl_NotifierProcs * notifierProcPt r)); /* 386 */
Tcl_Mutex * (*tcl_GetAllocMutex) _ANSI_ARGS_((void)); /* 387 */ Tcl_Mutex * (*tcl_GetAllocMutex) _ANSI_ARGS_((void)); /* 387 */
int (*tcl_GetChannelNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 388 * / int (*tcl_GetChannelNames) _ANSI_ARGS_((Tcl_Interp * interp)); /* 388 * /
int (*tcl_GetChannelNamesEx) _ANSI_ARGS_((Tcl_Interp * interp, char * p
attern)); /* 389 */
int (*tcl_ProcObjCmd) _ANSI_ARGS_((ClientData clientData, Tcl_Interp *
interp, int objc, Tcl_Obj *CONST objv[])); /* 390 */
} TclStubs; } TclStubs;
#ifdef __cplusplus #ifdef __cplusplus
extern "C" { extern "C" {
#endif #endif
extern TclStubs *tclStubsPtr; extern TclStubs *tclStubsPtr;
#ifdef __cplusplus #ifdef __cplusplus
} }
#endif #endif
skipping to change at line 3272 skipping to change at line 3280
(tclStubsPtr->tcl_SetNotifier) /* 386 */ (tclStubsPtr->tcl_SetNotifier) /* 386 */
#endif #endif
#ifndef Tcl_GetAllocMutex #ifndef Tcl_GetAllocMutex
#define Tcl_GetAllocMutex \ #define Tcl_GetAllocMutex \
(tclStubsPtr->tcl_GetAllocMutex) /* 387 */ (tclStubsPtr->tcl_GetAllocMutex) /* 387 */
#endif #endif
#ifndef Tcl_GetChannelNames #ifndef Tcl_GetChannelNames
#define Tcl_GetChannelNames \ #define Tcl_GetChannelNames \
(tclStubsPtr->tcl_GetChannelNames) /* 388 */ (tclStubsPtr->tcl_GetChannelNames) /* 388 */
#endif #endif
#ifndef Tcl_GetChannelNamesEx
#define Tcl_GetChannelNamesEx \
(tclStubsPtr->tcl_GetChannelNamesEx) /* 389 */
#endif
#ifndef Tcl_ProcObjCmd
#define Tcl_ProcObjCmd \
(tclStubsPtr->tcl_ProcObjCmd) /* 390 */
#endif
#endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */ #endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
/* !END!: Do not edit above this line. */ /* !END!: Do not edit above this line. */
#endif /* _TCLDECLS */ #endif /* _TCLDECLS */
 End of changes. 8 change blocks. 
6 lines changed or deleted 25 lines changed or added

This html diff was produced by rfcdiff 1.41. The latest version is available from http://tools.ietf.org/tools/rfcdiff/