diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-01-02 09:17:07 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-01-02 09:17:07 (GMT) |
| commit | 7d35dc662f87cf8c5b430c248f1da15ba16104b7 (patch) | |
| tree | 84d0a746be1a9189703b8571f3135f6bfd154a73 /generic/tclCompile.h | |
| parent | f918716ff4945cac9a2903bde7f3a337fee78c90 (diff) | |
| parent | 1dbca95b72ebb7a627cbd13ebfa12bfa5c1bd9d7 (diff) | |
| download | tcl-7d35dc662f87cf8c5b430c248f1da15ba16104b7.zip tcl-7d35dc662f87cf8c5b430c248f1da15ba16104b7.tar.gz tcl-7d35dc662f87cf8c5b430c248f1da15ba16104b7.tar.bz2 | |
implement TclOO's [next] in bytecode
Diffstat (limited to 'generic/tclCompile.h')
| -rw-r--r-- | generic/tclCompile.h | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h index fb66e90..6ecadf4 100644 --- a/generic/tclCompile.h +++ b/generic/tclCompile.h @@ -751,6 +751,8 @@ typedef struct ByteCode { #define INST_INFO_LEVEL_NUM 152 #define INST_INFO_LEVEL_ARGS 153 #define INST_RESOLVE_COMMAND 154 + +/* For compilation relating to TclOO */ #define INST_TCLOO_SELF 155 #define INST_TCLOO_CLASS 156 #define INST_TCLOO_NS 157 @@ -788,8 +790,10 @@ typedef struct ByteCode { #define INST_ORIGIN_COMMAND 178 +#define INST_TCLOO_NEXT 179 + /* The last opcode */ -#define LAST_INST_OPCODE 178 +#define LAST_INST_OPCODE 179 /* * Table describing the Tcl bytecode instructions: their name (for displaying |