From 5ef1989c4b05aff8362a7ea6ba62aad76d4a040d Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Thu, 12 Feb 1998 17:27:10 -0200
Subject: [PATCH] "settag" returns its first argument.

---
 lbuiltin.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lbuiltin.c b/lbuiltin.c
index 5562ccff..1d26b86e 100644
--- a/lbuiltin.c
+++ b/lbuiltin.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lbuiltin.c,v 1.23 1998/01/19 19:49:22 roberto Exp roberto $
+** $Id: lbuiltin.c,v 1.24 1998/02/12 19:23:32 roberto Exp roberto $
 ** Built-in functions
 ** See Copyright Notice in lua.h
 */
@@ -312,6 +312,7 @@ static void settag (void)
   lua_Object o = luaL_tablearg(1);
   lua_pushobject(o);
   lua_settag(luaL_check_number(2));
+  lua_pushobject(o);  /* returns first argument */
 }