diff options
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 21 |
1 files changed, 11 insertions, 10 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 3db6da9..0afc13b 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclCompile.h,v 1.79 2007/09/13 15:27:07 das Exp $ + * RCS: @(#) $Id: tclCompile.h,v 1.80 2007/09/25 20:27:17 dkf Exp $ */ #ifndef _TCLCOMPILATION @@ -128,19 +128,19 @@ typedef struct CmdLocation { */ typedef struct ECL { - int srcOffset; /* Command location to find the entry. */ - int nline; - int *line; /* Line information for all words in the + int srcOffset; /* Command location to find the entry. */ + int nline; + int *line; /* Line information for all words in the * command. */ } ECL; typedef struct ExtCmdLoc { - int type; /* Context type. */ - Tcl_Obj *path; /* Path of the sourced file the command is + int type; /* Context type. */ + Tcl_Obj *path; /* Path of the sourced file the command is * in. */ - ECL *loc; /* Command word locations (lines). */ - int nloc; /* Number of allocated entries in 'loc'. */ - int nuloc; /* Number of used entries in 'loc'. */ + ECL *loc; /* Command word locations (lines). */ + int nloc; /* Number of allocated entries in 'loc'. */ + int nuloc; /* Number of used entries in 'loc'. */ } ExtCmdLoc; /* @@ -161,7 +161,8 @@ typedef struct ExtCmdLoc { typedef ClientData (AuxDataDupProc) (ClientData clientData); typedef void (AuxDataFreeProc) (ClientData clientData); typedef void (AuxDataPrintProc)(ClientData clientData, - struct ByteCode *codePtr, unsigned int pcOffset); + Tcl_Obj *appendObj, struct ByteCode *codePtr, + unsigned int pcOffset); /* * We define a separate AuxDataType struct to hold type-related information |