| 64 | |
| 65 | |
| 66 | void luaX_init (lua_State *L) { |
| 67 | int i; |
| 68 | for (i=0; i<NUM_RESERVED; i++) { |
| 69 | TString *ts = luaS_new(L, luaX_tokens[i]); |
| 70 | luaS_fix(ts); /* reserved words are never collected */ |
| 71 | lua_assert(strlen(luaX_tokens[i])+1 <= TOKEN_LEN); |
| 72 | ts->tsv.reserved = cast_byte(i+1); /* reserved word */ |
| 73 | } |
| 74 | } |
| 75 | |
| 76 | |
| 77 | #define MAXSRC 80 |