/*
**?$Id:?lapi.cv?2.53?2006/01/10?12:50:00?roberto?Exp?$
**?Lua?API
**?See?Copyright?Notice?in?lua.h
*/


#include?
#include?
#include?
#include?

#define?lapi_c
#define?LUA_CORE

#include?“lua.h“

#include?“lapi.h“
#include?“ldebug.h“
#include?“ldo.h“
#include?“lfunc.h“
#include?“lgc.h“
#include?“lmem.h“
#include?“lobject.h“
#include?“lstate.h“
#include?“lstring.h“
#include?“ltable.h“
#include?“ltm.h“
#include?“lundump.h“
#include?“lvm.h“



const?char?lua_ident[]?=
??“$Lua:?“?LUA_VERSION?“?“?LUA_COPYRIGHT?“?$\n“
??“$Authors:?“?LUA_AUTHORS?“?$\n“
??“$URL:?www.lua.org?$\n“;



#define?api_checknelems（L?n）	api_check（L?（n）?<=?（L->top?-?L->base））

#define?api_checkvalidindex（L?i）	api_check（L?（i）?!=?luaO_nilobject）

#define?api_incr_top（L）???{api_check（L?L->top?ci->top）;?L->top++;}



static?TValue?*index2adr?（lua_State?*L?int?idx）?{
??if?（idx?>?0）?{
????TValue?*o?=?L->base?+?（idx?-?1）;
????api_check（L?idx?<=?L->ci->top?-?L->base）;
????if?（o?>=?L->top）?return?cast（TValue?*?luaO_nilobject）;
????else?return?o;
??}
??else?if?（idx?>?LUA_REGISTRYINDEX）?{
????api_check（L?idx?!=?0?&&?-idx?<=?L->top?-?L->base）;
????return?L->top?+?idx;
??}
??else?switch?（idx）?{??/*?pseudo-indices?*/
????case?LUA_REGISTRYINDEX:?return?registry（L）;
????case?LUA_ENVIRONINDEX:?{
??????Closure?*func?=?curr_func（L）;
??????sethvalue（L?&L->env?func->c.env）;
??????return?&L->env;
????}
????case?LUA_GLOBALSINDEX:?return?gt（L）;
????default:?{
??????Closure?*func?=?curr_func（L）;
??????idx?=?LUA_GLOBALSINDEX?-?idx;
??????return?（idx?<=?func->c.nupvalues）
??????????????????&func->c.upvalue[idx-1]
????????????????:?cast（TValue?*?luaO_nilobject）;
????}
??}
}


static?Table?*getcurrenv?（lua_State?*L）?{
??if?（L->ci?==?L->base_ci）??/*?no?enclosing?function??*/
????return?hvalue（gt（L））;??/*?use?global?table?as?environment?*/
??else?{
????Closure?*func?=?curr_func（L）;
????return?func->c.env;
??}
}


void?luaA_pushobject?（lua_State?*L?const?TValue?*o）?{
??setobj2s（L?L->top?o）;
??api_incr_top（L）;
}


LUA_API?int?lua_checkstack?（lua_State?*L?int?size）?{
??int?res;
??lua_lock（L）;
??if?（（L->top?-?L->base?+?size）?>?LUAI_MAXCSTACK）
????res?=?0;??/*?stack?overflow?*/
??else?{
????luaD_checkstack（L?size）;
????if?（L->ci->top?top?+?size）
??????L->ci->top?=?L->top?+?size;
????res?=?1;
??}
??lua_unlock（L）;
??return?res;
}


LUA_API?void?lua_xmove?（lua_State?*from?lua_State?*to?int?n）?{
??int?i;
??if?（from?==?to）?return;
??lua_lock（to）;
??api_checknelems（from?n）;
??api_check（from?G（from）?==?G（to））;
??api_check（from?to->ci->top?-?to->top?>=?n）;
??from->top?-=?n;
??for?（i?=?0;?i?????setobj2s（to?to->top++?from->top?+?i）;
??}
??lua_unlock（to）;
}


