| 430 | |
| 431 | |
| 432 | LUA_API lua_CFunction lua_tocfunction (lua_State *L, int idx) { |
| 433 | const TValue *o = index2value(L, idx); |
| 434 | if (ttislcf(o)) return fvalue(o); |
| 435 | else if (ttisCclosure(o)) |
| 436 | return clCvalue(o)->f; |
| 437 | else return NULL; /* not a C function */ |
| 438 | } |
| 439 | |
| 440 | |
| 441 | static void *touserdata (const TValue *o) { |