lua/llex.h

73 lines
1.8 KiB
C
Raw Normal View History

1997-09-16 23:25:59 +04:00
/*
2001-12-12 01:48:44 +03:00
** $Id: llex.h,v 1.1 2001/11/29 22:14:34 rieru Exp rieru $
1999-02-26 00:07:26 +03:00
** Lexical Analyzer
1997-09-16 23:25:59 +04:00
** See Copyright Notice in lua.h
*/
#ifndef llex_h
#define llex_h
#include "lobject.h"
#include "lzio.h"
2000-03-03 17:58:26 +03:00
#define FIRST_RESERVED 257
1998-05-27 17:08:34 +04:00
2001-01-10 19:40:56 +03:00
/* maximum length of a reserved word */
#define TOKEN_LEN (sizeof("function")/sizeof(char))
1998-05-27 17:08:34 +04:00
1999-07-22 23:29:42 +04:00
/*
* WARNING: if you change the order of this enumeration,
* grep "ORDER RESERVED"
*/
1998-05-27 17:08:34 +04:00
enum RESERVED {
/* terminal symbols denoted by reserved words */
2000-04-05 21:51:58 +04:00
TK_AND = FIRST_RESERVED, TK_BREAK,
2001-12-12 01:48:44 +03:00
TK_DO, TK_ELSE, TK_ELSEIF, TK_END, TK_FALSE, TK_FOR, TK_FUNCTION,
TK_GLOBAL, TK_IF, TK_IN, TK_LOCAL, TK_NIL, TK_NOT, TK_OR, TK_REPEAT,
TK_RETURN, TK_THEN, TK_TRUE, TK_UNTIL, TK_WHILE,
1998-05-27 17:08:34 +04:00
/* other terminal symbols */
2000-04-07 17:11:49 +04:00
TK_NAME, TK_CONCAT, TK_DOTS, TK_EQ, TK_GE, TK_LE, TK_NE, TK_NUMBER,
2000-03-10 21:37:44 +03:00
TK_STRING, TK_EOS
2000-02-08 19:39:42 +03:00
};
2000-03-03 17:58:26 +03:00
/* number of reserved words */
2001-08-31 23:46:07 +04:00
#define NUM_RESERVED (cast(int, TK_WHILE-FIRST_RESERVED+1))
1998-05-27 17:08:34 +04:00
typedef union {
lua_Number r;
TString *ts;
} SemInfo; /* semantics information */
typedef struct Token {
int token;
SemInfo seminfo;
} Token;
typedef struct LexState {
int current; /* current character (charint) */
2000-05-25 22:59:59 +04:00
Token t; /* current token */
Token lookahead; /* look ahead token */
struct FuncState *fs; /* `FuncState' is private to the parser */
struct lua_State *L;
2000-03-03 17:58:26 +03:00
struct zio *z; /* input stream */
1997-12-02 15:43:44 +03:00
int linenumber; /* input line counter */
2000-06-21 22:13:56 +04:00
int lastline; /* line of last token `consumed' */
2000-06-19 22:05:14 +04:00
TString *source; /* current source name */
} LexState;
void luaX_init (lua_State *L);
2000-06-19 22:05:14 +04:00
void luaX_setinput (lua_State *L, LexState *LS, ZIO *z, TString *source);
int luaX_lex (LexState *LS, SemInfo *seminfo);
void luaX_checklimit (LexState *ls, int val, int limit, const char *msg);
void luaX_error (LexState *ls, const char *s, int token);
void luaX_token2str (int token, char *s);
1997-09-16 23:25:59 +04:00
#endif