From d4707925176f94a29e69ff92f6618f36ca1928dd Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Mon, 30 Mar 1998 10:57:23 -0300
Subject: [PATCH] words are stored in hi-lo order (easier to print)

---
 lua.stx | 6 +++---
 lvm.c   | 4 ++--
 2 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/lua.stx b/lua.stx
index fcfd9aa0..41aff108 100644
--- a/lua.stx
+++ b/lua.stx
@@ -1,6 +1,6 @@
 %{
 /*
-** $Id: lua.stx,v 1.35 1998/03/09 21:49:52 roberto Exp roberto $
+** $Id: lua.stx,v 1.36 1998/03/25 18:52:29 roberto Exp roberto $
 ** Syntax analizer and code generator
 ** See Copyright Notice in lua.h
 */
@@ -149,8 +149,8 @@ static int code_oparg_at (int pc, OpCode op, int builtin, int arg, int delta)
   }
   else if (arg <= MAX_WORD) {
     code[pc] = op+1+builtin;
-    code[pc+1] = arg&0xFF;
-    code[pc+2] = arg>>8;
+    code[pc+1] = arg>>8;
+    code[pc+2] = arg&0xFF;
     return 3;
   }
   else luaY_error("code too long " MES_LIM("64K"));
diff --git a/lvm.c b/lvm.c
index c41d84b5..42d29ac7 100644
--- a/lvm.c
+++ b/lvm.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lvm.c,v 1.26 1998/03/11 13:59:50 roberto Exp roberto $
+** $Id: lvm.c,v 1.27 1998/03/25 18:52:29 roberto Exp roberto $
 ** Lua virtual machine
 ** See Copyright Notice in lua.h
 */
@@ -28,7 +28,7 @@
 
 
 #define skip_word(pc)	(pc+=2)
-#define get_word(pc)	(*(pc)+(*((pc)+1)<<8))
+#define get_word(pc)	((*(pc)<<8)+(*((pc)+1)))
 #define next_word(pc)   (pc+=2, get_word(pc-2))