| 6775 | |
| 6776 | |
| 6777 | void luaX_init (lua_State *L) { |
| 6778 | int i; |
| 6779 | for (i=0; i<NUM_RESERVED; i++) { |
| 6780 | TString *ts = luaS_new(L, luaX_tokens[i]); |
| 6781 | luaS_fix(ts); /* reserved words are never collected */ |
| 6782 | lua_assert(strlen(luaX_tokens[i])+1 <= TOKEN_LEN); |
| 6783 | ts->tsv.reserved = cast_byte(i+1); /* reserved word */ |
| 6784 | } |
| 6785 | } |
| 6786 | |
| 6787 | |
| 6788 | #define MAXSRC 80 |