diff --git a/hash.c b/hash.c index 97d6efb0..67d8f097 100644 --- a/hash.c +++ b/hash.c @@ -3,13 +3,11 @@ ** hash manager for lua */ -char *rcs_hash="$Id: hash.c,v 2.8 1994/10/11 12:59:49 celes Exp $"; +char *rcs_hash="$Id: hash.c,v 2.9 1994/10/17 19:03:23 celes Exp roberto $"; #include #include -#include "mm.h" - #include "opcode.h" #include "hash.h" #include "inout.h" diff --git a/lua.h b/lua.h index 2452c161..a93ef30e 100644 --- a/lua.h +++ b/lua.h @@ -2,17 +2,13 @@ ** LUA - Linguagem para Usuarios de Aplicacao ** Grupo de Tecnologia em Computacao Grafica ** TeCGraf - PUC-Rio -** $Id: lua.h,v 1.3 1994/08/17 15:05:08 celes Exp celes $ +** $Id: lua.h,v 1.4 1994/08/24 15:29:02 celes Exp roberto $ */ #ifndef lua_h #define lua_h -#ifdef __cplusplus -extern "C" -{ -#endif typedef void (*lua_CFunction) (void); typedef struct Object *lua_Object; @@ -61,8 +57,4 @@ int lua_isfunction (lua_Object object); int lua_iscfunction (lua_Object object); int lua_isuserdata (lua_Object object); -#ifdef __cplusplus -} -#endif - #endif diff --git a/opcode.c b/opcode.c index 75f59d54..c356bde5 100644 --- a/opcode.c +++ b/opcode.c @@ -3,7 +3,7 @@ ** TecCGraf - PUC-Rio */ -char *rcs_opcode="$Id: opcode.c,v 2.9 1994/10/11 14:38:17 celes Exp $"; +char *rcs_opcode="$Id: opcode.c,v 2.10 1994/10/17 19:00:40 celes Exp roberto $"; #include #include @@ -13,8 +13,6 @@ char *rcs_opcode="$Id: opcode.c,v 2.9 1994/10/11 14:38:17 celes Exp $"; #include #endif -#include "mm.h" - #include "opcode.h" #include "hash.h" #include "inout.h" @@ -76,7 +74,7 @@ static int lua_checkstack (Word n) /* -** Concatenate two given string, creating a mark space at the beginning. +** Concatenate two given strings, creating a mark space at the beginning. ** Return the new string pointer. */ static char *lua_strconc (char *l, char *r) @@ -119,7 +117,7 @@ static int lua_tonumber (Object *obj) } /* -** Test if is possible to convert an object to a number object. +** Test if it is possible to convert an object to a number object. ** If possible, return the converted object, otherwise return nil object. */ static Object *lua_convtonumber (Object *obj) @@ -648,7 +646,7 @@ int lua_execute (Byte *pc) /* -** Function to indexed the values on the top +** Function to index the values on the top */ int lua_pushsubscript (void) {