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