| 28 | |
| 29 | |
| 30 | void luaT_init (lua_State *L) { |
| 31 | static const char *const luaT_eventname[] = { /* ORDER TM */ |
| 32 | "__index", "__newindex", |
| 33 | "__gc", "__mode", "__eq", |
| 34 | "__add", "__sub", "__mul", "__div", "__mod", |
| 35 | "__pow", "__unm", "__len", "__lt", "__le", |
| 36 | "__concat", "__call" |
| 37 | }; |
| 38 | int i; |
| 39 | for (i=0; i<TM_N; i++) { |
| 40 | G(L)->tmname[i] = luaS_new(L, luaT_eventname[i]); |
| 41 | luaS_fix(G(L)->tmname[i]); /* never collect these names */ |
| 42 | } |
| 43 | } |
| 44 | |
| 45 | |
| 46 | /* |