nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

format for function prototypes.

Browse Source
This commit is contained in:
Roberto Ierusalimschy
1999-04-07 12:37:02 -03:00
parent de04533dc0
commit 0133610315
2 changed files with 9 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
lundump.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lundump.c,v 1.17 1999/03/29 16:16:18 lhf Exp $ ** $Id: lundump.c,v 1.8 1999/03/30 20:29:34 roberto Exp roberto $
** load bytecodes from files ** load bytecodes from files
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -134,7 +134,7 @@ static void LoadLocals (TProtoFunc* tf, ZIO* Z)
tf->locvars[i].varname=NULL; tf->locvars[i].varname=NULL;
} }
static TProtoFunc* LoadFunction(ZIO* Z); static TProtoFunc* LoadFunction (ZIO* Z);
static void LoadConstants (TProtoFunc* tf, ZIO* Z) static void LoadConstants (TProtoFunc* tf, ZIO* Z)
{ {
@@ -224,7 +224,7 @@ static TProtoFunc* LoadChunk (ZIO* Z)
** load one chunk from a file or buffer ** load one chunk from a file or buffer
** return main if ok and NULL at EOF ** return main if ok and NULL at EOF
*/ */
TProtoFunc* luaU_undump1(ZIO* Z) TProtoFunc* luaU_undump1 (ZIO* Z)
{ {
int c=zgetc(Z); int c=zgetc(Z);
if (c==ID_CHUNK) if (c==ID_CHUNK)
@@ -237,7 +237,7 @@ TProtoFunc* luaU_undump1(ZIO* Z)
/* /*
** test number representation ** test number representation
*/ */
void luaU_testnumber(void) void luaU_testnumber (void)
{ {
if (sizeof(real)!=SIZEOF_NUMBER) if (sizeof(real)!=SIZEOF_NUMBER)
luaL_verror("numbers have %d bytes; expected %d. see lundump.h", luaL_verror("numbers have %d bytes; expected %d. see lundump.h",
@@ -259,7 +259,7 @@ void luaU_testnumber(void)
/* /*
* handle constants that cannot happen * handle constants that cannot happen
*/ */
void luaU_badconstant(char* s, int i, TObject* o, TProtoFunc* tf) void luaU_badconstant (char* s, int i, TObject* o, TProtoFunc* tf)
{ {
int t=ttype(o); int t=ttype(o);
char* name= (t>0 || t<LUA_T_LINE) ? "?" : luaO_typenames[-t]; char* name= (t>0 || t<LUA_T_LINE) ? "?" : luaO_typenames[-t];

8
lundump.h
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lundump.h,v 1.13 1999/03/29 16:16:18 lhf Exp $ ** $Id: lundump.h,v 1.6 1999/03/30 20:29:34 roberto Exp roberto $
** load pre-compiled Lua chunks ** load pre-compiled Lua chunks
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -41,9 +41,9 @@
/* -- end of user configuration -- DO NOT CHANGE ANYTHING BELOW THIS LINE -- */ /* -- end of user configuration -- DO NOT CHANGE ANYTHING BELOW THIS LINE -- */
TProtoFunc* luaU_undump1(ZIO* Z); /* load one chunk */ TProtoFunc* luaU_undump1 (ZIO* Z); /* load one chunk */
void luaU_testnumber(void); /* test number representation */ void luaU_testnumber (void); /* test number representation */
void luaU_badconstant(char* s, int i, TObject* o, TProtoFunc* tf); void luaU_badconstant (char* s, int i, TObject* o, TProtoFunc* tf);
/* handle cases that cannot happen */ /* handle cases that cannot happen */
/* definitions for headers of binary files */ /* definitions for headers of binary files */