From e78cf96c971234ea25e35a9672ef00ea389d843f Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Fri, 24 Oct 1997 15:17:24 -0200
Subject: first version of Cclosures.

---
 lua.stx | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'lua.stx')

diff --git a/lua.stx b/lua.stx
index 13549e31..559d224f 100644
--- a/lua.stx
+++ b/lua.stx
@@ -1,6 +1,6 @@
 %{
 /*
-** $Id: lua.stx,v 1.11 1997/10/16 10:59:34 roberto Exp roberto $
+** $Id: lua.stx,v 1.12 1997/10/18 16:46:39 roberto Exp roberto $
 ** Syntax analizer and code generator
 ** See Copyright Notice in lua.h
 */
@@ -520,9 +520,9 @@ static void func_onstack (TProtoFunc *f)
   int c = next_constant(currState);
   ttype(&currState->f->consts[c]) = LUA_T_PROTO;
   currState->f->consts[c].value.tf = (currState+1)->f;
-  code_constant(c);
   for (i=0; i<nupvalues; i++)
     lua_pushvar((currState+1)->upvalues[i]);
+  code_constant(c);
   code_oparg(CLOSURE, 2, nupvalues, -nupvalues);
 }
 
-- 
cgit v1.2.3-55-g6feb