rusefi
/
lua
mirror of https://github.com/rusefi/lua.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

comments (references to "ANSI C" changed to "ISO C", which is the 

international name
This commit is contained in:
Roberto Ierusalimschy 2014-11-02 17:33:33 -02:00
parent 28fdbcf393
commit e75c0148c3
8 changed files with 19 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ldebug.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: ldebug.c,v 2.102 2014/10/25 11:50:46 roberto Exp roberto $ ** $Id: ldebug.c,v 2.103 2014/11/02 19:19:04 roberto Exp roberto $
** Debug Interface ** Debug Interface
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -481,7 +481,7 @@ static const char *getfuncname (lua_State *L, CallInfo *ci, const char **name) {
/* /*
** only ANSI way to check whether a pointer points to an array ** only portable way to check whether a pointer points to an array
** (used only for error messages, so efficiency is not a big concern) ** (used only for error messages, so efficiency is not a big concern)
*/ */
static int isinstack (CallInfo *ci, const TValue *o) { static int isinstack (CallInfo *ci, const TValue *o) {

4
ldo.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: ldo.c,v 2.131 2014/10/25 11:50:46 roberto Exp roberto $ ** $Id: ldo.c,v 2.132 2014/11/02 19:19:04 roberto Exp roberto $
** Stack and Call structure of Lua ** Stack and Call structure of Lua
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -69,7 +69,7 @@
#else /* }{ */ #else /* }{ */
/* ANSI handling with long jumps */ /* ISO C handling with long jumps */
#define LUAI_THROW(L,c) longjmp((c)->b, 1) #define LUAI_THROW(L,c) longjmp((c)->b, 1)
#define LUAI_TRY(L,c,a) if (setjmp((c)->b) == 0) { a } #define LUAI_TRY(L,c,a) if (setjmp((c)->b) == 0) { a }
#define luai_jmpbuf jmp_buf #define luai_jmpbuf jmp_buf

6
liolib.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: liolib.c,v 2.138 2014/10/31 15:54:06 roberto Exp roberto $ ** $Id: liolib.c,v 2.139 2014/11/02 19:19:04 roberto Exp roberto $
** Standard I/O (and system) library ** Standard I/O (and system) library
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -59,7 +59,7 @@
#else /* }{ */ #else /* }{ */
/* ANSI definitions */ /* ISO C definitions */
#define l_popen(L,c,m) \ #define l_popen(L,c,m) \
((void)((void)c, m), \ ((void)((void)c, m), \
luaL_error(L, "'popen' not supported"), \ luaL_error(L, "'popen' not supported"), \
@ -114,7 +114,7 @@
#else /* }{ */ #else /* }{ */
/* ANSI definitions */ /* ISO C definitions */
#define l_fseek(f,o,w) fseek(f,o,w) #define l_fseek(f,o,w) fseek(f,o,w)
#define l_ftell(f) ftell(f) #define l_ftell(f) ftell(f)
#define l_seeknum long #define l_seeknum long

4
llimits.h
View File

@ -1,5 +1,5 @@
/* /*
** $Id: llimits.h,v 1.122 2014/10/27 16:29:58 roberto Exp roberto $ ** $Id: llimits.h,v 1.123 2014/10/29 17:07:45 roberto Exp roberto $
** Limits, basic types, and some other 'installation-dependent' definitions ** Limits, basic types, and some other 'installation-dependent' definitions
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -120,7 +120,7 @@ typedef LUAI_UACINT l_uacInt;
/* /*
** cast a lua_Unsigned to a signed lua_Integer; this cast is ** cast a lua_Unsigned to a signed lua_Integer; this cast is
** not strict ANSI C, but two-complement architectures should ** not strict ISO C, but two-complement architectures should
** work fine. ** work fine.
*/ */
#if !defined(l_castU2S) #if !defined(l_castU2S)

4
lmem.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lmem.c,v 1.87 2014/10/25 11:50:46 roberto Exp roberto $ ** $Id: lmem.c,v 1.88 2014/11/02 19:19:04 roberto Exp roberto $
** Interface to Memory Manager ** Interface to Memory Manager
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -34,7 +34,7 @@
** * frealloc(ud, p, x, 0) frees the block 'p' ** * frealloc(ud, p, x, 0) frees the block 'p'
** (in this specific case, frealloc must return NULL); ** (in this specific case, frealloc must return NULL);
** particularly, frealloc(ud, NULL, 0, 0) does nothing ** particularly, frealloc(ud, NULL, 0, 0) does nothing
** (which is equivalent to free(NULL) in ANSI C) ** (which is equivalent to free(NULL) in ISO C)
** **
** frealloc returns NULL if it cannot create or reallocate the area ** frealloc returns NULL if it cannot create or reallocate the area
** (any reallocation to an equal or smaller size cannot fail!) ** (any reallocation to an equal or smaller size cannot fail!)

6
loslib.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: loslib.c,v 1.50 2014/10/25 11:50:46 roberto Exp roberto $ ** $Id: loslib.c,v 1.51 2014/11/02 19:19:04 roberto Exp roberto $
** Standard Operating System library ** Standard Operating System library
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -76,7 +76,7 @@
#else /* }{ */ #else /* }{ */
/* ANSI definitions */ /* ISO C definitions */
#define LUA_TMPNAMBUFSIZE L_tmpnam #define LUA_TMPNAMBUFSIZE L_tmpnam
#define lua_tmpnam(b,e) { e = (tmpnam(b) == NULL); } #define lua_tmpnam(b,e) { e = (tmpnam(b) == NULL); }
@ -99,7 +99,7 @@
#else /* }{ */ #else /* }{ */
/* ANSI definitions */ /* ISO C definitions */
#define l_gmtime(t,r) ((void)r, gmtime(t)) #define l_gmtime(t,r) ((void)r, gmtime(t))
#define l_localtime(t,r) ((void)r, localtime(t)) #define l_localtime(t,r) ((void)r, localtime(t))

7
lstate.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lstate.c,v 2.125 2014/07/24 16:17:56 roberto Exp roberto $ ** $Id: lstate.c,v 2.126 2014/11/02 19:19:04 roberto Exp roberto $
** Global State ** Global State
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -74,9 +74,8 @@ typedef struct LG {
/* /*
** Compute an initial seed as random as possible. In ANSI, rely on ** Compute an initial seed as random as possible. Rely on Address Space
** Address Space Layout Randomization (if present) to increase ** Layout Randomization (if present) to increase randomness..
** randomness..
*/ */
#define addbuff(b,p,e) \ #define addbuff(b,p,e) \
{ size_t t = cast(size_t, e); \ { size_t t = cast(size_t, e); \

4
lua.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lua.c,v 1.219 2014/10/31 15:54:06 roberto Exp roberto $ ** $Id: lua.c,v 1.220 2014/11/02 19:19:04 roberto Exp roberto $
** Lua stand-alone interpreter ** Lua stand-alone interpreter
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -59,7 +59,7 @@
#else /* }{ */ #else /* }{ */
/* ANSI definition */ /* ISO C definition */
#define lua_stdin_is_tty() 1 /* assume stdin is a tty */ #define lua_stdin_is_tty() 1 /* assume stdin is a tty */
#endif /* } */ #endif /* } */