summaryrefslogtreecommitdiffstats
path: root/generic/tclCompile.h
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2014-01-07 14:19:04 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2014-01-07 14:19:04 (GMT)
commita952237bcf20a7d4140f857c095b3bf0417ca40a (patch)
tree7d9ce87fc3e6d661dd7d680b10ab279348c76da9 /generic/tclCompile.h
parent92f27b7095220ef6e508c9a0216e0fce97b3d2ae (diff)
parent8bb7405765b9aed27270dfd145037e3c5884a34a (diff)
downloadtcl-a952237bcf20a7d4140f857c095b3bf0417ca40a.zip
tcl-a952237bcf20a7d4140f857c095b3bf0417ca40a.tar.gz
tcl-a952237bcf20a7d4140f857c095b3bf0417ca40a.tar.bz2
Add compilations for the following commands:
* concat * linsert * namespace origin * next * string replace * string tolower * string totitle * string toupper * string trim * string trimleft * string trimright
Diffstat (limited to 'generic/tclCompile.h')
-rw-r--r--generic/tclCompile.h23
1 files changed, 20 insertions, 3 deletions
diff --git a/generic/tclCompile.h b/generic/tclCompile.h
index b3c8442..6ecadf4 100644
--- a/generic/tclCompile.h
+++ b/generic/tclCompile.h
@@ -512,7 +512,7 @@ typedef struct ByteCode {
#define INST_PUSH4 2
#define INST_POP 3
#define INST_DUP 4
-#define INST_CONCAT1 5
+#define INST_STR_CONCAT1 5
#define INST_INVOKE_STK1 6
#define INST_INVOKE_STK4 7
#define INST_EVAL_STK 8
@@ -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
@@ -769,14 +771,29 @@ typedef struct ByteCode {
#define INST_EXPAND_DROP 165
/* New foreach implementation */
-
#define INST_FOREACH_START 166
#define INST_FOREACH_STEP 167
#define INST_FOREACH_END 168
#define INST_LMAP_COLLECT 169
+/* For compilation of [string trim] and related */
+#define INST_STR_TRIM 170
+#define INST_STR_TRIM_LEFT 171
+#define INST_STR_TRIM_RIGHT 172
+
+#define INST_CONCAT_STK 173
+
+#define INST_STR_UPPER 174
+#define INST_STR_LOWER 175
+#define INST_STR_TITLE 176
+#define INST_STR_REPLACE 177
+
+#define INST_ORIGIN_COMMAND 178
+
+#define INST_TCLOO_NEXT 179
+
/* The last opcode */
-#define LAST_INST_OPCODE 169
+#define LAST_INST_OPCODE 179
/*
* Table describing the Tcl bytecode instructions: their name (for displaying