LUA_API?lua_CFunction?lua_atpanic?（lua_State?*L?lua_CFunction?panicf）?{
??lua_CFunction?old;
??lua_lock（L）;
??old?=?G（L）->panic;
??G（L）->panic?=?panicf;
??lua_unlock（L）;
??return?old;
}


LUA_API?lua_State?*lua_newthread?（lua_State?*L）?{
??lua_State?*L1;
??lua_lock（L）;
??luaC_checkGC（

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2017-04-08?14:22??LuaFileSystem\
?????文件??????104448??2017-04-08?14:20??LuaFileSystem\lfs.dll
?????目錄???????????0??2017-03-22?23:27??LuaFileSystem\lua51\
?????文件????????2697??2017-03-22?23:26??LuaFileSystem\lua51\lua51.def
?????文件????????8502??2017-03-22?22:59??LuaFileSystem\lua51\lua51.vcxproj
?????文件????????6205??2017-03-22?22:50??LuaFileSystem\lua51\lua51.vcxproj.filters
?????文件?????????143??2017-03-22?22:48??LuaFileSystem\lua51\lua51.vcxproj.user
?????目錄???????????0??2017-03-22?21:46??LuaFileSystem\lua51\src_lua51\
?????文件???????22380??2006-01-10?20:50??LuaFileSystem\lua51\src_lua51\lapi.c
?????文件?????????258??2005-04-26?03:24??LuaFileSystem\lua51\src_lua51\lapi.h
?????文件???????17230??2006-01-16?20:42??LuaFileSystem\lua51\src_lua51\lauxlib.c
?????文件????????5747??2005-12-29?23:32??LuaFileSystem\lua51\src_lua51\lauxlib.h
?????文件???????16654??2006-01-18?19:49??LuaFileSystem\lua51\src_lua51\lbaselib.c
?????文件???????21164??2005-12-23?00:19??LuaFileSystem\lua51\src_lua51\lcode.c
?????文件????????2787??2005-11-09?03:44??LuaFileSystem\lua51\src_lua51\lcode.h
?????文件???????10045??2005-12-29?23:32??LuaFileSystem\lua51\src_lua51\ldblib.c
?????文件???????15998??2005-12-23?00:19??LuaFileSystem\lua51\src_lua51\ldebug.c
?????文件????????1057??2005-04-26?03:24??LuaFileSystem\lua51\src_lua51\ldebug.h
?????文件???????14700??2005-12-23?00:19??LuaFileSystem\lua51\src_lua51\ldo.c
?????文件????????1893??2005-08-25?00:15??LuaFileSystem\lua51\src_lua51\ldo.h
?????文件????????3107??2006-02-16?23:53??LuaFileSystem\lua51\src_lua51\ldump.c
?????文件????????4602??2005-12-23?00:19??LuaFileSystem\lua51\src_lua51\lfunc.c
?????文件????????1121??2005-04-26?03:24??LuaFileSystem\lua51\src_lua51\lfunc.h
?????文件???????19967??2005-12-23?00:19??LuaFileSystem\lua51\src_lua51\lgc.c
?????文件????????3155??2005-08-25?00:15??LuaFileSystem\lua51\src_lua51\lgc.h
?????文件?????????761??2005-12-29?23:32??LuaFileSystem\lua51\src_lua51\linit.c
?????文件???????13002??2006-01-28?20:59??LuaFileSystem\lua51\src_lua51\liolib.c
?????文件???????12450??2006-02-07?02:28??LuaFileSystem\lua51\src_lua51\llex.c
?????文件????????2173??2005-12-07?23:43??LuaFileSystem\lua51\src_lua51\llex.h
?????文件????????2345??2005-12-28?01:12??LuaFileSystem\lua51\src_lua51\llimits.h
?????文件????????5827??2005-08-27?01:36??LuaFileSystem\lua51\src_lua51\lmathlib.c
............此處省略113個文件信息