small corrections

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 <string.h>
 #include <stdlib.h>
 
-#include "mm.h"
-
 #include "opcode.h"
 #include "hash.h"
 #include "inout.h"

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

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 <stdio.h>
 #include <stdlib.h>
@@ -13,8 +13,6 @@ char *rcs_opcode="$Id: opcode.c,v 2.9 1994/10/11 14:38:17 celes Exp $";
 #include <floatingpoint.h>
 #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)
 {