small corrections

This commit is contained in:
Roberto Ierusalimschy
1994-11-01 15:54:31 -02:00
parent fb23cd2e26
commit 41e4c5798e
3 changed files with 6 additions and 18 deletions

View File

@@ -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)
{