From 2a2b64d6ac2ea7839dac41cc84be1c7a5a18bee7 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Wed, 25 Mar 1998 15:52:29 -0300
Subject: opcode "CLOSURE" gets the prototipe (instead of a previous
 pushconstant)

---
 lua.stx | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lua.stx')

diff --git a/lua.stx b/lua.stx
index ad7f3c88..fcfd9aa0 100644
--- a/lua.stx
+++ b/lua.stx
@@ -1,6 +1,6 @@
 %{
 /*
-** $Id: lua.stx,v 1.34 1998/02/11 20:56:46 roberto Exp roberto $
+** $Id: lua.stx,v 1.35 1998/03/09 21:49:52 roberto Exp roberto $
 ** Syntax analizer and code generator
 ** See Copyright Notice in lua.h
 */
@@ -554,8 +554,8 @@ static void func_onstack (TProtoFunc *f)
   else {
     for (i=0; i<nupvalues; i++)
       lua_pushvar((L->currState+1)->upvalues[i]);
-    code_constant(c);
-    code_oparg(CLOSURE, 2, nupvalues, -nupvalues);
+    code_oparg(CLOSURE, 0, c, -nupvalues+1);
+    code_byte(nupvalues);
   }
 }
 
-- 
cgit v1.2.3-55-g6feb