Subject: reorder to preserve main BC development branch sequence better

From: dkf <[email-masked]>
Date: Fri, 2 Nov 2012 20:39:10 +0000

---
 generic/tclCompile.c | 10 +++++-----
 generic/tclCompile.h |  6 +++---
 2 files changed, 8 insertions(+), 8 deletions(-)

diff --git a/generic/tclCompile.c b/generic/tclCompile.c
index 7036f6a..c390971 100644
--- a/generic/tclCompile.c
+++ b/generic/tclCompile.c
@@ -488,17 +488,17 @@ InstructionDesc const tclInstructionTable[] = {
     {"tclooSelf",	 1,	+1,	  0,	{OPERAND_NONE}},
 	/* Push the identity of the current TclOO object (i.e., the name of
 	 * its current public access command) on the stack. */
-    {"tclooNext",	 2,	INT_MIN,  1,	{OPERAND_UINT1}},
-	/* Push the identity of the current TclOO object (i.e., the name of
-	 * its current public access command) on the stack. */
-   {"tclooClass",	 1,	0,	  0,	{OPERAND_NONE}},
+    {"tclooClass",	 1,	0,	  0,	{OPERAND_NONE}},
 	/* Push the class of the TclOO object named at the top of the stack
 	 * onto the stack.
 	 * Stack:  ... object => ... class */
-   {"tclooNamespace",	 1,	0,	  0,	{OPERAND_NONE}},
+    {"tclooNamespace",	 1,	0,	  0,	{OPERAND_NONE}},
 	/* Push the namespace of the TclOO object named at the top of the
 	 * stack onto the stack.
 	 * Stack:  ... object => ... namespace */
+    {"tclooNext",	 2,	INT_MIN,  1,	{OPERAND_UINT1}},
+	/* Push the identity of the current TclOO object (i.e., the name of
+	 * its current public access command) on the stack. */
 
     {NULL, 0, 0, 0, {OPERAND_NONE}}
 };
diff --git a/generic/tclCompile.h b/generic/tclCompile.h
index cab517d..c860307 100644
--- a/generic/tclCompile.h
+++ b/generic/tclCompile.h
@@ -701,9 +701,9 @@ typedef struct ByteCode {
 
 /* For compilation relating to TclOO */
 #define INST_TCLOO_SELF			153
-#define INST_TCLOO_NEXT			154
-#define INST_TCLOO_CLASS		155
-#define INST_TCLOO_NS			156
+#define INST_TCLOO_CLASS		154
+#define INST_TCLOO_NS			155
+#define INST_TCLOO_NEXT			156
 
 /* The last opcode */
 #define LAST_INST_OPCODE		156
-- 
cgit v0.12