diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2005-07-21 21:48:37 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2005-07-21 21:48:37 (GMT) |
| commit | 6a77d40d48491f6d5c3dabe5a735ac475c14c493 (patch) | |
| tree | c76bea3e15d9b35ebbc33ce09572debe570e3a00 /generic/tclCompile.h | |
| parent | 62e6cfe58942a5ad17479f50213844599b49b9e6 (diff) | |
| download | tcl-6a77d40d48491f6d5c3dabe5a735ac475c14c493.zip tcl-6a77d40d48491f6d5c3dabe5a735ac475c14c493.tar.gz tcl-6a77d40d48491f6d5c3dabe5a735ac475c14c493.tar.bz2 | |
Compiler for [dict] and related changes.
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 23 |
1 files changed, 20 insertions, 3 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index 27b05b8..dcb122b 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -8,7 +8,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.58 2005/07/14 12:12:39 dkf Exp $ + * RCS: @(#) $Id: tclCompile.h,v 1.59 2005/07/21 21:49:04 dkf Exp $ */ #ifndef _TCLCOMPILATION @@ -518,7 +518,7 @@ typedef struct ByteCode { /* TIP#90 - 'return' command. */ -#define INST_RETURN 98 +#define INST_RETURN_IMM 98 /* TIP#123 - exponentiation operator. */ @@ -544,9 +544,26 @@ typedef struct ByteCode { #define INST_LIST_NOT_IN 107 #define INST_PUSH_RETURN_OPTIONS 108 +#define INST_RETURN_STK 109 + +/* + * Dictionary (TIP#111) related commands. + */ + +#define INST_DICT_GET 110 +#define INST_DICT_SET 111 +#define INST_DICT_UNSET 112 +#define INST_DICT_INCR_IMM 113 +#define INST_DICT_APPEND 114 +#define INST_DICT_LAPPEND 115 +#define INST_DICT_FIRST 116 +#define INST_DICT_NEXT 117 +#define INST_DICT_DONE 118 +#define INST_DICT_UPDATE_START 119 +#define INST_DICT_UPDATE_END 120 /* The last opcode */ -#define LAST_INST_OPCODE 108 +#define LAST_INST_OPCODE 120 /* * Table describing the Tcl bytecode instructions: their name (for displaying |