mirrors/lua
0
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2024-11-23 18:23:43 +08:00
Code Issues Packages Projects Releases Wiki Activity

warnings/details

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2001-07-21 21:59:36 -03:00
parent a94cba4b88
commit 45b173cbf8
5 changed files with 10 additions and 18 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lapi.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lapi.c,v 1.147 2001/06/26 13:20:45 roberto Exp roberto $
** $Id: lapi.c,v 1.148 2001/07/12 18:11:58 roberto Exp roberto $
** Lua API
** See Copyright Notice in lua.h
*/
@ -489,7 +489,7 @@ LUA_API int lua_ref (lua_State *L, int lock) {
lua_rawseti(L, -2, ref);
lua_pop(L, 1); /* remove registry */
}
lua_pushliteral(L, "n");
lua_pushliteral(L, l_s("n"));
lua_pushnumber(L, ref);
lua_settable(L, -3);
lua_pop(L, 2);

4
lauxlib.h
View File

@ -1,5 +1,5 @@
/*
** $Id: lauxlib.h,v 1.34 2001/02/23 17:17:25 roberto Exp roberto $
** $Id: lauxlib.h,v 1.35 2001/04/06 21:17:37 roberto Exp roberto $
** Auxiliary functions for building Lua libraries
** See Copyright Notice in lua.h
*/
@ -85,7 +85,7 @@ typedef struct luaL_Buffer {
} luaL_Buffer;
#define luaL_putchar(B,c) \
((void)((B)->p < &(B)->buffer[LUAL_BUFFERSIZE] || luaL_prepbuffer(B)), \
((void)((B)->p < ((B)->buffer+LUAL_BUFFERSIZE) || luaL_prepbuffer(B)), \
(*(B)->p++ = (lua_char)(c)))
#define luaL_addsize(B,n) ((B)->p += (n))

12
liolib.c
View File

@ -1,11 +1,10 @@
/*
** $Id: liolib.c,v 1.119 2001/07/12 18:11:58 roberto Exp roberto $
** $Id: liolib.c,v 1.120 2001/07/16 18:48:31 roberto Exp roberto $
** Standard I/O (and system) library
** See Copyright Notice in lua.h
*/
#include <ctype.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
@ -25,13 +24,6 @@
#endif
#ifndef l_realloc
#define l_malloc(s) malloc(s)
#define l_realloc(b,os,s) realloc(b, s)
#define l_free(b, os) free(b)
#endif
#ifdef POPEN
/* FILE *popen();
@ -330,7 +322,7 @@ static int io_read (lua_State *L) {
success = 1; /* always success */
break;
case l_c('w'): /* word */
lua_error(L, "option `*w' is deprecated");
lua_error(L, l_s("option `*w' is deprecated"));
break;
case l_c('u'): { /* read until */
size_t pl = lua_strlen(L, n) - 2;

4
llex.c
View File

@ -1,5 +1,5 @@
/*
** $Id: llex.c,v 1.87 2001/06/15 20:36:57 roberto Exp roberto $
** $Id: llex.c,v 1.88 2001/06/20 21:07:57 roberto Exp roberto $
** Lexical Analyzer
** See Copyright Notice in lua.h
*/
@ -377,7 +377,7 @@ int luaX_lex (LexState *LS, SemInfo *seminfo) {
return TK_NAME;
}
else {
int c = LS->current;
l_charint c = LS->current;
if (iscntrl(c))
luaX_invalidchar(LS, c);
next(LS);

4
llex.h
View File

@ -1,5 +1,5 @@
/*
** $Id: llex.h,v 1.35 2001/03/06 14:46:54 roberto Exp roberto $
** $Id: llex.h,v 1.36 2001/06/20 21:07:57 roberto Exp roberto $
** Lexical Analyzer
** See Copyright Notice in lua.h
*/
@ -49,7 +49,7 @@ typedef struct Token {
typedef struct LexState {
int current; /* current character */
l_charint current; /* current character */
Token t; /* current token */
Token lookahead; /* look ahead token */
struct FuncState *fs; /* `FuncState' is private to the parser */