| tcl.h | tcl.h | |||
|---|---|---|---|---|
| skipping to change at line 16 | skipping to change at line 16 | |||
| * | * | |||
| * 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-2000 by Scriptics Corporation. | * Copyright (c) 1998-2000 by Scriptics Corporation. | |||
| * Copyright (c) 2002 by Kevin B. Kenny. All rights reserved. | * Copyright (c) 2002 by Kevin B. Kenny. All rights reserved. | |||
| * | * | |||
| * See the file "license.terms" for information on usage and redistribution of | * See the file "license.terms" for information on usage and redistribution of | |||
| * this file, and for a DISCLAIMER OF ALL WARRANTIES. | * this file, and for a DISCLAIMER OF ALL WARRANTIES. | |||
| * | * | |||
| * RCS: @(#) $Id: tcl.h,v 1.254.2.6 2008/10/10 18:16:47 dgp Exp $ | * RCS: @(#) $Id: tcl.h,v 1.254.2.8 2008/12/21 20:59:01 dgp 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 63 | skipping to change at line 63 | |||
| * win/README (not patchlevel) (sections 0 and 2) | * win/README (not patchlevel) (sections 0 and 2) | |||
| * unix/tcl.spec (1 LOC patch) | * unix/tcl.spec (1 LOC patch) | |||
| * 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) | * tools/tclSplash.bmp (not patchlevel) | |||
| */ | */ | |||
| #define TCL_MAJOR_VERSION 8 | #define TCL_MAJOR_VERSION 8 | |||
| #define TCL_MINOR_VERSION 5 | #define TCL_MINOR_VERSION 5 | |||
| #define TCL_RELEASE_LEVEL TCL_FINAL_RELEASE | #define TCL_RELEASE_LEVEL TCL_FINAL_RELEASE | |||
| #define TCL_RELEASE_SERIAL 5 | #define TCL_RELEASE_SERIAL 6 | |||
| #define TCL_VERSION "8.5" | #define TCL_VERSION "8.5" | |||
| #define TCL_PATCH_LEVEL "8.5.5" | #define TCL_PATCH_LEVEL "8.5.6" | |||
| /* | /* | |||
| * The following definitions set up the proper options for Windows compiler s. | * The following definitions set up the proper options for Windows compiler s. | |||
| * We use this method because there is no autoconf equivalent. | * We use this method because there is no autoconf equivalent. | |||
| */ | */ | |||
| #ifndef __WIN32__ | #ifndef __WIN32__ | |||
| # if defined(_WIN32) || defined(WIN32) || defined(__MINGW32__) || defined (__BORLANDC__) || (defined(__WATCOMC__) && defined(__WINDOWS_386__)) | # if defined(_WIN32) || defined(WIN32) || defined(__MINGW32__) || defined (__BORLANDC__) || (defined(__WATCOMC__) && defined(__WINDOWS_386__)) | |||
| # define __WIN32__ | # define __WIN32__ | |||
| # ifndef WIN32 | # ifndef WIN32 | |||
| End of changes. 3 change blocks. | ||||
| 3 lines changed or deleted | 3 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.130 2007/12/13 15:23:16 dgp Exp $ | * RCS: @(#) $Id: tclDecls.h,v 1.130.2.1 2008/11/18 07:02:17 nijtmans Exp $ | |||
| */ | */ | |||
| #ifndef _TCLDECLS | #ifndef _TCLDECLS | |||
| #define _TCLDECLS | #define _TCLDECLS | |||
| #undef TCL_STORAGE_CLASS | #undef TCL_STORAGE_CLASS | |||
| #ifdef BUILD_tcl | #ifdef BUILD_tcl | |||
| # define TCL_STORAGE_CLASS DLLEXPORT | # define TCL_STORAGE_CLASS DLLEXPORT | |||
| #else | #else | |||
| # ifdef USE_TCL_STUBS | # ifdef USE_TCL_STUBS | |||
| skipping to change at line 1693 | skipping to change at line 1693 | |||
| #endif | #endif | |||
| #ifndef Tcl_AppendStringsToObjVA_TCL_DECLARED | #ifndef Tcl_AppendStringsToObjVA_TCL_DECLARED | |||
| #define Tcl_AppendStringsToObjVA_TCL_DECLARED | #define Tcl_AppendStringsToObjVA_TCL_DECLARED | |||
| /* 268 */ | /* 268 */ | |||
| EXTERN void Tcl_AppendStringsToObjVA (Tcl_Obj * objPtr, | EXTERN void Tcl_AppendStringsToObjVA (Tcl_Obj * objPtr, | |||
| va_list argList); | va_list argList); | |||
| #endif | #endif | |||
| #ifndef Tcl_HashStats_TCL_DECLARED | #ifndef Tcl_HashStats_TCL_DECLARED | |||
| #define Tcl_HashStats_TCL_DECLARED | #define Tcl_HashStats_TCL_DECLARED | |||
| /* 269 */ | /* 269 */ | |||
| EXTERN CONST84_RETURN char * Tcl_HashStats (Tcl_HashTable * tablePtr); | EXTERN char * Tcl_HashStats (Tcl_HashTable * tablePtr); | |||
| #endif | #endif | |||
| #ifndef Tcl_ParseVar_TCL_DECLARED | #ifndef Tcl_ParseVar_TCL_DECLARED | |||
| #define Tcl_ParseVar_TCL_DECLARED | #define Tcl_ParseVar_TCL_DECLARED | |||
| /* 270 */ | /* 270 */ | |||
| EXTERN CONST84_RETURN char * Tcl_ParseVar (Tcl_Interp * interp, | EXTERN CONST84_RETURN char * Tcl_ParseVar (Tcl_Interp * interp, | |||
| CONST char * start, CONST84 char ** termPtr) ; | CONST char * start, CONST84 char ** termPtr) ; | |||
| #endif | #endif | |||
| #ifndef Tcl_PkgPresent_TCL_DECLARED | #ifndef Tcl_PkgPresent_TCL_DECLARED | |||
| #define Tcl_PkgPresent_TCL_DECLARED | #define Tcl_PkgPresent_TCL_DECLARED | |||
| /* 271 */ | /* 271 */ | |||
| skipping to change at line 3832 | skipping to change at line 3832 | |||
| int (*tcl_UpVar2) (Tcl_Interp * interp, CONST char * frameName, CONST c har * part1, CONST char * part2, CONST char * localName, int flags); /* 259 */ | int (*tcl_UpVar2) (Tcl_Interp * interp, CONST char * frameName, CONST c har * part1, CONST char * part2, CONST char * localName, int flags); /* 259 */ | |||
| int (*tcl_VarEval) (Tcl_Interp * interp, ...); /* 260 */ | int (*tcl_VarEval) (Tcl_Interp * interp, ...); /* 260 */ | |||
| ClientData (*tcl_VarTraceInfo) (Tcl_Interp * interp, CONST char * varNa me, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData); /* 2 61 */ | ClientData (*tcl_VarTraceInfo) (Tcl_Interp * interp, CONST char * varNa me, int flags, Tcl_VarTraceProc * procPtr, ClientData prevClientData); /* 2 61 */ | |||
| ClientData (*tcl_VarTraceInfo2) (Tcl_Interp * interp, CONST char * part 1, CONST char * part2, int flags, Tcl_VarTraceProc * procPtr, ClientData pr evClientData); /* 262 */ | ClientData (*tcl_VarTraceInfo2) (Tcl_Interp * interp, CONST char * part 1, CONST char * part2, int flags, Tcl_VarTraceProc * procPtr, ClientData pr evClientData); /* 262 */ | |||
| int (*tcl_Write) (Tcl_Channel chan, CONST char * s, int slen); /* 263 * / | int (*tcl_Write) (Tcl_Channel chan, CONST char * s, int slen); /* 263 * / | |||
| void (*tcl_WrongNumArgs) (Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], CONST char * message); /* 264 */ | void (*tcl_WrongNumArgs) (Tcl_Interp * interp, int objc, Tcl_Obj *CONST objv[], CONST char * message); /* 264 */ | |||
| int (*tcl_DumpActiveMemory) (CONST char * fileName); /* 265 */ | int (*tcl_DumpActiveMemory) (CONST char * fileName); /* 265 */ | |||
| void (*tcl_ValidateAllMemory) (CONST char * file, int line); /* 266 */ | void (*tcl_ValidateAllMemory) (CONST char * file, int line); /* 266 */ | |||
| void (*tcl_AppendResultVA) (Tcl_Interp * interp, va_list argList); /* 2 67 */ | void (*tcl_AppendResultVA) (Tcl_Interp * interp, va_list argList); /* 2 67 */ | |||
| void (*tcl_AppendStringsToObjVA) (Tcl_Obj * objPtr, va_list argList); / * 268 */ | void (*tcl_AppendStringsToObjVA) (Tcl_Obj * objPtr, va_list argList); / * 268 */ | |||
| CONST84_RETURN char * (*tcl_HashStats) (Tcl_HashTable * tablePtr); /* 2 69 */ | char * (*tcl_HashStats) (Tcl_HashTable * tablePtr); /* 269 */ | |||
| CONST84_RETURN char * (*tcl_ParseVar) (Tcl_Interp * interp, CONST char * start, CONST84 char ** termPtr); /* 270 */ | CONST84_RETURN char * (*tcl_ParseVar) (Tcl_Interp * interp, CONST char * start, CONST84 char ** termPtr); /* 270 */ | |||
| CONST84_RETURN char * (*tcl_PkgPresent) (Tcl_Interp * interp, CONST cha r * name, CONST char * version, int exact); /* 271 */ | CONST84_RETURN char * (*tcl_PkgPresent) (Tcl_Interp * interp, CONST cha r * name, CONST char * version, int exact); /* 271 */ | |||
| CONST84_RETURN char * (*tcl_PkgPresentEx) (Tcl_Interp * interp, CONST c har * name, CONST char * version, int exact, ClientData * clientDataPtr); / * 272 */ | CONST84_RETURN char * (*tcl_PkgPresentEx) (Tcl_Interp * interp, CONST c har * name, CONST char * version, int exact, ClientData * clientDataPtr); / * 272 */ | |||
| int (*tcl_PkgProvide) (Tcl_Interp * interp, CONST char * name, CONST ch ar * version); /* 273 */ | int (*tcl_PkgProvide) (Tcl_Interp * interp, CONST char * name, CONST ch ar * version); /* 273 */ | |||
| CONST84_RETURN char * (*tcl_PkgRequire) (Tcl_Interp * interp, CONST cha r * name, CONST char * version, int exact); /* 274 */ | CONST84_RETURN char * (*tcl_PkgRequire) (Tcl_Interp * interp, CONST cha r * name, CONST char * version, int exact); /* 274 */ | |||
| void (*tcl_SetErrorCodeVA) (Tcl_Interp * interp, va_list argList); /* 2 75 */ | void (*tcl_SetErrorCodeVA) (Tcl_Interp * interp, va_list argList); /* 2 75 */ | |||
| int (*tcl_VarEvalVA) (Tcl_Interp * interp, va_list argList); /* 276 */ | int (*tcl_VarEvalVA) (Tcl_Interp * interp, va_list argList); /* 276 */ | |||
| Tcl_Pid (*tcl_WaitPid) (Tcl_Pid pid, int * statPtr, int options); /* 27 7 */ | Tcl_Pid (*tcl_WaitPid) (Tcl_Pid pid, int * statPtr, int options); /* 27 7 */ | |||
| void (*tcl_PanicVA) (CONST char * format, va_list argList); /* 278 */ | void (*tcl_PanicVA) (CONST char * format, va_list argList); /* 278 */ | |||
| void (*tcl_GetVersion) (int * major, int * minor, int * patchLevel, int * type); /* 279 */ | void (*tcl_GetVersion) (int * major, int * minor, int * patchLevel, int * type); /* 279 */ | |||
| End of changes. 3 change blocks. | ||||
| 3 lines changed or deleted | 3 lines changed or added | |||