From c9e3d321828dd095d46e295873bc991f0c9ed3d7 Mon Sep 17 00:00:00 2001
From: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date: Mon, 7 Apr 1997 11:48:53 -0300
Subject: first implementation of "$if"; new function "findstring" (useful in
 good places)

---
 table.c | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

(limited to 'table.c')

diff --git a/table.c b/table.c
index a1ab1178..1d6afbfc 100644
--- a/table.c
+++ b/table.c
@@ -3,7 +3,7 @@
 ** Module to control static tables
 */
 
-char *rcs_table="$Id: table.c,v 2.66 1997/04/04 15:35:37 roberto Exp roberto $";
+char *rcs_table="$Id: table.c,v 2.67 1997/04/06 14:08:08 roberto Exp roberto $";
 
 #include "luamem.h"
 #include "auxlib.h"
@@ -111,6 +111,12 @@ TaggedString *luaI_createfixedstring (char *name)
 }
 
 
+int luaI_globaldefined (char *name)
+{
+  return ttype(&lua_table[luaI_findsymbolbyname(name)].object) != LUA_T_NIL;
+}
+
+
 /*
 ** Traverse symbol table objects
 */
-- 
cgit v1.2.3-55-g6feb