aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1994-11-01 15:54:31 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1994-11-01 15:54:31 -0200
commit41e4c5798ee95404f6687def4bbed236566db676 (patch)
tree7d1b8ecfde62af636540e5656f8ce28776798615
parentfb23cd2e26163da34e541b64f5cfd6168ce32840 (diff)
downloadlua-41e4c5798ee95404f6687def4bbed236566db676.tar.gz
lua-41e4c5798ee95404f6687def4bbed236566db676.tar.bz2
lua-41e4c5798ee95404f6687def4bbed236566db676.zip
small corrections
-rw-r--r--hash.c4
-rw-r--r--lua.h10
-rw-r--r--opcode.c10
3 files changed, 6 insertions, 18 deletions
diff --git a/hash.c b/hash.c
index 97d6efb0..67d8f097 100644
--- a/hash.c
+++ b/hash.c
@@ -3,13 +3,11 @@
3** hash manager for lua 3** hash manager for lua
4*/ 4*/
5 5
6char *rcs_hash="$Id: hash.c,v 2.8 1994/10/11 12:59:49 celes Exp $"; 6char *rcs_hash="$Id: hash.c,v 2.9 1994/10/17 19:03:23 celes Exp roberto $";
7 7
8#include <string.h> 8#include <string.h>
9#include <stdlib.h> 9#include <stdlib.h>
10 10
11#include "mm.h"
12
13#include "opcode.h" 11#include "opcode.h"
14#include "hash.h" 12#include "hash.h"
15#include "inout.h" 13#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 @@
2** LUA - Linguagem para Usuarios de Aplicacao 2** LUA - Linguagem para Usuarios de Aplicacao
3** Grupo de Tecnologia em Computacao Grafica 3** Grupo de Tecnologia em Computacao Grafica
4** TeCGraf - PUC-Rio 4** TeCGraf - PUC-Rio
5** $Id: lua.h,v 1.3 1994/08/17 15:05:08 celes Exp celes $ 5** $Id: lua.h,v 1.4 1994/08/24 15:29:02 celes Exp roberto $
6*/ 6*/
7 7
8 8
9#ifndef lua_h 9#ifndef lua_h
10#define lua_h 10#define lua_h
11 11
12#ifdef __cplusplus
13extern "C"
14{
15#endif
16 12
17typedef void (*lua_CFunction) (void); 13typedef void (*lua_CFunction) (void);
18typedef struct Object *lua_Object; 14typedef struct Object *lua_Object;
@@ -61,8 +57,4 @@ int lua_isfunction (lua_Object object);
61int lua_iscfunction (lua_Object object); 57int lua_iscfunction (lua_Object object);
62int lua_isuserdata (lua_Object object); 58int lua_isuserdata (lua_Object object);
63 59
64#ifdef __cplusplus
65}
66#endif
67
68#endif 60#endif
diff --git a/opcode.c b/opcode.c
index 75f59d54..c356bde5 100644
--- a/opcode.c
+++ b/opcode.c
@@ -3,7 +3,7 @@
3** TecCGraf - PUC-Rio 3** TecCGraf - PUC-Rio
4*/ 4*/
5 5
6char *rcs_opcode="$Id: opcode.c,v 2.9 1994/10/11 14:38:17 celes Exp $"; 6char *rcs_opcode="$Id: opcode.c,v 2.10 1994/10/17 19:00:40 celes Exp roberto $";
7 7
8#include <stdio.h> 8#include <stdio.h>
9#include <stdlib.h> 9#include <stdlib.h>
@@ -13,8 +13,6 @@ char *rcs_opcode="$Id: opcode.c,v 2.9 1994/10/11 14:38:17 celes Exp $";
13#include <floatingpoint.h> 13#include <floatingpoint.h>
14#endif 14#endif
15 15
16#include "mm.h"
17
18#include "opcode.h" 16#include "opcode.h"
19#include "hash.h" 17#include "hash.h"
20#include "inout.h" 18#include "inout.h"
@@ -76,7 +74,7 @@ static int lua_checkstack (Word n)
76 74
77 75
78/* 76/*
79** Concatenate two given string, creating a mark space at the beginning. 77** Concatenate two given strings, creating a mark space at the beginning.
80** Return the new string pointer. 78** Return the new string pointer.
81*/ 79*/
82static char *lua_strconc (char *l, char *r) 80static char *lua_strconc (char *l, char *r)
@@ -119,7 +117,7 @@ static int lua_tonumber (Object *obj)
119} 117}
120 118
121/* 119/*
122** Test if is possible to convert an object to a number object. 120** Test if it is possible to convert an object to a number object.
123** If possible, return the converted object, otherwise return nil object. 121** If possible, return the converted object, otherwise return nil object.
124*/ 122*/
125static Object *lua_convtonumber (Object *obj) 123static Object *lua_convtonumber (Object *obj)
@@ -648,7 +646,7 @@ int lua_execute (Byte *pc)
648 646
649 647
650/* 648/*
651** Function to indexed the values on the top 649** Function to index the values on the top
652*/ 650*/
653int lua_pushsubscript (void) 651int lua_pushsubscript (void)
654{ 652{