/*
**?$Id:?lapi.cv?2.259?2016/02/29?14:27:14?roberto?Exp?$
**?Lua?API
**?See?Copyright?Notice?in?lua.h
*/

#define?lapi_c
#define?LUA_CORE

#include?“lprefix.h“


#include?
#include?

#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[]?=
??“$LuaVersion:?“?LUA_COPYRIGHT?“?$“
??“$LuaAuthors:?“?LUA_AUTHORS?“?$“;


/*?value?at?a?non-valid?index?*/
#define?NONVALIDVALUE		cast（TValue?*?luaO_nilobject）

/*?corresponding?test?*/
#define?isvalid（o）	（（o）?!=?luaO_nilobject）

/*?test?for?pseudo?index?*/
#define?ispseudo（i）		（（i）?<=?LUA_REGISTRYINDEX）

/*?test?for?upvalue?*/
#define?isupvalue（i）		（（i）?
/*?test?for?valid?but?not?pseudo?index?*/
#define?isstackindex（i?o）	（isvalid（o）?&&?!ispseudo（i））

#define?api_checkvalidindex（lo）??api_check（l?isvalid（o）?“invalid?index“）

#define?api_checkstackindex（l?i?o）??\
	api_check（l?isstackindex（i?o）?“index?not?in?the?stack“）


static?TValue?*index2addr?（lua_State?*L?int?idx）?{
??CallInfo?*ci?=?L->ci;
??if?（idx?>?0）?{
????TValue?*o?=?ci->func?+?idx;
????api_check（L?idx?<=?ci->top?-?（ci->func?+?1）?“unacceptable?index“）;
????if?（o?>=?L->top）?return?NONVALIDVALUE;
????else?return?o;
??}
??else?if?（!ispseudo（idx））?{??/*?negative?index?*/
????api_check（L?idx?!=?0?&&?-idx?<=?L->top?-?（ci->func?+?1）?“invalid?index“）;
????return?L->top?+?idx;
??}
??else?if?（idx?==?LUA_REGISTRYINDEX）
????return?&G（L）->l_registry;
??else?{??/*?upvalues?*/
????idx?=?LUA_REGISTRYINDEX?-?idx;
????api_check（L?idx?<=?MAXUPVAL?+?1?“upvalue?index?too?large“）;
????if?（ttislcf（ci->func））??/*?light?C?function??*/
??????return?NONVALIDVALUE;??/*?it?has?no?upvalues?*/
????else?{
??????CClosure?*func?=?clCvalue（ci->func）;
??????return?（idx?<=?func->nupvalues）???&func->upvalue[idx-1]?:?NONVALIDVALUE;
????}
??}
}


/*
**?to?be?called?by?‘lua_checkstack‘?in?protected?mode?to?grow?stack
**?capturing?memory?errors
*/
static?void?growstack?（lua_State?*L?void?*ud）?{
??int?size?=?*（int?*）ud;
??luaD_growstack（L?size）;
}


LUA_API?int?lua_checkstack?（lua_State?*L?int?n）?{
??int?res;
??CallInfo?*ci?=?L->ci;
??lua_lock（L）;
??api_check（L?n?>=?0?“negative?‘n‘“）;
??if?（L->stack_last?-?L->top?>?n）??/*?stack?large?enough??*/
????res?=?1;??/*?yes;?check?is?OK?*/
??else?{??/*?no;?need?to?grow?stack?*/
????int?inuse?=?cast_int（L->top?-?L->stack）?+?EXTRA_STACK;
????if?（inuse?>?LUAI_MAXSTACK?-?n）??/*?can?grow?without?overflow??*/
??????res?=?0;??/*?no?*/
????else??/*?try?to?grow?stack?*/
??????res?=?（luaD_rawrunprotected（L?&growstack?&n）?==?LUA_OK）;
??}
??if?（res?&&?ci->top?top?+?n）
????ci->top?=?L->top?+?n;??/*?adjust?frame?top?*/
??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

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2017-11-15?11:39??lua-5.3.4\
?????目錄???????????0??2017-11-15?11:47??lua-5.3.4\lua-5.3.4\
?????目錄???????????0??2017-11-15?11:39??lua-5.3.4\lua-5.3.4\doc\
?????文件???????29948??2016-12-23?04:29??lua-5.3.4\lua-5.3.4\doc\contents.html
?????文件?????????240??2015-04-03?11:54??lua-5.3.4\lua-5.3.4\doc\index.css
?????文件????????9893??2016-12-04?20:36??lua-5.3.4\lua-5.3.4\doc\logo.gif
?????文件????????2192??2016-10-17?23:43??lua-5.3.4\lua-5.3.4\doc\lua.1
?????文件????????2311??2016-02-28?19:34??lua-5.3.4\lua-5.3.4\doc\lua.css
?????文件????????3071??2011-11-17?01:16??lua-5.3.4\lua-5.3.4\doc\luac.1
?????文件?????????256??2015-03-11?21:12??lua-5.3.4\lua-5.3.4\doc\manual.css
?????文件??????327666??2017-01-09?23:30??lua-5.3.4\lua-5.3.4\doc\manual.html
?????文件????????3774??2006-11-17?03:39??lua-5.3.4\lua-5.3.4\doc\osi-certified-72x60.png
?????文件???????11380??2016-12-23?04:22??lua-5.3.4\lua-5.3.4\doc\readme.html
?????文件????????3273??2016-12-21?00:26??lua-5.3.4\lua-5.3.4\Makefile
?????文件?????????151??2017-01-13?01:25??lua-5.3.4\lua-5.3.4\README
?????目錄???????????0??2017-11-15?11:39??lua-5.3.4\lua-5.3.4\src\
?????文件???????31323??2016-02-29?22:27??lua-5.3.4\lua-5.3.4\src\lapi.c
?????文件?????????541??2015-03-07?03:49??lua-5.3.4\lua-5.3.4\src\lapi.h
?????文件???????30784??2017-11-15?11:34??lua-5.3.4\lua-5.3.4\src\lapi.obj
?????文件???????30491??2016-12-21?02:37??lua-5.3.4\lua-5.3.4\src\lauxlib.c
?????文件????????8628??2016-12-06?22:54??lua-5.3.4\lua-5.3.4\src\lauxlib.h
?????文件???????36874??2017-11-15?11:34??lua-5.3.4\lua-5.3.4\src\lauxlib.obj
?????文件???????13707??2016-09-06?03:06??lua-5.3.4\lua-5.3.4\src\lbaselib.c
?????文件???????22233??2017-11-15?11:34??lua-5.3.4\lua-5.3.4\src\lbaselib.obj
?????文件????????4959??2015-11-12?03:08??lua-5.3.4\lua-5.3.4\src\lbitlib.c
?????文件?????????890??2017-11-15?11:34??lua-5.3.4\lua-5.3.4\src\lbitlib.obj
?????文件???????34304??2016-12-22?21:08??lua-5.3.4\lua-5.3.4\src\lcode.c
?????文件????????3250??2016-01-06?00:22??lua-5.3.4\lua-5.3.4\src\lcode.h
?????文件???????26595??2017-11-15?11:34??lua-5.3.4\lua-5.3.4\src\lcode.obj
?????文件????????3764??2016-04-12?03:19??lua-5.3.4\lua-5.3.4\src\lcorolib.c
?????文件????????7722??2017-11-15?11:34??lua-5.3.4\lua-5.3.4\src\lcorolib.obj
............此處省略94個文件信息