back to upavalues as extra arguments for C closures; this way it's

trivial to make currying.

1 files changed, 1 insertions, 10 deletions

diff --git a/lapi.c b/lapi.c
index 2bcabed0..63e6dbfd 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lapi.c,v 1.16 1997/12/22 17:52:20 roberto Exp roberto $
+** $Id: lapi.c,v 1.17 1998/01/02 17:46:32 roberto Exp roberto $
 ** Lua API
 ** See Copyright Notice in lua.h
 */
@@ -124,15 +124,6 @@ lua_Object lua_lua2C (int number)
 }
 
 
-lua_Object lua_upvalue (int n)
-{
-  TObject *f = L->stack.stack+L->Cstack.lua2C-1;
-  if (ttype(f) != LUA_T_CLMARK || n <= 0 || n > clvalue(f)->nelems)
-    return LUA_NOOBJECT;
-  return put_luaObject(&clvalue(f)->consts[n]);
-}
-
-
 int lua_callfunction (lua_Object function)
 {
   if (function == LUA_NOOBJECT)