00001 00013 #include "dkcLua.h" 00014 #include "dkcStdio.h" 00015 00016 00017 #ifdef USE_DKC_LUA 00018 00019 00020 DKC_LUA *dkcAllocOpenLua(const char *filename){ 00021 DKC_LUA *p = dkcAllocate(sizeof(DKC_LUA)); 00022 if(NULL==p){ 00023 return NULL; 00024 } 00025 p->mL = lua_open(); 00026 if(NULL==p->mL){ 00027 goto Error; 00028 } 00029 00030 lua_dofile(p->mL, filename); 00031 00032 Error: 00033 dkcFreeCloseLua(&p); 00034 return NULL; 00035 } 00036 00037 DKC_EXTERN int dkcLuaFunctionCall(DKC_LUA *,const char *function_name); 00038 00039 DKC_EXTERN int dkcLuaFunctionResult(DKC_LUA *,void *ptr,size_t size); 00040 00041 DKC_EXTERN int dkcLuaFunctionCallResult(DKC_LUA *,const char *function_name,void *ptr,size_t size); 00042 00043 00044 DKC_EXTERN int dkcFreeCloseLua(DKC_LUA **); 00045 00046 00047 #endif