| 436 | |
| 437 | |
| 438 | LUA_API lua_CFunction lua_tocfunction (lua_State *L, int idx) { |
| 439 | const TValue *o = index2value(L, idx); |
| 440 | if (ttislcf(o)) return fvalue(o); |
| 441 | else if (ttisCclosure(o)) |
| 442 | return clCvalue(o)->f; |
| 443 | else return NULL; /* not a C function */ |
| 444 | } |
| 445 | |
| 446 | |
| 447 | l_sinline void *touserdata (const TValue *o) { |