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