vim: src/if_lua.c annotate

annotate src/if_lua.c @ 21030:08e284594211 v8.2.1066

patch 8.2.1066: Lua arrays are zero based Commit: https://github.com/vim/vim/commit/bd84617d1a6766efd59c94aabebb044bef805b99 Author: Bram Moolenaar <Bram@vim.org> Date: Sat Jun 27 12:32:57 2020 +0200 patch 8.2.1066: Lua arrays are zero based Problem: Lua arrays are zero based. Solution: Make Lua arrays one based. (Prabir Shrestha, closes https://github.com/vim/vim/issues/6347) Note: this is not backwards compatible.

author	Bram Moolenaar <Bram@vim.org>
date	Sat, 27 Jun 2020 12:45:04 +0200
parents	380923b96878
children	89aba7895bb2

rev	line source
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2 *
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	4 *
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	5 * Lua interface by Luis Carvalho
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	6 *
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	7 * Do ":help uganda" in Vim to read copying and usage conditions.
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	8 * Do ":help credits" in Vim to see a list of people who contributed.
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	9 * See README.txt for an overview of the Vim source code.
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	10 */
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	11
2683 0c7d6d01e058 updated for version 7.3.101 Bram Moolenaar <bram@vim.org> parents: 2612 diff changeset	12 #include "vim.h"
0c7d6d01e058 updated for version 7.3.101 Bram Moolenaar <bram@vim.org> parents: 2612 diff changeset	13
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	14 #include <lua.h>
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	15 #include <lualib.h>
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	16 #include <lauxlib.h>
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	17
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	18 // Only do the following when the feature is enabled. Needed for "make
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	19 // depend".
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	20 #if defined(FEAT_LUA) \|\| defined(PROTO)
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	21
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	22 #define LUAVIM_CHUNKNAME "vim chunk"
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	23 #define LUAVIM_NAME "vim"
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	24 #define LUAVIM_EVALNAME "luaeval"
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	25 #define LUAVIM_EVALHEADER "local _A=select(1,...) return "
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	26
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	27 typedef buf_T *luaV_Buffer;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	28 typedef win_T *luaV_Window;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	29 typedef dict_T *luaV_Dict;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	30 typedef list_T *luaV_List;
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	31 typedef blob_T *luaV_Blob;
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	32 typedef struct {
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	33 char_u *name; // funcref
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	34 dict_T *self; // selfdict
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	35 } luaV_Funcref;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	36 typedef void (msgfunc_T)(char_u );
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	37
21006 ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	38 typedef struct {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	39 int lua_funcref; // ref to a lua func
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	40 int lua_tableref; // ref to a lua table if metatable else LUA_NOREF. used
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	41 // for __call
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	42 lua_State *L;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	43 } luaV_CFuncState;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	44
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	45 static const char LUAVIM_DICT[] = "dict";
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	46 static const char LUAVIM_LIST[] = "list";
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	47 static const char LUAVIM_BLOB[] = "blob";
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	48 static const char LUAVIM_FUNCREF[] = "funcref";
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	49 static const char LUAVIM_BUFFER[] = "buffer";
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	50 static const char LUAVIM_WINDOW[] = "window";
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	51 static const char LUAVIM_FREE[] = "luaV_free";
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	52 static const char LUAVIM_LUAEVAL[] = "luaV_luaeval";
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	53 static const char LUAVIM_SETREF[] = "luaV_setref";
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	54
21006 ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	55 static const char LUA___CALL[] = "__call";
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	56
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	57 // most functions are closures with a cache table as first upvalue;
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	58 // get/setudata manage references to vim userdata in cache table through
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	59 // object pointers (light userdata)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	60 #define luaV_getudata(L, v) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	61 lua_pushlightuserdata((L), (void *) (v)); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	62 lua_rawget((L), lua_upvalueindex(1))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	63 #define luaV_setudata(L, v) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	64 lua_pushlightuserdata((L), (void *) (v)); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	65 lua_pushvalue((L), -2); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	66 lua_rawset((L), lua_upvalueindex(1))
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	67 #define luaV_getfield(L, s) \
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	68 lua_pushlightuserdata((L), (void *)(s)); \
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	69 lua_rawget((L), LUA_REGISTRYINDEX)
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	70 #define luaV_checksandbox(L) \
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	71 if (sandbox) luaL_error((L), "not allowed in sandbox")
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	72 #define luaV_msg(L) luaV_msgfunc((L), (msgfunc_T) msg)
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	73 #define luaV_emsg(L) luaV_msgfunc((L), (msgfunc_T) emsg)
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	74 #define luaV_checktypval(L, a, v, msg) \
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	75 do { \
21006 ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	76 if (luaV_totypval(L, a, v) == FAIL) \
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	77 luaL_error(L, msg ": cannot convert value"); \
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	78 } while (0)
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	79
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	80 static luaV_List luaV_pushlist(lua_State L, list_T *lis);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	81 static luaV_Dict luaV_pushdict(lua_State L, dict_T *dic);
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	82 static luaV_Blob luaV_pushblob(lua_State L, blob_T *blo);
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	83 static luaV_Funcref luaV_pushfuncref(lua_State L, char_u *name);
21006 ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	84 static int luaV_call_lua_func(int argcount, typval_T argvars, typval_T rettv, void *state);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	85 static void luaV_call_lua_func_free(void *state);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	86
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	87 #if LUA_VERSION_NUM <= 501
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	88 #define luaV_openlib(L, l, n) luaL_openlib(L, NULL, l, n)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	89 #define luaL_typeerror luaL_typerror
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	90 #else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	91 #define luaV_openlib luaL_setfuncs
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	92 #endif
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	93
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	94 #ifdef DYNAMIC_LUA
2373 f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	95
15868 7fad90423bd2 patch 8.1.0941: macros for MS-Windows are inconsistent Bram Moolenaar <Bram@vim.org> parents: 15470 diff changeset	96 #ifndef MSWIN
2373 f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	97 # include <dlfcn.h>
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	98 # define HANDLE void*
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	99 # define load_dll(n) dlopen((n), RTLD_LAZY\|RTLD_GLOBAL)
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	100 # define symbol_from_dll dlsym
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	101 # define close_dll dlclose
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	102 #else
2612 fa5dee44df3f updated for version 7.3.034 Bram Moolenaar <bram@vim.org> parents: 2543 diff changeset	103 # define load_dll vimLoadLib
2373 f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	104 # define symbol_from_dll GetProcAddress
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	105 # define close_dll FreeLibrary
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	106 #endif
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	107
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	108 // lauxlib
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	109 #if LUA_VERSION_NUM <= 501
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	110 #define luaL_register dll_luaL_register
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	111 #define luaL_prepbuffer dll_luaL_prepbuffer
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	112 #define luaL_openlib dll_luaL_openlib
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	113 #define luaL_typerror dll_luaL_typerror
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	114 #define luaL_loadfile dll_luaL_loadfile
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	115 #define luaL_loadbuffer dll_luaL_loadbuffer
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	116 #else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	117 #define luaL_prepbuffsize dll_luaL_prepbuffsize
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	118 #define luaL_setfuncs dll_luaL_setfuncs
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	119 #define luaL_loadfilex dll_luaL_loadfilex
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	120 #define luaL_loadbufferx dll_luaL_loadbufferx
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	121 #define luaL_argerror dll_luaL_argerror
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	122 #endif
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	123 #define luaL_checkany dll_luaL_checkany
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	124 #define luaL_checklstring dll_luaL_checklstring
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	125 #define luaL_checkinteger dll_luaL_checkinteger
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	126 #define luaL_optinteger dll_luaL_optinteger
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	127 #define luaL_checktype dll_luaL_checktype
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	128 #define luaL_error dll_luaL_error
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	129 #define luaL_newstate dll_luaL_newstate
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	130 #define luaL_buffinit dll_luaL_buffinit
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	131 #define luaL_addlstring dll_luaL_addlstring
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	132 #define luaL_pushresult dll_luaL_pushresult
20456 25392efa9039 patch 8.2.0782: cannot build with Lua on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 20454 diff changeset	133 #define luaL_loadstring dll_luaL_loadstring
21012 380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	134 #define luaL_ref dll_luaL_ref
380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	135 #define luaL_unref dll_luaL_unref
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	136 // lua
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	137 #if LUA_VERSION_NUM <= 501
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	138 #define lua_tonumber dll_lua_tonumber
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	139 #define lua_tointeger dll_lua_tointeger
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	140 #define lua_call dll_lua_call
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	141 #define lua_pcall dll_lua_pcall
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	142 #else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	143 #define lua_tonumberx dll_lua_tonumberx
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	144 #define lua_tointegerx dll_lua_tointegerx
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	145 #define lua_callk dll_lua_callk
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	146 #define lua_pcallk dll_lua_pcallk
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	147 #define lua_getglobal dll_lua_getglobal
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	148 #define lua_setglobal dll_lua_setglobal
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	149 #endif
6887 2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	150 #if LUA_VERSION_NUM <= 502
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	151 #define lua_replace dll_lua_replace
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	152 #define lua_remove dll_lua_remove
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	153 #endif
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	154 #if LUA_VERSION_NUM >= 503
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	155 #define lua_rotate dll_lua_rotate
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	156 #define lua_copy dll_lua_copy
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	157 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	158 #define lua_typename dll_lua_typename
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	159 #define lua_close dll_lua_close
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	160 #define lua_gettop dll_lua_gettop
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	161 #define lua_settop dll_lua_settop
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	162 #define lua_pushvalue dll_lua_pushvalue
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	163 #define lua_isnumber dll_lua_isnumber
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	164 #define lua_isstring dll_lua_isstring
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	165 #define lua_type dll_lua_type
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	166 #define lua_rawequal dll_lua_rawequal
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	167 #define lua_toboolean dll_lua_toboolean
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	168 #define lua_tolstring dll_lua_tolstring
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	169 #define lua_touserdata dll_lua_touserdata
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	170 #define lua_pushnil dll_lua_pushnil
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	171 #define lua_pushnumber dll_lua_pushnumber
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	172 #define lua_pushinteger dll_lua_pushinteger
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	173 #define lua_pushlstring dll_lua_pushlstring
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	174 #define lua_pushstring dll_lua_pushstring
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	175 #define lua_pushfstring dll_lua_pushfstring
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	176 #define lua_pushcclosure dll_lua_pushcclosure
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	177 #define lua_pushboolean dll_lua_pushboolean
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	178 #define lua_pushlightuserdata dll_lua_pushlightuserdata
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	179 #define lua_getfield dll_lua_getfield
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	180 #define lua_rawget dll_lua_rawget
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	181 #define lua_rawgeti dll_lua_rawgeti
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	182 #define lua_createtable dll_lua_createtable
14583 42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	183 #if LUA_VERSION_NUM >= 504
42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	184 #define lua_newuserdatauv dll_lua_newuserdatauv
42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	185 #else
42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	186 #define lua_newuserdata dll_lua_newuserdata
42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	187 #endif
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	188 #define lua_getmetatable dll_lua_getmetatable
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	189 #define lua_setfield dll_lua_setfield
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	190 #define lua_rawset dll_lua_rawset
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	191 #define lua_rawseti dll_lua_rawseti
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	192 #define lua_setmetatable dll_lua_setmetatable
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	193 #define lua_next dll_lua_next
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	194 // libs
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	195 #define luaopen_base dll_luaopen_base
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	196 #define luaopen_table dll_luaopen_table
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	197 #define luaopen_string dll_luaopen_string
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	198 #define luaopen_math dll_luaopen_math
2431 7b764999f9b9 Update for Lua interface. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2373 diff changeset	199 #define luaopen_io dll_luaopen_io
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	200 #define luaopen_os dll_luaopen_os
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	201 #define luaopen_package dll_luaopen_package
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	202 #define luaopen_debug dll_luaopen_debug
2431 7b764999f9b9 Update for Lua interface. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2373 diff changeset	203 #define luaL_openlibs dll_luaL_openlibs
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	204
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	205 // lauxlib
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	206 #if LUA_VERSION_NUM <= 501
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	207 void (dll_luaL_register) (lua_State L, const char libname, const luaL_Reg l);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	208 char (dll_luaL_prepbuffer) (luaL_Buffer *B);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	209 void (dll_luaL_openlib) (lua_State L, const char libname, const luaL_Reg l, int nup);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	210 int (dll_luaL_typerror) (lua_State L, int narg, const char *tname);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	211 int (dll_luaL_loadfile) (lua_State L, const char *filename);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	212 int (dll_luaL_loadbuffer) (lua_State L, const char buff, size_t sz, const char name);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	213 #else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	214 char (dll_luaL_prepbuffsize) (luaL_Buffer *B, size_t sz);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	215 void (dll_luaL_setfuncs) (lua_State L, const luaL_Reg *l, int nup);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	216 int (dll_luaL_loadfilex) (lua_State L, const char filename, const char mode);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	217 int (dll_luaL_loadbufferx) (lua_State L, const char buff, size_t sz, const char name, const char *mode);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	218 int (dll_luaL_argerror) (lua_State L, int numarg, const char *extramsg);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	219 #endif
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	220 void (dll_luaL_checkany) (lua_State L, int narg);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	221 const char (dll_luaL_checklstring) (lua_State L, int numArg, size_t l);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	222 lua_Integer (dll_luaL_checkinteger) (lua_State L, int numArg);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	223 lua_Integer (dll_luaL_optinteger) (lua_State L, int nArg, lua_Integer def);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	224 void (dll_luaL_checktype) (lua_State L, int narg, int t);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	225 int (dll_luaL_error) (lua_State L, const char *fmt, ...);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	226 lua_State (dll_luaL_newstate) (void);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	227 void (dll_luaL_buffinit) (lua_State L, luaL_Buffer *B);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	228 void (dll_luaL_addlstring) (luaL_Buffer B, const char *s, size_t l);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	229 void (dll_luaL_pushresult) (luaL_Buffer B);
20456 25392efa9039 patch 8.2.0782: cannot build with Lua on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 20454 diff changeset	230 int (dll_luaL_loadstring) (lua_State L, const char *s);
21012 380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	231 int (dll_luaL_ref) (lua_State L, int idx);
380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	232 #if LUA_VERSION_NUM <= 502
380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	233 void (dll_luaL_unref) (lua_State L, int idx, int n);
380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	234 #else
380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	235 void (dll_luaL_unref) (lua_State L, int idx, lua_Integer n);
380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	236 #endif
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	237 // lua
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	238 #if LUA_VERSION_NUM <= 501
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	239 lua_Number (dll_lua_tonumber) (lua_State L, int idx);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	240 lua_Integer (dll_lua_tointeger) (lua_State L, int idx);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	241 void (dll_lua_call) (lua_State L, int nargs, int nresults);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	242 int (dll_lua_pcall) (lua_State L, int nargs, int nresults, int errfunc);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	243 #else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	244 lua_Number (dll_lua_tonumberx) (lua_State L, int idx, int *isnum);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	245 lua_Integer (dll_lua_tointegerx) (lua_State L, int idx, int *isnum);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	246 void (dll_lua_callk) (lua_State L, int nargs, int nresults, int ctx,
3618 c052f3b79b99 updated for version 7.3.569 Bram Moolenaar <bram@vim.org> parents: 3459 diff changeset	247 lua_CFunction k);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	248 int (dll_lua_pcallk) (lua_State L, int nargs, int nresults, int errfunc,
3618 c052f3b79b99 updated for version 7.3.569 Bram Moolenaar <bram@vim.org> parents: 3459 diff changeset	249 int ctx, lua_CFunction k);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	250 void (dll_lua_getglobal) (lua_State L, const char *var);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	251 void (dll_lua_setglobal) (lua_State L, const char *var);
6887 2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	252 #endif
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	253 #if LUA_VERSION_NUM <= 502
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	254 void (dll_lua_replace) (lua_State L, int idx);
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	255 void (dll_lua_remove) (lua_State L, int idx);
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	256 #endif
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	257 #if LUA_VERSION_NUM >= 503
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	258 void (dll_lua_rotate) (lua_State L, int idx, int n);
6878 02466bf84bab patch 7.4.759 Bram Moolenaar <bram@vim.org> parents: 6625 diff changeset	259 void (dll_lua_copy) (lua_State L, int fromidx, int toidx);
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	260 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	261 const char (dll_lua_typename) (lua_State *L, int tp);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	262 void (dll_lua_close) (lua_State L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	263 int (dll_lua_gettop) (lua_State L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	264 void (dll_lua_settop) (lua_State L, int idx);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	265 void (dll_lua_pushvalue) (lua_State L, int idx);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	266 int (dll_lua_isnumber) (lua_State L, int idx);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	267 int (dll_lua_isstring) (lua_State L, int idx);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	268 int (dll_lua_type) (lua_State L, int idx);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	269 int (dll_lua_rawequal) (lua_State L, int idx1, int idx2);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	270 int (dll_lua_toboolean) (lua_State L, int idx);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	271 const char (dll_lua_tolstring) (lua_State L, int idx, size_t len);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	272 void (dll_lua_touserdata) (lua_State *L, int idx);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	273 void (dll_lua_pushnil) (lua_State L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	274 void (dll_lua_pushnumber) (lua_State L, lua_Number n);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	275 void (dll_lua_pushinteger) (lua_State L, lua_Integer n);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	276 void (dll_lua_pushlstring) (lua_State L, const char *s, size_t l);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	277 void (dll_lua_pushstring) (lua_State L, const char *s);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	278 const char (dll_lua_pushfstring) (lua_State L, const char fmt, ...);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	279 void (dll_lua_pushcclosure) (lua_State L, lua_CFunction fn, int n);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	280 void (dll_lua_pushboolean) (lua_State L, int b);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	281 void (dll_lua_pushlightuserdata) (lua_State L, void *p);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	282 void (dll_lua_getfield) (lua_State L, int idx, const char *k);
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	283 #if LUA_VERSION_NUM <= 502
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	284 void (dll_lua_rawget) (lua_State L, int idx);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	285 void (dll_lua_rawgeti) (lua_State L, int idx, int n);
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	286 #else
d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	287 int (dll_lua_rawget) (lua_State L, int idx);
d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	288 int (dll_lua_rawgeti) (lua_State L, int idx, lua_Integer n);
d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	289 #endif
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	290 void (dll_lua_createtable) (lua_State L, int narr, int nrec);
14583 42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	291 #if LUA_VERSION_NUM >= 504
42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	292 void (dll_lua_newuserdatauv) (lua_State *L, size_t sz, int nuvalue);
42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	293 #else
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	294 void (dll_lua_newuserdata) (lua_State *L, size_t sz);
14583 42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	295 #endif
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	296 int (dll_lua_getmetatable) (lua_State L, int objindex);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	297 void (dll_lua_setfield) (lua_State L, int idx, const char *k);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	298 void (dll_lua_rawset) (lua_State L, int idx);
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	299 #if LUA_VERSION_NUM <= 502
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	300 void (dll_lua_rawseti) (lua_State L, int idx, int n);
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	301 #else
d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	302 void (dll_lua_rawseti) (lua_State L, int idx, lua_Integer n);
d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	303 #endif
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	304 int (dll_lua_setmetatable) (lua_State L, int objindex);
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	305 int (dll_lua_next) (lua_State L, int idx);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	306 // libs
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	307 int (dll_luaopen_base) (lua_State L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	308 int (dll_luaopen_table) (lua_State L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	309 int (dll_luaopen_string) (lua_State L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	310 int (dll_luaopen_math) (lua_State L);
2431 7b764999f9b9 Update for Lua interface. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2373 diff changeset	311 int (dll_luaopen_io) (lua_State L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	312 int (dll_luaopen_os) (lua_State L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	313 int (dll_luaopen_package) (lua_State L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	314 int (dll_luaopen_debug) (lua_State L);
2431 7b764999f9b9 Update for Lua interface. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2373 diff changeset	315 void (dll_luaL_openlibs) (lua_State L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	316
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	317 typedef void **luaV_function;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	318 typedef struct {
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	319 const char *name;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	320 luaV_function func;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	321 } luaV_Reg;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	322
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	323 static const luaV_Reg luaV_dll[] = {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	324 // lauxlib
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	325 #if LUA_VERSION_NUM <= 501
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	326 {"luaL_register", (luaV_function) &dll_luaL_register},
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	327 {"luaL_prepbuffer", (luaV_function) &dll_luaL_prepbuffer},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	328 {"luaL_openlib", (luaV_function) &dll_luaL_openlib},
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	329 {"luaL_typerror", (luaV_function) &dll_luaL_typerror},
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	330 {"luaL_loadfile", (luaV_function) &dll_luaL_loadfile},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	331 {"luaL_loadbuffer", (luaV_function) &dll_luaL_loadbuffer},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	332 #else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	333 {"luaL_prepbuffsize", (luaV_function) &dll_luaL_prepbuffsize},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	334 {"luaL_setfuncs", (luaV_function) &dll_luaL_setfuncs},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	335 {"luaL_loadfilex", (luaV_function) &dll_luaL_loadfilex},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	336 {"luaL_loadbufferx", (luaV_function) &dll_luaL_loadbufferx},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	337 {"luaL_argerror", (luaV_function) &dll_luaL_argerror},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	338 #endif
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	339 {"luaL_checkany", (luaV_function) &dll_luaL_checkany},
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	340 {"luaL_checklstring", (luaV_function) &dll_luaL_checklstring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	341 {"luaL_checkinteger", (luaV_function) &dll_luaL_checkinteger},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	342 {"luaL_optinteger", (luaV_function) &dll_luaL_optinteger},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	343 {"luaL_checktype", (luaV_function) &dll_luaL_checktype},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	344 {"luaL_error", (luaV_function) &dll_luaL_error},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	345 {"luaL_newstate", (luaV_function) &dll_luaL_newstate},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	346 {"luaL_buffinit", (luaV_function) &dll_luaL_buffinit},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	347 {"luaL_addlstring", (luaV_function) &dll_luaL_addlstring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	348 {"luaL_pushresult", (luaV_function) &dll_luaL_pushresult},
20456 25392efa9039 patch 8.2.0782: cannot build with Lua on MS-Windows Bram Moolenaar <Bram@vim.org> parents: 20454 diff changeset	349 {"luaL_loadstring", (luaV_function) &dll_luaL_loadstring},
21012 380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	350 {"luaL_ref", (luaV_function) &dll_luaL_ref},
380923b96878 patch 8.2.1057: cannot build with dynamic Lua Bram Moolenaar <Bram@vim.org> parents: 21006 diff changeset	351 {"luaL_unref", (luaV_function) &dll_luaL_unref},
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	352 // lua
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	353 #if LUA_VERSION_NUM <= 501
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	354 {"lua_tonumber", (luaV_function) &dll_lua_tonumber},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	355 {"lua_tointeger", (luaV_function) &dll_lua_tointeger},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	356 {"lua_call", (luaV_function) &dll_lua_call},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	357 {"lua_pcall", (luaV_function) &dll_lua_pcall},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	358 #else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	359 {"lua_tonumberx", (luaV_function) &dll_lua_tonumberx},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	360 {"lua_tointegerx", (luaV_function) &dll_lua_tointegerx},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	361 {"lua_callk", (luaV_function) &dll_lua_callk},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	362 {"lua_pcallk", (luaV_function) &dll_lua_pcallk},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	363 {"lua_getglobal", (luaV_function) &dll_lua_getglobal},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	364 {"lua_setglobal", (luaV_function) &dll_lua_setglobal},
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	365 #endif
6887 2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	366 #if LUA_VERSION_NUM <= 502
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	367 {"lua_replace", (luaV_function) &dll_lua_replace},
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	368 {"lua_remove", (luaV_function) &dll_lua_remove},
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	369 #endif
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	370 #if LUA_VERSION_NUM >= 503
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	371 {"lua_rotate", (luaV_function) &dll_lua_rotate},
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	372 {"lua_copy", (luaV_function) &dll_lua_copy},
2b7e36955265 patch 7.4.763 Bram Moolenaar <bram@vim.org> parents: 6878 diff changeset	373 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	374 {"lua_typename", (luaV_function) &dll_lua_typename},
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	375 {"lua_close", (luaV_function) &dll_lua_close},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	376 {"lua_gettop", (luaV_function) &dll_lua_gettop},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	377 {"lua_settop", (luaV_function) &dll_lua_settop},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	378 {"lua_pushvalue", (luaV_function) &dll_lua_pushvalue},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	379 {"lua_isnumber", (luaV_function) &dll_lua_isnumber},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	380 {"lua_isstring", (luaV_function) &dll_lua_isstring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	381 {"lua_type", (luaV_function) &dll_lua_type},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	382 {"lua_rawequal", (luaV_function) &dll_lua_rawequal},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	383 {"lua_toboolean", (luaV_function) &dll_lua_toboolean},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	384 {"lua_tolstring", (luaV_function) &dll_lua_tolstring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	385 {"lua_touserdata", (luaV_function) &dll_lua_touserdata},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	386 {"lua_pushnil", (luaV_function) &dll_lua_pushnil},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	387 {"lua_pushnumber", (luaV_function) &dll_lua_pushnumber},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	388 {"lua_pushinteger", (luaV_function) &dll_lua_pushinteger},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	389 {"lua_pushlstring", (luaV_function) &dll_lua_pushlstring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	390 {"lua_pushstring", (luaV_function) &dll_lua_pushstring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	391 {"lua_pushfstring", (luaV_function) &dll_lua_pushfstring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	392 {"lua_pushcclosure", (luaV_function) &dll_lua_pushcclosure},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	393 {"lua_pushboolean", (luaV_function) &dll_lua_pushboolean},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	394 {"lua_pushlightuserdata", (luaV_function) &dll_lua_pushlightuserdata},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	395 {"lua_getfield", (luaV_function) &dll_lua_getfield},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	396 {"lua_rawget", (luaV_function) &dll_lua_rawget},
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	397 {"lua_rawgeti", (luaV_function) &dll_lua_rawgeti},
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	398 {"lua_createtable", (luaV_function) &dll_lua_createtable},
14583 42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	399 #if LUA_VERSION_NUM >= 504
42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	400 {"lua_newuserdatauv", (luaV_function) &dll_lua_newuserdatauv},
42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	401 #else
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	402 {"lua_newuserdata", (luaV_function) &dll_lua_newuserdata},
14583 42eaac6eb4e4 patch 8.1.0305: missing support for Lua 5.4 32 bits on Unix Christian Brabandt <cb@256bit.org> parents: 14395 diff changeset	403 #endif
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	404 {"lua_getmetatable", (luaV_function) &dll_lua_getmetatable},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	405 {"lua_setfield", (luaV_function) &dll_lua_setfield},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	406 {"lua_rawset", (luaV_function) &dll_lua_rawset},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	407 {"lua_rawseti", (luaV_function) &dll_lua_rawseti},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	408 {"lua_setmetatable", (luaV_function) &dll_lua_setmetatable},
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	409 {"lua_next", (luaV_function) &dll_lua_next},
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	410 // libs
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	411 {"luaopen_base", (luaV_function) &dll_luaopen_base},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	412 {"luaopen_table", (luaV_function) &dll_luaopen_table},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	413 {"luaopen_string", (luaV_function) &dll_luaopen_string},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	414 {"luaopen_math", (luaV_function) &dll_luaopen_math},
2431 7b764999f9b9 Update for Lua interface. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2373 diff changeset	415 {"luaopen_io", (luaV_function) &dll_luaopen_io},
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	416 {"luaopen_os", (luaV_function) &dll_luaopen_os},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	417 {"luaopen_package", (luaV_function) &dll_luaopen_package},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	418 {"luaopen_debug", (luaV_function) &dll_luaopen_debug},
2431 7b764999f9b9 Update for Lua interface. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2373 diff changeset	419 {"luaL_openlibs", (luaV_function) &dll_luaL_openlibs},
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	420 {NULL, NULL}
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	421 };
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	422
2373 f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	423 static HANDLE hinstLua = NULL;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	424
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	425 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	426 lua_link_init(char *libname, int verbose)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	427 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	428 const luaV_Reg *reg;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	429 if (hinstLua) return OK;
2373 f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	430 hinstLua = load_dll(libname);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	431 if (!hinstLua)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	432 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	433 if (verbose)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15328 diff changeset	434 semsg(_(e_loadlib), libname);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	435 return FAIL;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	436 }
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	437 for (reg = luaV_dll; reg->func; reg++)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	438 {
2373 f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	439 if ((*reg->func = symbol_from_dll(hinstLua, reg->name)) == NULL)
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	440 {
f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	441 close_dll(hinstLua);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	442 hinstLua = 0;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	443 if (verbose)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15328 diff changeset	444 semsg(_(e_loadfunc), reg->name);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	445 return FAIL;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	446 }
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	447 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	448 return OK;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	449 }
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	450 #endif // DYNAMIC_LUA
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	451
10025 068f397d0da4 commit https://github.com/vim/vim/commit/d90b6c02e2900576fb37d95b5e4f4a32b2d7383f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	452 #if defined(DYNAMIC_LUA) \|\| defined(PROTO)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	453 int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	454 lua_enabled(int verbose)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	455 {
7528 53163e4d9e4f commit https://github.com/vim/vim/commit/25e4fcde767084d1a79e0926bc301c92987c0cce Christian Brabandt <cb@256bit.org> parents: 7297 diff changeset	456 return lua_link_init((char *)p_luadll, verbose) == OK;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	457 }
10025 068f397d0da4 commit https://github.com/vim/vim/commit/d90b6c02e2900576fb37d95b5e4f4a32b2d7383f Christian Brabandt <cb@256bit.org> parents: 9649 diff changeset	458 #endif
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	459
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	460 #if LUA_VERSION_NUM > 501
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	461 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	462 luaL_typeerror(lua_State L, int narg, const char tname)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	463 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	464 const char *msg = lua_pushfstring(L, "%s expected, got %s",
3618 c052f3b79b99 updated for version 7.3.569 Bram Moolenaar <bram@vim.org> parents: 3459 diff changeset	465 tname, luaL_typename(L, narg));
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	466 return luaL_argerror(L, narg, msg);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	467 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	468 #endif
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	469
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	470
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	471 // ======= Internal =======
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	472
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	473 static void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	474 luaV_newmetatable(lua_State L, const char tname)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	475 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	476 lua_newtable(L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	477 lua_pushlightuserdata(L, (void *) tname);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	478 lua_pushvalue(L, -2);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	479 lua_rawset(L, LUA_REGISTRYINDEX);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	480 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	481
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	482 static void *
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	483 luaV_toudata(lua_State L, int ud, const char tname)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	484 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	485 void *p = lua_touserdata(L, ud);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	486
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	487 if (p != NULL) // value is userdata?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	488 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	489 if (lua_getmetatable(L, ud)) // does it have a metatable?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	490 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	491 luaV_getfield(L, tname); // get metatable
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	492 if (lua_rawequal(L, -1, -2)) // MTs match?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	493 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	494 lua_pop(L, 2); // MTs
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	495 return p;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	496 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	497 }
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	498 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	499 return NULL;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	500 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	501
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	502 static void *
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	503 luaV_checkcache(lua_State L, void p)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	504 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	505 luaV_getudata(L, p);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	506 if (lua_isnil(L, -1)) luaL_error(L, "invalid object");
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	507 lua_pop(L, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	508 return p;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	509 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	510
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	511 #define luaV_unbox(L,luatyp,ud) (((luatyp ) lua_touserdata((L),(ud))))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	512
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	513 #define luaV_checkvalid(L,luatyp,ud) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	514 luaV_checkcache((L), (void *) luaV_unbox((L),luatyp,(ud)))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	515
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	516 static void *
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	517 luaV_checkudata(lua_State L, int ud, const char tname)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	518 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	519 void *p = luaV_toudata(L, ud, tname);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	520 if (p == NULL) luaL_typeerror(L, ud, tname);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	521 return p;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	522 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	523
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	524 static void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	525 luaV_pushtypval(lua_State L, typval_T tv)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	526 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	527 if (tv == NULL)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	528 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	529 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	530 return;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	531 }
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	532 switch (tv->v_type)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	533 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	534 case VAR_STRING:
3865 3c072c1cb873 updated for version 7.3.689 Bram Moolenaar <bram@vim.org> parents: 3618 diff changeset	535 lua_pushstring(L, tv->vval.v_string == NULL
3c072c1cb873 updated for version 7.3.689 Bram Moolenaar <bram@vim.org> parents: 3618 diff changeset	536 ? "" : (char *)tv->vval.v_string);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	537 break;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	538 case VAR_NUMBER:
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	539 lua_pushinteger(L, (int) tv->vval.v_number);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	540 break;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	541 #ifdef FEAT_FLOAT
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	542 case VAR_FLOAT:
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	543 lua_pushnumber(L, (lua_Number) tv->vval.v_float);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	544 break;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	545 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	546 case VAR_LIST:
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	547 luaV_pushlist(L, tv->vval.v_list);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	548 break;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	549 case VAR_DICT:
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	550 luaV_pushdict(L, tv->vval.v_dict);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	551 break;
19102 ba9f50bfda83 patch 8.2.0111: VAR_SPECIAL is also used for booleans Bram Moolenaar <Bram@vim.org> parents: 18798 diff changeset	552 case VAR_BOOL:
7712 bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7528 diff changeset	553 case VAR_SPECIAL:
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7528 diff changeset	554 if (tv->vval.v_number <= VVAL_TRUE)
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7528 diff changeset	555 lua_pushinteger(L, (int) tv->vval.v_number);
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7528 diff changeset	556 else
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7528 diff changeset	557 lua_pushnil(L);
bce3b5ddb393 commit https://github.com/vim/vim/commit/520e1e41f35b063ede63b41738c82d6636e78c34 Christian Brabandt <cb@256bit.org> parents: 7528 diff changeset	558 break;
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	559 case VAR_FUNC:
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	560 luaV_pushfuncref(L, tv->vval.v_string);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	561 break;
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	562 case VAR_BLOB:
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	563 luaV_pushblob(L, tv->vval.v_blob);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	564 break;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	565 default:
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	566 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	567 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	568 }
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	569
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	570 /*
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	571 * Converts lua value at 'pos' to typval 'tv'.
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	572 * Returns OK or FAIL.
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	573 */
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	574 static int
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	575 luaV_totypval(lua_State L, int pos, typval_T tv)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	576 {
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	577 int status = OK;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	578
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	579 switch (lua_type(L, pos))
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	580 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	581 case LUA_TBOOLEAN:
19102 ba9f50bfda83 patch 8.2.0111: VAR_SPECIAL is also used for booleans Bram Moolenaar <Bram@vim.org> parents: 18798 diff changeset	582 tv->v_type = VAR_BOOL;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	583 tv->vval.v_number = (varnumber_T) lua_toboolean(L, pos);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	584 break;
15328 f7130bc17248 patch 8.1.0672: the Lua interface doesn't know about v:null Bram Moolenaar <Bram@vim.org> parents: 14583 diff changeset	585 case LUA_TNIL:
f7130bc17248 patch 8.1.0672: the Lua interface doesn't know about v:null Bram Moolenaar <Bram@vim.org> parents: 14583 diff changeset	586 tv->v_type = VAR_SPECIAL;
f7130bc17248 patch 8.1.0672: the Lua interface doesn't know about v:null Bram Moolenaar <Bram@vim.org> parents: 14583 diff changeset	587 tv->vval.v_number = VVAL_NULL;
f7130bc17248 patch 8.1.0672: the Lua interface doesn't know about v:null Bram Moolenaar <Bram@vim.org> parents: 14583 diff changeset	588 break;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	589 case LUA_TSTRING:
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	590 tv->v_type = VAR_STRING;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	591 tv->vval.v_string = vim_strsave((char_u *) lua_tostring(L, pos));
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	592 break;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	593 case LUA_TNUMBER:
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	594 #ifdef FEAT_FLOAT
20441 86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	595 {
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	596 const lua_Number n = lua_tonumber(L, pos);
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	597
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	598 if (n > (lua_Number)INT64_MAX \|\| n < (lua_Number)INT64_MIN
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	599 \|\| ((lua_Number)((varnumber_T)n)) != n)
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	600 {
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	601 tv->v_type = VAR_FLOAT;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	602 tv->vval.v_float = (float_T)n;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	603 }
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	604 else
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	605 {
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	606 tv->v_type = VAR_NUMBER;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	607 tv->vval.v_number = (varnumber_T)n;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	608 }
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	609 }
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	610 #else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	611 tv->v_type = VAR_NUMBER;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	612 tv->vval.v_number = (varnumber_T) lua_tointeger(L, pos);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	613 #endif
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	614 break;
21006 ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	615 case LUA_TFUNCTION:
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	616 {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	617 char_u *name;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	618 lua_pushvalue(L, pos);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	619 luaV_CFuncState *state = ALLOC_CLEAR_ONE(luaV_CFuncState);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	620 state->lua_funcref = luaL_ref(L, LUA_REGISTRYINDEX);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	621 state->L = L;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	622 state->lua_tableref = LUA_NOREF;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	623 name = register_cfunc(&luaV_call_lua_func,
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	624 &luaV_call_lua_func_free, state);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	625 tv->v_type = VAR_FUNC;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	626 tv->vval.v_string = vim_strsave(name);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	627 break;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	628 }
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	629 case LUA_TTABLE:
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	630 {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	631 lua_pushvalue(L, pos);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	632 int lua_tableref = luaL_ref(L, LUA_REGISTRYINDEX);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	633 if (lua_getmetatable(L, pos)) {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	634 lua_getfield(L, -1, LUA___CALL);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	635 if (lua_isfunction(L, -1)) {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	636 char_u *name;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	637 int lua_funcref = luaL_ref(L, LUA_REGISTRYINDEX);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	638 luaV_CFuncState *state = ALLOC_CLEAR_ONE(luaV_CFuncState);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	639 state->lua_funcref = lua_funcref;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	640 state->L = L;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	641 state->lua_tableref = lua_tableref;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	642 name = register_cfunc(&luaV_call_lua_func,
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	643 &luaV_call_lua_func_free, state);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	644 tv->v_type = VAR_FUNC;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	645 tv->vval.v_string = vim_strsave(name);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	646 break;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	647 }
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	648 }
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	649 tv->v_type = VAR_NUMBER;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	650 tv->vval.v_number = 0;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	651 status = FAIL;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	652 break;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	653 }
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	654 case LUA_TUSERDATA:
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	655 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	656 void *p = lua_touserdata(L, pos);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	657
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	658 if (lua_getmetatable(L, pos)) // has metatable?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	659 {
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	660 // check list
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	661 luaV_getfield(L, LUAVIM_LIST);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	662 if (lua_rawequal(L, -1, -2))
2373 f149bb1cf5be Make it possible to load Lua dynamically on Unix. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: 2331 diff changeset	663 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	664 tv->v_type = VAR_LIST;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	665 tv->vval.v_list = ((luaV_List ) p);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	666 ++tv->vval.v_list->lv_refcount;
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	667 lua_pop(L, 2); // MTs
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	668 break;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	669 }
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	670 // check dict
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	671 luaV_getfield(L, LUAVIM_DICT);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	672 if (lua_rawequal(L, -1, -3))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	673 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	674 tv->v_type = VAR_DICT;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	675 tv->vval.v_dict = ((luaV_Dict ) p);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	676 ++tv->vval.v_dict->dv_refcount;
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	677 lua_pop(L, 3); // MTs
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	678 break;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	679 }
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	680 // check blob
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	681 luaV_getfield(L, LUAVIM_BLOB);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	682 if (lua_rawequal(L, -1, -4))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	683 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	684 tv->v_type = VAR_BLOB;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	685 tv->vval.v_blob = ((luaV_Blob ) p);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	686 ++tv->vval.v_blob->bv_refcount;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	687 lua_pop(L, 4); // MTs
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	688 break;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	689 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	690 // check funcref
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	691 luaV_getfield(L, LUAVIM_FUNCREF);
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	692 if (lua_rawequal(L, -1, -5))
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	693 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	694 luaV_Funcref f = (luaV_Funcref ) p;
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	695 func_ref(f->name);
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	696 tv->v_type = VAR_FUNC;
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	697 tv->vval.v_string = vim_strsave(f->name);
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	698 lua_pop(L, 5); // MTs
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	699 break;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	700 }
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	701 lua_pop(L, 4); // MTs
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	702 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	703 }
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	704 // FALLTHROUGH
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	705 default:
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	706 tv->v_type = VAR_NUMBER;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	707 tv->vval.v_number = 0;
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	708 status = FAIL;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	709 }
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	710 return status;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	711 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	712
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	713 /*
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	714 * similar to luaL_addlstring, but replaces \0 with \n if toline and
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	715 * \n with \0 otherwise
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	716 */
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	717 static void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	718 luaV_addlstring(luaL_Buffer b, const char s, size_t l, int toline)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	719 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	720 while (l--)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	721 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	722 if (*s == '\0' && toline)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	723 luaL_addchar(b, '\n');
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	724 else if (*s == '\n' && !toline)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	725 luaL_addchar(b, '\0');
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	726 else
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	727 luaL_addchar(b, *s);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	728 s++;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	729 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	730 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	731
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	732 static void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	733 luaV_pushline(lua_State L, buf_T buf, linenr_T n)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	734 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	735 const char s = (const char ) ml_get_buf(buf, n, FALSE);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	736 luaL_Buffer b;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	737 luaL_buffinit(L, &b);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	738 luaV_addlstring(&b, s, strlen(s), 0);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	739 luaL_pushresult(&b);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	740 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	741
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	742 static char_u *
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	743 luaV_toline(lua_State *L, int pos)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	744 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	745 size_t l;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	746 const char *s = lua_tolstring(L, pos, &l);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	747
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	748 luaL_Buffer b;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	749 luaL_buffinit(L, &b);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	750 luaV_addlstring(&b, s, l, 1);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	751 luaL_pushresult(&b);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	752 return (char_u *) lua_tostring(L, -1);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	753 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	754
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	755 /*
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	756 * pops a string s from the top of the stack and calls mf(t) for pieces t of
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	757 * s separated by newlines
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	758 */
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	759 static void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	760 luaV_msgfunc(lua_State *L, msgfunc_T mf)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	761 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	762 luaL_Buffer b;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	763 size_t l;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	764 const char p, s = lua_tolstring(L, -1, &l);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	765 luaL_buffinit(L, &b);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	766 luaV_addlstring(&b, s, l, 0);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	767 luaL_pushresult(&b);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	768 // break string
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	769 p = s = lua_tolstring(L, -1, &l);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	770 while (l--)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	771 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	772 if (*p++ == '\0') // break?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	773 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	774 mf((char_u *) s);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	775 s = p;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	776 }
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	777 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	778 mf((char_u *) s);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	779 lua_pop(L, 2); // original and modified strings
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	780 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	781
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	782 #define luaV_newtype(typ,tname,luatyp,luatname) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	783 static luatyp * \
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	784 luaV_new##tname(lua_State L, typ obj) \
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	785 { \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	786 luatyp o = (luatyp ) lua_newuserdata(L, sizeof(luatyp)); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	787 *o = obj; \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	788 luaV_setudata(L, obj); /* cache[obj] = udata */ \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	789 luaV_getfield(L, luatname); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	790 lua_setmetatable(L, -2); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	791 return o; \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	792 }
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	793
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	794 #define luaV_pushtype(typ,tname,luatyp) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	795 static luatyp * \
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	796 luaV_push##tname(lua_State L, typ obj) \
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	797 { \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	798 luatyp *o = NULL; \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	799 if (obj == NULL) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	800 lua_pushnil(L); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	801 else { \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	802 luaV_getudata(L, obj); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	803 if (lua_isnil(L, -1)) /* not interned? */ \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	804 { \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	805 lua_pop(L, 1); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	806 o = luaV_new##tname(L, obj); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	807 } \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	808 else \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	809 o = (luatyp *) lua_touserdata(L, -1); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	810 } \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	811 return o; \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	812 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	813
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	814 #define luaV_type_tostring(tname,luatname) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	815 static int \
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	816 luaV_##tname##_tostring(lua_State *L) \
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	817 { \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	818 lua_pushfstring(L, "%s: %p", luatname, lua_touserdata(L, 1)); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	819 return 1; \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	820 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	821
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	822 // ======= List type =======
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	823
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	824 static luaV_List *
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	825 luaV_newlist(lua_State L, list_T lis)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	826 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	827 luaV_List l = (luaV_List ) lua_newuserdata(L, sizeof(luaV_List));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	828 *l = lis;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	829 lis->lv_refcount++; // reference in Lua
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	830 luaV_setudata(L, lis); // cache[lis] = udata
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	831 luaV_getfield(L, LUAVIM_LIST);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	832 lua_setmetatable(L, -2);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	833 return l;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	834 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	835
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	836 luaV_pushtype(list_T, list, luaV_List)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	837 luaV_type_tostring(list, LUAVIM_LIST)
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	838
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	839 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	840 luaV_list_len(lua_State *L)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	841 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	842 list_T *l = luaV_unbox(L, luaV_List, 1);
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	843 lua_pushinteger(L, (int) list_len(l));
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	844 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	845 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	846
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	847 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	848 luaV_list_iter(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	849 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	850 listitem_T li = (listitem_T ) lua_touserdata(L, lua_upvalueindex(2));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	851 if (li == NULL) return 0;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	852 luaV_pushtypval(L, &li->li_tv);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	853 lua_pushlightuserdata(L, (void *) li->li_next);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	854 lua_replace(L, lua_upvalueindex(2));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	855 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	856 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	857
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	858 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	859 luaV_list_call(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	860 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	861 list_T *l = luaV_unbox(L, luaV_List, 1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	862 lua_pushvalue(L, lua_upvalueindex(1)); // pass cache table along
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	863 lua_pushlightuserdata(L, (void *) l->lv_first);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	864 lua_pushcclosure(L, luaV_list_iter, 2);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	865 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	866 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	867
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	868 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	869 luaV_list_index(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	870 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	871 list_T *l = luaV_unbox(L, luaV_List, 1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	872 if (lua_isnumber(L, 2)) // list item?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	873 {
21030 08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	874 long n = (long) luaL_checkinteger(L, 2);
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	875 listitem_T *li;
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	876
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	877 // Lua array index starts with 1 while Vim uses 0, subtract 1 to
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	878 // normalize.
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	879 n -= 1;
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	880 li = list_find(l, n);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	881 if (li == NULL)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	882 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	883 else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	884 luaV_pushtypval(L, &li->li_tv);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	885 }
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	886 else if (lua_isstring(L, 2)) // method?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	887 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	888 const char *s = lua_tostring(L, 2);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	889 if (strncmp(s, "add", 3) == 0
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	890 \|\| strncmp(s, "insert", 6) == 0)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	891 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	892 lua_getmetatable(L, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	893 lua_getfield(L, -1, s);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	894 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	895 else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	896 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	897 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	898 else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	899 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	900 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	901 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	902
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	903 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	904 luaV_list_newindex(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	905 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	906 list_T *l = luaV_unbox(L, luaV_List, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	907 long n = (long) luaL_checkinteger(L, 2);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	908 listitem_T *li;
21030 08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	909
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	910 // Lua array index starts with 1 while Vim uses 0, subtract 1 to normalize.
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	911 n -= 1;
08e284594211 patch 8.2.1066: Lua arrays are zero based Bram Moolenaar <Bram@vim.org> parents: 21012 diff changeset	912
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	913 if (l->lv_lock)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	914 luaL_error(L, "list is locked");
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	915 li = list_find(l, n);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	916 if (li == NULL) return 0;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	917 if (lua_isnil(L, 3)) // remove?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	918 {
5871 b4ce0e1fb5a6 updated for version 7.4.278 Bram Moolenaar <bram@vim.org> parents: 4293 diff changeset	919 vimlist_remove(l, li, li);
19181 94eda51ba9ba patch 8.2.0149: maintaining a Vim9 branch separately is more work Bram Moolenaar <Bram@vim.org> parents: 19102 diff changeset	920 listitem_free(l, li);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	921 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	922 else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	923 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	924 typval_T v;
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	925 luaV_checktypval(L, 3, &v, "setting list item");
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	926 clear_tv(&li->li_tv);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	927 copy_tv(&v, &li->li_tv);
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	928 clear_tv(&v);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	929 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	930 return 0;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	931 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	932
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	933 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	934 luaV_list_add(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	935 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	936 luaV_List *lis = luaV_checkudata(L, 1, LUAVIM_LIST);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	937 list_T l = (list_T ) luaV_checkcache(L, (void ) lis);
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	938 typval_T v;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	939 if (l->lv_lock)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	940 luaL_error(L, "list is locked");
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	941 lua_settop(L, 2);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	942 luaV_checktypval(L, 2, &v, "adding list item");
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	943 if (list_append_tv(l, &v) == FAIL)
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	944 luaL_error(L, "failed to add item to list");
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	945 clear_tv(&v);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	946 lua_settop(L, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	947 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	948 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	949
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	950 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	951 luaV_list_insert(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	952 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	953 luaV_List *lis = luaV_checkudata(L, 1, LUAVIM_LIST);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	954 list_T l = (list_T ) luaV_checkcache(L, (void ) lis);
6625 199ce895e162 updated for version 7.4.638 Bram Moolenaar <bram@vim.org> parents: 6590 diff changeset	955 long pos = (long) luaL_optinteger(L, 3, 0);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	956 listitem_T *li = NULL;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	957 typval_T v;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	958 if (l->lv_lock)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	959 luaL_error(L, "list is locked");
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	960 if (pos < l->lv_len)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	961 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	962 li = list_find(l, pos);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	963 if (li == NULL)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	964 luaL_error(L, "invalid position");
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	965 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	966 lua_settop(L, 2);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	967 luaV_checktypval(L, 2, &v, "inserting list item");
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	968 if (list_insert_tv(l, &v, li) == FAIL)
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	969 luaL_error(L, "failed to add item to list");
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	970 clear_tv(&v);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	971 lua_settop(L, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	972 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	973 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	974
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	975 static const luaL_Reg luaV_List_mt[] = {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	976 {"__tostring", luaV_list_tostring},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	977 {"__len", luaV_list_len},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	978 {"__call", luaV_list_call},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	979 {"__index", luaV_list_index},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	980 {"__newindex", luaV_list_newindex},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	981 {"add", luaV_list_add},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	982 {"insert", luaV_list_insert},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	983 {NULL, NULL}
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	984 };
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	985
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	986
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	987 // ======= Dict type =======
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	988
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	989 static luaV_Dict *
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	990 luaV_newdict(lua_State L, dict_T dic)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	991 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	992 luaV_Dict d = (luaV_Dict ) lua_newuserdata(L, sizeof(luaV_Dict));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	993 *d = dic;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	994 dic->dv_refcount++; // reference in Lua
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	995 luaV_setudata(L, dic); // cache[dic] = udata
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	996 luaV_getfield(L, LUAVIM_DICT);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	997 lua_setmetatable(L, -2);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	998 return d;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	999 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1000
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1001 luaV_pushtype(dict_T, dict, luaV_Dict)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1002 luaV_type_tostring(dict, LUAVIM_DICT)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1003
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1004 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1005 luaV_dict_len(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1006 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1007 dict_T *d = luaV_unbox(L, luaV_Dict, 1);
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1008 lua_pushinteger(L, (int) dict_len(d));
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1009 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1010 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1011
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1012 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1013 luaV_dict_iter(lua_State *L UNUSED)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1014 {
4135 688da4d486a0 updated for version 7.3.820 Bram Moolenaar <bram@vim.org> parents: 3865 diff changeset	1015 #ifdef FEAT_EVAL
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1016 hashitem_T hi = (hashitem_T ) lua_touserdata(L, lua_upvalueindex(2));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1017 int n = lua_tointeger(L, lua_upvalueindex(3));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1018 dictitem_T *di;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1019 if (n <= 0) return 0;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1020 while (HASHITEM_EMPTY(hi)) hi++;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1021 di = dict_lookup(hi);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1022 lua_pushstring(L, (char *) hi->hi_key);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1023 luaV_pushtypval(L, &di->di_tv);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1024 lua_pushlightuserdata(L, (void *) (hi + 1));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1025 lua_replace(L, lua_upvalueindex(2));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1026 lua_pushinteger(L, n - 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1027 lua_replace(L, lua_upvalueindex(3));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1028 return 2;
4135 688da4d486a0 updated for version 7.3.820 Bram Moolenaar <bram@vim.org> parents: 3865 diff changeset	1029 #else
688da4d486a0 updated for version 7.3.820 Bram Moolenaar <bram@vim.org> parents: 3865 diff changeset	1030 return 0;
688da4d486a0 updated for version 7.3.820 Bram Moolenaar <bram@vim.org> parents: 3865 diff changeset	1031 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1032 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1033
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1034 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1035 luaV_dict_call(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1036 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1037 dict_T *d = luaV_unbox(L, luaV_Dict, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1038 hashtab_T *ht = &d->dv_hashtab;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1039 lua_pushvalue(L, lua_upvalueindex(1)); // pass cache table along
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1040 lua_pushlightuserdata(L, (void *) ht->ht_array);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1041 lua_pushinteger(L, ht->ht_used); // # remaining items
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1042 lua_pushcclosure(L, luaV_dict_iter, 3);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1043 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1044 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1045
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1046 static int
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1047 luaV_dict_index(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1048 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1049 dict_T *d = luaV_unbox(L, luaV_Dict, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1050 char_u key = (char_u ) luaL_checkstring(L, 2);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1051 dictitem_T *di = dict_find(d, key, -1);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1052
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1053 if (di == NULL)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1054 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1055 else
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1056 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1057 luaV_pushtypval(L, &di->di_tv);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1058 if (di->di_tv.v_type == VAR_FUNC) // funcref?
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1059 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1060 luaV_Funcref f = (luaV_Funcref ) lua_touserdata(L, -1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1061 f->self = d; // keep "self" reference
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1062 d->dv_refcount++;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1063 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1064 }
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1065 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1066 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1067
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1068 static int
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1069 luaV_dict_newindex(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1070 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1071 dict_T *d = luaV_unbox(L, luaV_Dict, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1072 char_u key = (char_u ) luaL_checkstring(L, 2);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1073 dictitem_T *di;
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1074 typval_T v;
16009 3b524e8110ab patch 8.1.1010: Lua interface leaks memory Bram Moolenaar <Bram@vim.org> parents: 15868 diff changeset	1075
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1076 if (d->dv_lock)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1077 luaL_error(L, "dict is locked");
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1078 if (key == NULL)
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1079 return 0;
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1080 if (*key == NUL)
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1081 luaL_error(L, "empty key");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1082 if (!lua_isnil(L, 3)) // read value?
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	1083 {
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1084 luaV_checktypval(L, 3, &v, "setting dict item");
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1085 if (d->dv_scope == VAR_DEF_SCOPE && v.v_type == VAR_FUNC)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1086 luaL_error(L, "cannot assign funcref to builtin scope");
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1087 }
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1088 di = dict_find(d, key, -1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1089 if (di == NULL) // non-existing key?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1090 {
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1091 if (lua_isnil(L, 3))
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1092 return 0;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1093 di = dictitem_alloc(key);
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1094 if (di == NULL)
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1095 return 0;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1096 if (dict_add(d, di) == FAIL)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1097 {
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1098 vim_free(di);
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1099 return 0;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1100 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1101 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1102 else
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1103 clear_tv(&di->di_tv);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1104 if (lua_isnil(L, 3)) // remove?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1105 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1106 hashitem_T *hi = hash_find(&d->dv_hashtab, di->di_key);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1107 hash_remove(&d->dv_hashtab, hi);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1108 dictitem_free(di);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1109 }
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1110 else
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1111 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1112 copy_tv(&v, &di->di_tv);
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	1113 clear_tv(&v);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1114 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1115 return 0;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1116 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1117
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1118 static const luaL_Reg luaV_Dict_mt[] = {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1119 {"__tostring", luaV_dict_tostring},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1120 {"__len", luaV_dict_len},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1121 {"__call", luaV_dict_call},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1122 {"__index", luaV_dict_index},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1123 {"__newindex", luaV_dict_newindex},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1124 {NULL, NULL}
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1125 };
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1126
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1127
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1128 // ======= Blob type =======
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1129
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1130 static luaV_Blob *
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1131 luaV_newblob(lua_State L, blob_T blo)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1132 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1133 luaV_Blob b = (luaV_Blob ) lua_newuserdata(L, sizeof(luaV_Blob));
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1134 *b = blo;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1135 blo->bv_refcount++; // reference in Lua
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1136 luaV_setudata(L, blo); // cache[blo] = udata
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1137 luaV_getfield(L, LUAVIM_BLOB);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1138 lua_setmetatable(L, -2);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1139 return b;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1140 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1141
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1142 luaV_pushtype(blob_T, blob, luaV_Blob)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1143 luaV_type_tostring(blob, LUAVIM_BLOB)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1144
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1145 static int
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1146 luaV_blob_gc(lua_State *L)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1147 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1148 blob_T *b = luaV_unbox(L, luaV_Blob, 1);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1149 blob_unref(b);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1150 return 0;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1151 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1152
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1153 static int
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1154 luaV_blob_len(lua_State *L)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1155 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1156 blob_T *b = luaV_unbox(L, luaV_Blob, 1);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1157 lua_pushinteger(L, (int) blob_len(b));
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1158 return 1;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1159 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1160
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1161 static int
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1162 luaV_blob_index(lua_State *L)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1163 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1164 blob_T *b = luaV_unbox(L, luaV_Blob, 1);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1165 if (lua_isnumber(L, 2))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1166 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1167 int idx = luaL_checkinteger(L, 2);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1168 if (idx < blob_len(b))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1169 lua_pushnumber(L, (lua_Number) blob_get(b, idx));
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1170 else
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1171 lua_pushnil(L);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1172 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1173 else if (lua_isstring(L, 2))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1174 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1175 const char *s = lua_tostring(L, 2);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1176 if (strncmp(s, "add", 3) == 0)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1177 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1178 lua_getmetatable(L, 1);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1179 lua_getfield(L, -1, s);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1180 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1181 else
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1182 lua_pushnil(L);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1183 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1184 else
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1185 lua_pushnil(L);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1186 return 1;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1187 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1188
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1189 static int
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1190 luaV_blob_newindex(lua_State *L)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1191 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1192 blob_T *b = luaV_unbox(L, luaV_Blob, 1);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1193 if (b->bv_lock)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1194 luaL_error(L, "blob is locked");
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1195 if (lua_isnumber(L, 2))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1196 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1197 long len = blob_len(b);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1198 int idx = luaL_checkinteger(L, 2);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1199 int val = luaL_checkinteger(L, 3);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1200 if (idx < len \|\| (idx == len && ga_grow(&b->bv_ga, 1) == OK))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1201 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1202 blob_set(b, idx, (char_u) val);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1203 if (idx == len)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1204 ++b->bv_ga.ga_len;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1205 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1206 else
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1207 luaL_error(L, "index out of range");
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1208 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1209 return 0;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1210 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1211
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1212 static int
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1213 luaV_blob_add(lua_State *L)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1214 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1215 luaV_Blob *blo = luaV_checkudata(L, 1, LUAVIM_BLOB);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1216 blob_T b = (blob_T ) luaV_checkcache(L, (void ) blo);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1217 if (b->bv_lock)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1218 luaL_error(L, "blob is locked");
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1219 lua_settop(L, 2);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1220 if (!lua_isstring(L, 2))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1221 luaL_error(L, "string expected, got %s", luaL_typename(L, 2));
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1222 else
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1223 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1224 size_t i, l = 0;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1225 const char *s = lua_tolstring(L, 2, &l);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1226
19372 967149bbd8d3 patch 8.2.0244: compiler warning in Lua interface Bram Moolenaar <Bram@vim.org> parents: 19181 diff changeset	1227 if (ga_grow(&b->bv_ga, (int)l) == OK)
16099 643fe07aa0e2 patch 8.1.1054: not checking return value of ga_grow() Bram Moolenaar <Bram@vim.org> parents: 16076 diff changeset	1228 for (i = 0; i < l; ++i)
643fe07aa0e2 patch 8.1.1054: not checking return value of ga_grow() Bram Moolenaar <Bram@vim.org> parents: 16076 diff changeset	1229 ga_append(&b->bv_ga, s[i]);
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1230 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1231 lua_settop(L, 1);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1232 return 1;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1233 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1234
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1235 static const luaL_Reg luaV_Blob_mt[] = {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1236 {"__tostring", luaV_blob_tostring},
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1237 {"__gc", luaV_blob_gc},
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1238 {"__len", luaV_blob_len},
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1239 {"__index", luaV_blob_index},
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1240 {"__newindex", luaV_blob_newindex},
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1241 {"add", luaV_blob_add},
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1242 {NULL, NULL}
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1243 };
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1244
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1245
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1246 // ======= Funcref type =======
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1247
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1248 static luaV_Funcref *
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1249 luaV_newfuncref(lua_State L, char_u name)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1250 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1251 luaV_Funcref f = (luaV_Funcref )lua_newuserdata(L, sizeof(luaV_Funcref));
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1252
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1253 if (name != NULL)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1254 {
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1255 func_ref(name);
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1256 f->name = vim_strsave(name);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1257 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1258 f->self = NULL;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1259 luaV_getfield(L, LUAVIM_FUNCREF);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1260 lua_setmetatable(L, -2);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1261 return f;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1262 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1263
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1264 static luaV_Funcref *
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1265 luaV_pushfuncref(lua_State L, char_u name)
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1266 {
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1267 return luaV_newfuncref(L, name);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1268 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1269
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1270
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1271 luaV_type_tostring(funcref, LUAVIM_FUNCREF)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1272
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1273 static int
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1274 luaV_funcref_gc(lua_State *L)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1275 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1276 luaV_Funcref f = (luaV_Funcref ) lua_touserdata(L, 1);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1277
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1278 func_unref(f->name);
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1279 vim_free(f->name);
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1280 // NOTE: Don't call "dict_unref(f->self)", because the dict of "f->self"
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1281 // will be (or has been already) freed by Vim's garbage collection.
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1282 return 0;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1283 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1284
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1285 // equivalent to string(funcref)
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1286 static int
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1287 luaV_funcref_len(lua_State *L)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1288 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1289 luaV_Funcref f = (luaV_Funcref ) lua_touserdata(L, 1);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1290
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1291 lua_pushstring(L, (const char *) f->name);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1292 return 1;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1293 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1294
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1295 static int
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1296 luaV_funcref_call(lua_State *L)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1297 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1298 luaV_Funcref f = (luaV_Funcref ) lua_touserdata(L, 1);
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1299 int i, n = lua_gettop(L) - 1; // #args
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1300 int status = FAIL;
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1301 typval_T args;
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1302 typval_T rettv;
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1303
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1304 args.v_type = VAR_LIST;
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1305 args.vval.v_list = list_alloc();
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1306 rettv.v_type = VAR_UNKNOWN; // as in clear_tv
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1307 if (args.vval.v_list != NULL)
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1308 {
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1309 typval_T v;
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1310
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	1311 for (i = 0; i < n; i++)
d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	1312 {
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1313 luaV_checktypval(L, i + 2, &v, "calling funcref");
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1314 list_append_tv(args.vval.v_list, &v);
16009 3b524e8110ab patch 8.1.1010: Lua interface leaks memory Bram Moolenaar <Bram@vim.org> parents: 15868 diff changeset	1315 clear_tv(&v);
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1316 }
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1317 status = func_call(f->name, &args, NULL, f->self, &rettv);
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1318 if (status == OK)
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1319 luaV_pushtypval(L, &rettv);
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1320 clear_tv(&args);
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1321 clear_tv(&rettv);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1322 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1323 if (status != OK)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1324 luaL_error(L, "cannot call funcref");
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1325 return 1;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1326 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1327
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1328 static const luaL_Reg luaV_Funcref_mt[] = {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1329 {"__tostring", luaV_funcref_tostring},
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1330 {"__gc", luaV_funcref_gc},
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1331 {"__len", luaV_funcref_len},
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1332 {"__call", luaV_funcref_call},
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1333 {NULL, NULL}
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1334 };
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1335
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1336
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1337 // ======= Buffer type =======
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1338
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1339 luaV_newtype(buf_T, buffer, luaV_Buffer, LUAVIM_BUFFER)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1340 luaV_pushtype(buf_T, buffer, luaV_Buffer)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1341 luaV_type_tostring(buffer, LUAVIM_BUFFER)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1342
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1343 static int
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1344 luaV_buffer_len(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1345 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1346 buf_T b = (buf_T ) luaV_checkvalid(L, luaV_Buffer, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1347 lua_pushinteger(L, b->b_ml.ml_line_count);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1348 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1349 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1350
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1351 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1352 luaV_buffer_call(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1353 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1354 buf_T b = (buf_T ) luaV_checkvalid(L, luaV_Buffer, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1355 lua_settop(L, 1);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1356 set_curbuf(b, DOBUF_SPLIT);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1357 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1358 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1359
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1360 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1361 luaV_buffer_index(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1362 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1363 buf_T b = (buf_T ) luaV_checkvalid(L, luaV_Buffer, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1364 linenr_T n = (linenr_T) lua_tointeger(L, 2);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1365 if (n > 0 && n <= b->b_ml.ml_line_count)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1366 luaV_pushline(L, b, n);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1367 else if (lua_isstring(L, 2))
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1368 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1369 const char *s = lua_tostring(L, 2);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1370 if (strncmp(s, "name", 4) == 0)
14296 396b71b242b2 patch 8.1.0164: luaeval('vim.buffer().name') returns an error Christian Brabandt <cb@256bit.org> parents: 14235 diff changeset	1371 lua_pushstring(L, (b->b_sfname == NULL)
396b71b242b2 patch 8.1.0164: luaeval('vim.buffer().name') returns an error Christian Brabandt <cb@256bit.org> parents: 14235 diff changeset	1372 ? "" : (char *) b->b_sfname);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1373 else if (strncmp(s, "fname", 5) == 0)
14296 396b71b242b2 patch 8.1.0164: luaeval('vim.buffer().name') returns an error Christian Brabandt <cb@256bit.org> parents: 14235 diff changeset	1374 lua_pushstring(L, (b->b_ffname == NULL)
396b71b242b2 patch 8.1.0164: luaeval('vim.buffer().name') returns an error Christian Brabandt <cb@256bit.org> parents: 14235 diff changeset	1375 ? "" : (char *) b->b_ffname);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1376 else if (strncmp(s, "number", 6) == 0)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1377 lua_pushinteger(L, b->b_fnum);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1378 // methods
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1379 else if (strncmp(s, "insert", 6) == 0
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1380 \|\| strncmp(s, "next", 4) == 0
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1381 \|\| strncmp(s, "previous", 8) == 0
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1382 \|\| strncmp(s, "isvalid", 7) == 0)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1383 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1384 lua_getmetatable(L, 1);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1385 lua_getfield(L, -1, s);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1386 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1387 else
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1388 lua_pushnil(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1389 }
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1390 else
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1391 lua_pushnil(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1392 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1393 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1394
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1395 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1396 luaV_buffer_newindex(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1397 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1398 buf_T b = (buf_T ) luaV_checkvalid(L, luaV_Buffer, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1399 linenr_T n = (linenr_T) luaL_checkinteger(L, 2);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1400 #ifdef HAVE_SANDBOX
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1401 luaV_checksandbox(L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1402 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1403 if (n < 1 \|\| n > b->b_ml.ml_line_count)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1404 luaL_error(L, "invalid line number");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1405 if (lua_isnil(L, 3)) // delete line
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1406 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1407 buf_T *buf = curbuf;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1408 curbuf = b;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1409 if (u_savedel(n, 1L) == FAIL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1410 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1411 curbuf = buf;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1412 luaL_error(L, "cannot save undo information");
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1413 }
20599 d571231175b4 patch 8.2.0853: ml_delete() often called with FALSE argument Bram Moolenaar <Bram@vim.org> parents: 20456 diff changeset	1414 else if (ml_delete(n) == FAIL)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1415 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1416 curbuf = buf;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1417 luaL_error(L, "cannot delete line");
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1418 }
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1419 else
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1420 {
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1421 deleted_lines_mark(n, 1L);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1422 if (b == curwin->w_buffer) // fix cursor in current window?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1423 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1424 if (curwin->w_cursor.lnum >= n)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1425 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1426 if (curwin->w_cursor.lnum > n)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1427 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1428 curwin->w_cursor.lnum -= 1;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1429 check_cursor_col();
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1430 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1431 else check_cursor();
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1432 changed_cline_bef_curs();
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1433 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1434 invalidate_botline();
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1435 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1436 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1437 curbuf = buf;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1438 }
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1439 else if (lua_isstring(L, 3)) // update line
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1440 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1441 buf_T *buf = curbuf;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1442 curbuf = b;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1443 if (u_savesub(n) == FAIL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1444 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1445 curbuf = buf;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1446 luaL_error(L, "cannot save undo information");
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1447 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1448 else if (ml_replace(n, luaV_toline(L, 3), TRUE) == FAIL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1449 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1450 curbuf = buf;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1451 luaL_error(L, "cannot replace line");
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1452 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1453 else changed_bytes(n, 0);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1454 curbuf = buf;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1455 if (b == curwin->w_buffer)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1456 check_cursor_col();
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1457 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1458 else
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1459 luaL_error(L, "wrong argument to change line");
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1460 return 0;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1461 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1462
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1463 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1464 luaV_buffer_insert(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1465 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1466 luaV_Buffer *lb = luaV_checkudata(L, 1, LUAVIM_BUFFER);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1467 buf_T b = (buf_T ) luaV_checkcache(L, (void ) lb);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1468 linenr_T last = b->b_ml.ml_line_count;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1469 linenr_T n = (linenr_T) luaL_optinteger(L, 3, last);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1470 buf_T *buf;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1471 luaL_checktype(L, 2, LUA_TSTRING);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1472 #ifdef HAVE_SANDBOX
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1473 luaV_checksandbox(L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1474 #endif
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1475 // fix insertion line
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1476 if (n < 0) n = 0;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1477 if (n > last) n = last;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1478 // insert
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1479 buf = curbuf;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1480 curbuf = b;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1481 if (u_save(n, n + 1) == FAIL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1482 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1483 curbuf = buf;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1484 luaL_error(L, "cannot save undo information");
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1485 }
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1486 else if (ml_append(n, luaV_toline(L, 2), 0, FALSE) == FAIL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1487 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1488 curbuf = buf;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1489 luaL_error(L, "cannot insert line");
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1490 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1491 else
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1492 appended_lines_mark(n, 1L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1493 curbuf = buf;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1494 update_screen(VALID);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1495 return 0;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1496 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1497
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1498 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1499 luaV_buffer_next(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1500 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1501 luaV_Buffer *b = luaV_checkudata(L, 1, LUAVIM_BUFFER);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1502 buf_T buf = (buf_T ) luaV_checkcache(L, (void ) b);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1503 luaV_pushbuffer(L, buf->b_next);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1504 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1505 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1506
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1507 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1508 luaV_buffer_previous(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1509 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1510 luaV_Buffer *b = luaV_checkudata(L, 1, LUAVIM_BUFFER);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1511 buf_T buf = (buf_T ) luaV_checkcache(L, (void ) b);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1512 luaV_pushbuffer(L, buf->b_prev);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1513 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1514 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1515
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1516 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1517 luaV_buffer_isvalid(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1518 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1519 luaV_Buffer *b = luaV_checkudata(L, 1, LUAVIM_BUFFER);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1520 luaV_getudata(L, *b);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1521 lua_pushboolean(L, !lua_isnil(L, -1));
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1522 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1523 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1524
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1525 static const luaL_Reg luaV_Buffer_mt[] = {
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1526 {"__tostring", luaV_buffer_tostring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1527 {"__len", luaV_buffer_len},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1528 {"__call", luaV_buffer_call},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1529 {"__index", luaV_buffer_index},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1530 {"__newindex", luaV_buffer_newindex},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1531 {"insert", luaV_buffer_insert},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1532 {"next", luaV_buffer_next},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1533 {"previous", luaV_buffer_previous},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1534 {"isvalid", luaV_buffer_isvalid},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1535 {NULL, NULL}
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1536 };
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1537
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1538
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1539 // ======= Window type =======
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1540
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1541 luaV_newtype(win_T, window, luaV_Window, LUAVIM_WINDOW)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1542 luaV_pushtype(win_T, window, luaV_Window)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1543 luaV_type_tostring(window, LUAVIM_WINDOW)
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1544
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1545 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1546 luaV_window_call(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1547 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1548 win_T w = (win_T ) luaV_checkvalid(L, luaV_Window, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1549 lua_settop(L, 1);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1550 win_goto(w);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1551 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1552 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1553
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1554 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1555 luaV_window_index(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1556 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1557 win_T w = (win_T ) luaV_checkvalid(L, luaV_Window, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1558 const char *s = luaL_checkstring(L, 2);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1559 if (strncmp(s, "buffer", 6) == 0)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1560 luaV_pushbuffer(L, w->w_buffer);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1561 else if (strncmp(s, "line", 4) == 0)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1562 lua_pushinteger(L, w->w_cursor.lnum);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1563 else if (strncmp(s, "col", 3) == 0)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1564 lua_pushinteger(L, w->w_cursor.col + 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1565 else if (strncmp(s, "width", 5) == 0)
12515 972ea22c946f patch 8.0.1136: W_WIDTH() is always the same Christian Brabandt <cb@256bit.org> parents: 12477 diff changeset	1566 lua_pushinteger(L, w->w_width);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1567 else if (strncmp(s, "height", 6) == 0)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1568 lua_pushinteger(L, w->w_height);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1569 // methods
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1570 else if (strncmp(s, "next", 4) == 0
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1571 \|\| strncmp(s, "previous", 8) == 0
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1572 \|\| strncmp(s, "isvalid", 7) == 0)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1573 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1574 lua_getmetatable(L, 1);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1575 lua_getfield(L, -1, s);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1576 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1577 else
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1578 lua_pushnil(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1579 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1580 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1581
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1582 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	1583 luaV_window_newindex(lua_State *L)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1584 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1585 win_T w = (win_T ) luaV_checkvalid(L, luaV_Window, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1586 const char *s = luaL_checkstring(L, 2);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1587 int v = luaL_checkinteger(L, 3);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1588 if (strncmp(s, "line", 4) == 0)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1589 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1590 #ifdef HAVE_SANDBOX
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1591 luaV_checksandbox(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1592 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1593 if (v < 1 \|\| v > w->w_buffer->b_ml.ml_line_count)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1594 luaL_error(L, "line out of range");
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1595 w->w_cursor.lnum = v;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1596 update_screen(VALID);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1597 }
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1598 else if (strncmp(s, "col", 3) == 0)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1599 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1600 #ifdef HAVE_SANDBOX
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1601 luaV_checksandbox(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1602 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1603 w->w_cursor.col = v - 1;
14395 c15bef307de6 patch 8.1.0212: preferred cursor column not set in interfaces Christian Brabandt <cb@256bit.org> parents: 14335 diff changeset	1604 w->w_set_curswant = TRUE;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1605 update_screen(VALID);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1606 }
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1607 else if (strncmp(s, "width", 5) == 0)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1608 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1609 win_T *win = curwin;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1610 #ifdef FEAT_GUI
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1611 need_mouse_correct = TRUE;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1612 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1613 curwin = w;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1614 win_setwidth(v);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1615 curwin = win;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1616 }
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1617 else if (strncmp(s, "height", 6) == 0)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1618 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1619 win_T *win = curwin;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1620 #ifdef FEAT_GUI
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1621 need_mouse_correct = TRUE;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1622 #endif
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1623 curwin = w;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1624 win_setheight(v);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1625 curwin = win;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1626 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1627 else
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1628 luaL_error(L, "invalid window property: `%s'", s);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1629 return 0;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1630 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1631
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1632 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1633 luaV_window_next(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1634 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1635 luaV_Window *w = luaV_checkudata(L, 1, LUAVIM_WINDOW);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1636 win_T win = (win_T ) luaV_checkcache(L, (void ) w);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1637 luaV_pushwindow(L, win->w_next);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1638 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1639 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1640
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1641 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1642 luaV_window_previous(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1643 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1644 luaV_Window *w = luaV_checkudata(L, 1, LUAVIM_WINDOW);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1645 win_T win = (win_T ) luaV_checkcache(L, (void ) w);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1646 luaV_pushwindow(L, win->w_prev);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1647 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1648 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1649
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1650 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1651 luaV_window_isvalid(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1652 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1653 luaV_Window *w = luaV_checkudata(L, 1, LUAVIM_WINDOW);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1654 luaV_getudata(L, *w);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1655 lua_pushboolean(L, !lua_isnil(L, -1));
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1656 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1657 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1658
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1659 static const luaL_Reg luaV_Window_mt[] = {
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1660 {"__tostring", luaV_window_tostring},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1661 {"__call", luaV_window_call},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1662 {"__index", luaV_window_index},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1663 {"__newindex", luaV_window_newindex},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1664 {"next", luaV_window_next},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1665 {"previous", luaV_window_previous},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1666 {"isvalid", luaV_window_isvalid},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1667 {NULL, NULL}
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1668 };
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1669
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1670
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1671 // ======= Vim module =======
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1672
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1673 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1674 luaV_print(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1675 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1676 int i, n = lua_gettop(L); // nargs
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1677 const char *s;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1678 size_t l;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1679 luaL_Buffer b;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1680 luaL_buffinit(L, &b);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1681 lua_getglobal(L, "tostring");
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1682 for (i = 1; i <= n; i++)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1683 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1684 lua_pushvalue(L, -1); // tostring
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1685 lua_pushvalue(L, i); // arg
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1686 lua_call(L, 1, 1);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1687 s = lua_tolstring(L, -1, &l);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1688 if (s == NULL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1689 return luaL_error(L, "cannot convert to string");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1690 if (i > 1) luaL_addchar(&b, ' '); // use space instead of tab
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1691 luaV_addlstring(&b, s, l, 0);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1692 lua_pop(L, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1693 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1694 luaL_pushresult(&b);
18370 026034963159 patch 8.1.2179: pressing "q" at the more prompt doesn't stop Python output Bram Moolenaar <Bram@vim.org> parents: 17168 diff changeset	1695 if (!got_int)
026034963159 patch 8.1.2179: pressing "q" at the more prompt doesn't stop Python output Bram Moolenaar <Bram@vim.org> parents: 17168 diff changeset	1696 luaV_msg(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1697 return 0;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1698 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1699
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1700 static int
3091 92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1701 luaV_debug(lua_State *L)
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1702 {
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1703 lua_settop(L, 0);
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1704 lua_getglobal(L, "vim");
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1705 lua_getfield(L, -1, "eval");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1706 lua_remove(L, -2); // vim.eval at position 1
3091 92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1707 for (;;)
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1708 {
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1709 const char *input;
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1710 size_t l;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1711 lua_pushvalue(L, 1); // vim.eval
3091 92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1712 lua_pushliteral(L, "input('lua_debug> ')");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1713 lua_call(L, 1, 1); // return string
3091 92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1714 input = lua_tolstring(L, -1, &l);
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1715 if (l == 0 \|\| strcmp(input, "cont") == 0)
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1716 return 0;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1717 msg_putchar('\n'); // avoid outputting on input line
3091 92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1718 if (luaL_loadbuffer(L, input, l, "=(debug command)")
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1719 \|\| lua_pcall(L, 0, 0, 0))
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1720 luaV_emsg(L);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1721 lua_settop(L, 1); // remove eventual returns, but keep vim.eval
3091 92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1722 }
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1723 }
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1724
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	1725 static int
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1726 luaV_command(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1727 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1728 do_cmdline_cmd((char_u *) luaL_checkstring(L, 1));
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1729 update_screen(VALID);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1730 return 0;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1731 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1732
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1733 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1734 luaV_eval(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1735 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1736 typval_T tv = eval_expr((char_u ) luaL_checkstring(L, 1), NULL);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1737 if (tv == NULL) luaL_error(L, "invalid expression");
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1738 luaV_pushtypval(L, tv);
4293 af3a3680fc75 updated for version 7.3.896 Bram Moolenaar <bram@vim.org> parents: 4270 diff changeset	1739 free_tv(tv);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1740 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1741 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1742
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1743 static int
2331 3840b7508835 Make it easier to build with Lua. Remove compiler warnings. Bram Moolenaar <bram@vim.org> parents: 2330 diff changeset	1744 luaV_beep(lua_State *L UNUSED)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1745 {
6949 1e621b31948b patch 7.4.793 Bram Moolenaar <bram@vim.org> parents: 6887 diff changeset	1746 vim_beep(BO_LANG);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1747 return 0;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1748 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1749
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1750 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1751 luaV_line(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1752 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1753 luaV_pushline(L, curbuf, curwin->w_cursor.lnum);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1754 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1755 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1756
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1757 static int
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1758 luaV_list(lua_State *L)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1759 {
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1760 list_T *l;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1761 int initarg = !lua_isnoneornil(L, 1);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1762
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1763 if (initarg && lua_type(L, 1) != LUA_TTABLE)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1764 luaL_error(L, "table expected, got %s", luaL_typename(L, 1));
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1765 l = list_alloc();
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1766 if (l == NULL)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1767 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1768 else
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1769 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1770 luaV_newlist(L, l);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1771 if (initarg) // traverse table to init list
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	1772 {
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1773 int notnil, i = 0;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1774 typval_T v;
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	1775 do
d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	1776 {
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1777 lua_rawgeti(L, 1, ++i);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1778 notnil = !lua_isnil(L, -1);
14335 d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	1779 if (notnil)
d59bf91128ea patch 8.1.0183: Lua API changed, breaking the build Christian Brabandt <cb@256bit.org> parents: 14329 diff changeset	1780 {
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1781 luaV_checktypval(L, -1, &v, "vim.list");
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1782 list_append_tv(l, &v);
16009 3b524e8110ab patch 8.1.1010: Lua interface leaks memory Bram Moolenaar <Bram@vim.org> parents: 15868 diff changeset	1783 clear_tv(&v);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1784 }
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1785 lua_pop(L, 1); // value
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1786 } while (notnil);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1787 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1788 }
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1789 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1790 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1791
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1792 static int
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1793 luaV_dict(lua_State *L)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1794 {
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1795 dict_T *d;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1796 int initarg = !lua_isnoneornil(L, 1);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1797
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1798 if (initarg && lua_type(L, 1) != LUA_TTABLE)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1799 luaL_error(L, "table expected, got %s", luaL_typename(L, 1));
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1800 d = dict_alloc();
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1801 if (d == NULL)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1802 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1803 else
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1804 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1805 luaV_newdict(L, d);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1806 if (initarg) // traverse table to init dict
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1807 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1808 lua_pushnil(L);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1809 while (lua_next(L, 1))
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1810 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1811 char_u *key;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1812 dictitem_T *di;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1813 typval_T v;
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1814
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1815 lua_pushvalue(L, -2); // dup key in case it's a number
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1816 key = (char_u *) lua_tostring(L, -1);
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1817 if (key == NULL)
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1818 {
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1819 lua_pushnil(L);
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1820 return 1;
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1821 }
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1822 if (*key == NUL)
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1823 luaL_error(L, "table has empty key");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1824 luaV_checktypval(L, -2, &v, "vim.dict"); // value
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1825 di = dictitem_alloc(key);
14329 fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1826 if (di == NULL \|\| dict_add(d, di) == FAIL)
fe651f98e173 patch 8.1.0180: static analysis errors in Lua interface Christian Brabandt <cb@256bit.org> parents: 14296 diff changeset	1827 {
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1828 vim_free(di);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1829 lua_pushnil(L);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1830 return 1;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1831 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1832 copy_tv(&v, &di->di_tv);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1833 clear_tv(&v);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1834 lua_pop(L, 2); // key copy and value
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1835 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1836 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1837 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1838 return 1;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1839 }
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1840
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1841 static int
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1842 luaV_blob(lua_State *L)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1843 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1844 blob_T *b;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1845 int initarg = !lua_isnoneornil(L, 1);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1846
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1847 if (initarg && !lua_isstring(L, 1))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1848 luaL_error(L, "string expected, got %s", luaL_typename(L, 1));
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1849 b = blob_alloc();
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1850 if (b == NULL)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1851 lua_pushnil(L);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1852 else
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1853 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1854 luaV_newblob(L, b);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1855 if (initarg)
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1856 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1857 size_t i, l = 0;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1858 const char *s = lua_tolstring(L, 1, &l);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1859
19372 967149bbd8d3 patch 8.2.0244: compiler warning in Lua interface Bram Moolenaar <Bram@vim.org> parents: 19181 diff changeset	1860 if (ga_grow(&b->bv_ga, (int)l) == OK)
16099 643fe07aa0e2 patch 8.1.1054: not checking return value of ga_grow() Bram Moolenaar <Bram@vim.org> parents: 16076 diff changeset	1861 for (i = 0; i < l; ++i)
643fe07aa0e2 patch 8.1.1054: not checking return value of ga_grow() Bram Moolenaar <Bram@vim.org> parents: 16076 diff changeset	1862 ga_append(&b->bv_ga, s[i]);
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1863 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1864 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1865 return 1;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1866 }
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1867
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1868 static int
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1869 luaV_funcref(lua_State *L)
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1870 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1871 const char *name = luaL_checkstring(L, 1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1872 // note: not checking if function exists (needs function_exists)
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1873 if (name == NULL \|\| name == NUL \|\| VIM_ISDIGIT(name))
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1874 luaL_error(L, "invalid function name: %s", name);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1875 luaV_newfuncref(L, (char_u *) name);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1876 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1877 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1878
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1879 static int
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1880 luaV_buffer(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1881 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1882 buf_T *buf;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1883 if (lua_isstring(L, 1)) // get by number or name?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1884 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1885 if (lua_isnumber(L, 1)) // by number?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1886 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1887 int n = lua_tointeger(L, 1);
9649 fd9727ae3c49 commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07 Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	1888 FOR_ALL_BUFFERS(buf)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1889 if (buf->b_fnum == n) break;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1890 }
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1891 else // by name
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1892 {
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1893 size_t l;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1894 const char *s = lua_tolstring(L, 1, &l);
9649 fd9727ae3c49 commit https://github.com/vim/vim/commit/2932359000b2f918d5fade79ea4d124d5943cd07 Christian Brabandt <cb@256bit.org> parents: 8643 diff changeset	1895 FOR_ALL_BUFFERS(buf)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1896 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1897 if (buf->b_ffname == NULL \|\| buf->b_sfname == NULL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1898 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1899 if (l == 0) break;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1900 }
2331 3840b7508835 Make it easier to build with Lua. Remove compiler warnings. Bram Moolenaar <bram@vim.org> parents: 2330 diff changeset	1901 else if (strncmp(s, (char *)buf->b_ffname, l) == 0
3840b7508835 Make it easier to build with Lua. Remove compiler warnings. Bram Moolenaar <bram@vim.org> parents: 2330 diff changeset	1902 \|\| strncmp(s, (char *)buf->b_sfname, l) == 0)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1903 break;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1904 }
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1905 }
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1906 }
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1907 else
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1908 buf = (lua_toboolean(L, 1)) ? firstbuf : curbuf; // first buffer?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1909 luaV_pushbuffer(L, buf);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1910 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1911 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1912
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1913 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1914 luaV_window(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1915 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1916 win_T *win;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1917 if (lua_isnumber(L, 1)) // get by number?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1918 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1919 int n = lua_tointeger(L, 1);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1920 for (win = firstwin; win != NULL; win = win->w_next, n--)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1921 if (n == 1) break;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1922 }
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1923 else
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1924 win = (lua_toboolean(L, 1)) ? firstwin : curwin; // first window?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1925 luaV_pushwindow(L, win);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1926 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1927 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1928
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1929 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1930 luaV_open(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1931 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1932 char_u *s = NULL;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1933 #ifdef HAVE_SANDBOX
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1934 luaV_checksandbox(L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1935 #endif
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1936 if (lua_isstring(L, 1)) s = (char_u *) lua_tostring(L, 1);
3200 3801e4811b0e updated for version 7.3.370 Bram Moolenaar <bram@vim.org> parents: 3091 diff changeset	1937 luaV_pushbuffer(L, buflist_new(s, NULL, 1L, BLN_LISTED));
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1938 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1939 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1940
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1941 static int
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1942 luaV_type(lua_State *L)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	1943 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1944 luaL_checkany(L, 1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1945 if (lua_type(L, 1) == LUA_TUSERDATA) // check vim udata?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1946 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1947 lua_settop(L, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1948 if (lua_getmetatable(L, 1))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1949 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1950 luaV_getfield(L, LUAVIM_LIST);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1951 if (lua_rawequal(L, -1, 2))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1952 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1953 lua_pushstring(L, "list");
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1954 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1955 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1956 luaV_getfield(L, LUAVIM_DICT);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1957 if (lua_rawequal(L, -1, 2))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1958 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1959 lua_pushstring(L, "dict");
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1960 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1961 }
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1962 luaV_getfield(L, LUAVIM_BLOB);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1963 if (lua_rawequal(L, -1, 2))
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1964 {
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1965 lua_pushstring(L, "blob");
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1966 return 1;
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	1967 }
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1968 luaV_getfield(L, LUAVIM_FUNCREF);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1969 if (lua_rawequal(L, -1, 2))
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1970 {
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1971 lua_pushstring(L, "funcref");
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1972 return 1;
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	1973 }
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1974 luaV_getfield(L, LUAVIM_BUFFER);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1975 if (lua_rawequal(L, -1, 2))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1976 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1977 lua_pushstring(L, "buffer");
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1978 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1979 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1980 luaV_getfield(L, LUAVIM_WINDOW);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1981 if (lua_rawequal(L, -1, 2))
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1982 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1983 lua_pushstring(L, "window");
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1984 return 1;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1985 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1986 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	1987 }
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	1988 lua_pushstring(L, luaL_typename(L, 1)); // fallback
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1989 return 1;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1990 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	1991
20441 86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	1992 static int
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	1993 luaV_call(lua_State *L)
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	1994 {
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	1995 int argc = lua_gettop(L) - 1;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	1996 size_t funcname_len;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	1997 char_u *funcname;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	1998 char *error = NULL;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	1999 typval_T rettv;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2000 typval_T argv[MAX_FUNC_ARGS + 1];
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2001 int i = 0;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2002
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2003 if (argc > MAX_FUNC_ARGS)
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2004 return luaL_error(L, "Function called with too many arguments");
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2005
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2006 funcname = (char_u *)luaL_checklstring(L, 1, &funcname_len);
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2007
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2008 for (; i < argc; i++)
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2009 {
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2010 if (luaV_totypval(L, i + 2, &argv[i]) == FAIL)
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2011 {
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2012 error = "lua: cannot convert value";
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2013 goto free_vim_args;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2014 }
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2015 }
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2016
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2017 argv[argc].v_type = VAR_UNKNOWN;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2018
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2019 if (call_vim_function(funcname, argc, argv, &rettv) == FAIL)
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2020 {
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2021 error = "lua: call_vim_function failed";
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2022 goto free_vim_args;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2023 }
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2024
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2025 luaV_pushtypval(L, &rettv);
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2026 clear_tv(&rettv);
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2027
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2028 free_vim_args:
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2029 while (i > 0)
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2030 clear_tv(&argv[--i]);
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2031
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2032 if (error == NULL)
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2033 return 1;
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2034 else
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2035 return luaL_error(L, error);
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2036 }
86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2037
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2038 static const luaL_Reg luaV_module[] = {
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2039 {"command", luaV_command},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2040 {"eval", luaV_eval},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2041 {"beep", luaV_beep},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2042 {"line", luaV_line},
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2043 {"list", luaV_list},
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2044 {"dict", luaV_dict},
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	2045 {"blob", luaV_blob},
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	2046 {"funcref", luaV_funcref},
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2047 {"buffer", luaV_buffer},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2048 {"window", luaV_window},
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2049 {"open", luaV_open},
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2050 {"type", luaV_type},
20441 86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2051 {"call", luaV_call},
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2052 {NULL, NULL}
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2053 };
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2054
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2055 /*
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2056 * for freeing list, dict, buffer and window objects; lightuserdata as arg
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2057 */
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2058 static int
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2059 luaV_free(lua_State *L)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2060 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2061 lua_pushnil(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2062 luaV_setudata(L, lua_touserdata(L, 1));
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2063 return 0;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2064 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2065
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2066 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2067 luaV_luaeval(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2068 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2069 luaL_Buffer b;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2070 size_t l;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2071 const char *str = lua_tolstring(L, 1, &l);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2072 typval_T arg = (typval_T ) lua_touserdata(L, 2);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2073 typval_T rettv = (typval_T ) lua_touserdata(L, 3);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2074 luaL_buffinit(L, &b);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2075 luaL_addlstring(&b, LUAVIM_EVALHEADER, sizeof(LUAVIM_EVALHEADER) - 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2076 luaL_addlstring(&b, str, l);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2077 luaL_pushresult(&b);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2078 str = lua_tolstring(L, -1, &l);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2079 if (luaL_loadbuffer(L, str, l, LUAVIM_EVALNAME)) // compile error?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2080 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2081 luaV_emsg(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2082 return 0;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2083 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2084 luaV_pushtypval(L, arg);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2085 if (lua_pcall(L, 1, 1, 0)) // running error?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2086 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2087 luaV_emsg(L);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2088 return 0;
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2089 }
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	2090 if (luaV_totypval(L, -1, rettv) == FAIL)
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15328 diff changeset	2091 emsg("luaeval: cannot convert value");
6590 f884a1140a0a updated for version 7.4.621 Bram Moolenaar <bram@vim.org> parents: 6586 diff changeset	2092 return 0;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2093 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2094
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2095 static int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2096 luaV_setref(lua_State *L)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2097 {
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2098 int copyID = lua_tointeger(L, 1);
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2099 int abort = FALSE;
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2100
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2101 luaV_getfield(L, LUAVIM_LIST);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2102 luaV_getfield(L, LUAVIM_DICT);
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2103 luaV_getfield(L, LUAVIM_FUNCREF);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2104 lua_pushnil(L);
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2105 // traverse cache table
6586 9ac723b9f54d updated for version 7.4.619 Bram Moolenaar <bram@vim.org> parents: 6584 diff changeset	2106 while (!abort && lua_next(L, lua_upvalueindex(1)) != 0)
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2107 {
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2108 lua_getmetatable(L, -1);
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2109 if (lua_rawequal(L, -1, 2)) // list?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2110 {
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2111 list_T l = (list_T )lua_touserdata(L, 5); // key
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2112
17168 1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 16099 diff changeset	2113 abort = set_ref_in_list(l, copyID);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2114 }
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2115 else if (lua_rawequal(L, -1, 3)) // dict?
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2116 {
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2117 dict_T d = (dict_T )lua_touserdata(L, 5); // key
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2118
17168 1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 16099 diff changeset	2119 abort = set_ref_in_dict(d, copyID);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2120 }
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2121 else if (lua_rawequal(L, -1, 4)) // funcref?
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2122 {
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2123 luaV_Funcref f = (luaV_Funcref )lua_touserdata(L, 5); // key
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2124
17168 1d30eb64a7a2 patch 8.1.1583: set_ref_in_list() only sets ref in items Bram Moolenaar <Bram@vim.org> parents: 16099 diff changeset	2125 abort = set_ref_in_dict(f->self, copyID);
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2126 }
8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2127 lua_pop(L, 2); // metatable and value
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2128 }
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2129 lua_pushinteger(L, abort);
6590 f884a1140a0a updated for version 7.4.621 Bram Moolenaar <bram@vim.org> parents: 6586 diff changeset	2130 return 1;
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2131 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2132
20441 86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2133 #define LUA_VIM_FN_CODE \
20609 054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2134 "vim.fn = setmetatable({}, {\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2135 " __index = function (t, key)\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2136 " local function _fn(...)\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2137 " return vim.call(key, ...)\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2138 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2139 " t[key] = _fn\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2140 " return _fn\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2141 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2142 " })"
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2143
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2144 #define LUA_VIM_UPDATE_PACKAGE_PATHS \
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2145 "local last_vim_paths = {}\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2146 "vim._update_package_paths = function ()\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2147 " local cur_vim_paths = {}\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2148 " local function split(s, delimiter)\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2149 " result = {}\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2150 " for match in (s..delimiter):gmatch(\"(.-)\"..delimiter) do\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2151 " table.insert(result, match)\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2152 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2153 " return result\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2154 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2155 " local rtps = split(vim.eval('&runtimepath'), ',')\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2156 " local sep = package.config:sub(1, 1)\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2157 " for _, key in ipairs({'path', 'cpath'}) do\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2158 " local orig_str = package[key] .. ';'\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2159 " local pathtrails_ordered = {}\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2160 " -- Note: ignores trailing item without trailing `;`. Not using something\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2161 " -- simpler in order to preserve empty items (stand for default path).\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2162 " local orig = {}\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2163 " for s in orig_str:gmatch('[^;]*;') do\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2164 " s = s:sub(1, -2) -- Strip trailing semicolon\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2165 " orig[#orig + 1] = s\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2166 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2167 " if key == 'path' then\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2168 " -- /?.lua and /?/init.lua\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2169 " pathtrails_ordered = {sep .. '?.lua', sep .. '?' .. sep .. 'init.lua'}\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2170 " else\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2171 " local pathtrails = {}\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2172 " for _, s in ipairs(orig) do\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2173 " -- Find out path patterns. pathtrail should contain something like\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2174 " -- /?.so, \?.dll. This allows not to bother determining what correct\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2175 " -- suffixes are.\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2176 " local pathtrail = s:match('[/\\\\][^/\\\\]%?.$')\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2177 " if pathtrail and not pathtrails[pathtrail] then\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2178 " pathtrails[pathtrail] = true\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2179 " pathtrails_ordered[#pathtrails_ordered + 1] = pathtrail\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2180 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2181 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2182 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2183 " local new = {}\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2184 " for _, rtp in ipairs(rtps) do\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2185 " if not rtp:match(';') then\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2186 " for _, pathtrail in pairs(pathtrails_ordered) do\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2187 " local new_path = rtp .. sep .. 'lua' .. pathtrail\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2188 " -- Always keep paths from &runtimepath at the start:\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2189 " -- append them here disregarding orig possibly containing one of them.\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2190 " new[#new + 1] = new_path\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2191 " cur_vim_paths[new_path] = true\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2192 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2193 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2194 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2195 " for _, orig_path in ipairs(orig) do\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2196 " -- Handle removing obsolete paths originating from &runtimepath: such\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2197 " -- paths either belong to cur_nvim_paths and were already added above or\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2198 " -- to last_nvim_paths and should not be added at all if corresponding\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2199 " -- entry was removed from &runtimepath list.\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2200 " if not (cur_vim_paths[orig_path] or last_vim_paths[orig_path]) then\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2201 " new[#new + 1] = orig_path\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2202 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2203 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2204 " package[key] = table.concat(new, ';')\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2205 " end\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2206 " last_vim_paths = cur_vim_paths\n"\
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2207 "end"
20441 86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2208
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2209 static int
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2210 luaopen_vim(lua_State *L)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2211 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2212 // set cache table
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2213 lua_newtable(L);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2214 lua_newtable(L);
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2215 lua_pushstring(L, "v");
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2216 lua_setfield(L, -2, "__mode");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2217 lua_setmetatable(L, -2); // cache is weak-valued
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2218 // print
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2219 lua_pushcfunction(L, luaV_print);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2220 lua_setglobal(L, "print");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2221 // debug.debug
3091 92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	2222 lua_getglobal(L, "debug");
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	2223 lua_pushcfunction(L, luaV_debug);
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	2224 lua_setfield(L, -2, "debug");
92a181a1cec3 updated for version 7.3.317 Bram Moolenaar <bram@vim.org> parents: 2683 diff changeset	2225 lua_pop(L, 1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2226 // free
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2227 lua_pushlightuserdata(L, (void *) LUAVIM_FREE);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2228 lua_pushvalue(L, 1); // cache table
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2229 lua_pushcclosure(L, luaV_free, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2230 lua_rawset(L, LUA_REGISTRYINDEX);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2231 // luaeval
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2232 lua_pushlightuserdata(L, (void *) LUAVIM_LUAEVAL);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2233 lua_pushvalue(L, 1); // cache table
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2234 lua_pushcclosure(L, luaV_luaeval, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2235 lua_rawset(L, LUA_REGISTRYINDEX);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2236 // setref
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2237 lua_pushlightuserdata(L, (void *) LUAVIM_SETREF);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2238 lua_pushvalue(L, 1); // cache table
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2239 lua_pushcclosure(L, luaV_setref, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2240 lua_rawset(L, LUA_REGISTRYINDEX);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2241 // register
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2242 luaV_newmetatable(L, LUAVIM_LIST);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2243 lua_pushvalue(L, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2244 luaV_openlib(L, luaV_List_mt, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2245 luaV_newmetatable(L, LUAVIM_DICT);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2246 lua_pushvalue(L, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2247 luaV_openlib(L, luaV_Dict_mt, 1);
16076 a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	2248 luaV_newmetatable(L, LUAVIM_BLOB);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	2249 lua_pushvalue(L, 1);
a2f0e93a5857 patch 8.1.1043: Lua interface does not support Blob Bram Moolenaar <Bram@vim.org> parents: 16028 diff changeset	2250 luaV_openlib(L, luaV_Blob_mt, 1);
14235 e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	2251 luaV_newmetatable(L, LUAVIM_FUNCREF);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	2252 lua_pushvalue(L, 1);
e3bc8cdc94dd patch 8.1.0134: Lua interface does not support funcref Christian Brabandt <cb@256bit.org> parents: 12515 diff changeset	2253 luaV_openlib(L, luaV_Funcref_mt, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2254 luaV_newmetatable(L, LUAVIM_BUFFER);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2255 lua_pushvalue(L, 1); // cache table
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2256 luaV_openlib(L, luaV_Buffer_mt, 1);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2257 luaV_newmetatable(L, LUAVIM_WINDOW);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2258 lua_pushvalue(L, 1); // cache table
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2259 luaV_openlib(L, luaV_Window_mt, 1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2260 lua_newtable(L); // vim table
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2261 lua_pushvalue(L, 1); // cache table
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2262 luaV_openlib(L, luaV_module, 1);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2263 lua_setglobal(L, LUAVIM_NAME);
20441 86dde5c4b375 patch 8.2.0775: not easy to call a Vim function from Lua Bram Moolenaar <Bram@vim.org> parents: 19846 diff changeset	2264 // custom code
20454 070c8a22261d patch 8.2.0781: compiler warning for not using value in Lua Bram Moolenaar <Bram@vim.org> parents: 20441 diff changeset	2265 (void)luaL_dostring(L, LUA_VIM_FN_CODE);
20609 054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2266 (void)luaL_dostring(L, LUA_VIM_UPDATE_PACKAGE_PATHS);
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2267
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2268 lua_getglobal(L, "vim");
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2269 lua_getfield(L, -1, "_update_package_paths");
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2270
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2271 if (lua_pcall(L, 0, 0, 0))
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2272 luaV_emsg(L);
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2273
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2274 return 0;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2275 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2276
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2277 static lua_State *
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2278 luaV_newstate(void)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2279 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2280 lua_State *L = luaL_newstate();
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2281 luaL_openlibs(L); // core libs
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2282 lua_pushcfunction(L, luaopen_vim); // vim
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2283 lua_call(L, 0, 0);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2284 return L;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2285 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2286
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2287 static void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2288 luaV_setrange(lua_State *L, int line1, int line2)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2289 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2290 lua_getglobal(L, LUAVIM_NAME);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2291 lua_pushinteger(L, line1);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2292 lua_setfield(L, -2, "firstline");
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2293 lua_pushinteger(L, line2);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2294 lua_setfield(L, -2, "lastline");
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2295 lua_pop(L, 1); // vim table
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2296 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2297
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2298
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2299 // ======= Interface =======
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2300
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2301 static lua_State *L = NULL;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2302
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2303 static int
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2304 lua_isopen(void)
2543 8c512e2c7cb5 Fix: Lua interface tried to load the library when closing a buffer or window. Bram Moolenaar <bram@vim.org> parents: 2431 diff changeset	2305 {
8c512e2c7cb5 Fix: Lua interface tried to load the library when closing a buffer or window. Bram Moolenaar <bram@vim.org> parents: 2431 diff changeset	2306 return L != NULL;
8c512e2c7cb5 Fix: Lua interface tried to load the library when closing a buffer or window. Bram Moolenaar <bram@vim.org> parents: 2431 diff changeset	2307 }
8c512e2c7cb5 Fix: Lua interface tried to load the library when closing a buffer or window. Bram Moolenaar <bram@vim.org> parents: 2431 diff changeset	2308
8c512e2c7cb5 Fix: Lua interface tried to load the library when closing a buffer or window. Bram Moolenaar <bram@vim.org> parents: 2431 diff changeset	2309 static int
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2310 lua_init(void)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2311 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2312 if (!lua_isopen())
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2313 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2314 #ifdef DYNAMIC_LUA
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2315 if (!lua_enabled(TRUE))
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2316 {
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15328 diff changeset	2317 emsg(_("Lua library cannot be loaded."));
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2318 return FAIL;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2319 }
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2320 #endif
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2321 L = luaV_newstate();
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2322 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2323 return OK;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2324 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2325
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2326 void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2327 lua_end(void)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2328 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2329 if (lua_isopen())
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2330 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2331 lua_close(L);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2332 L = NULL;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2333 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2334 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2335
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2336 /*
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2337 * ex commands
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2338 */
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2339 void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2340 ex_lua(exarg_T *eap)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2341 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2342 char *script;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2343 if (lua_init() == FAIL) return;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2344 script = (char *) script_get(eap, eap->arg);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2345 if (!eap->skip)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2346 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2347 char s = (script) ? script : (char ) eap->arg;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2348 luaV_setrange(L, eap->line1, eap->line2);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2349 if (luaL_loadbuffer(L, s, strlen(s), LUAVIM_CHUNKNAME)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2350 \|\| lua_pcall(L, 0, 0, 0))
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2351 luaV_emsg(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2352 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2353 if (script != NULL) vim_free(script);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2354 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2355
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2356 void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2357 ex_luado(exarg_T *eap)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2358 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2359 linenr_T l;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2360 const char s = (const char ) eap->arg;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2361 luaL_Buffer b;
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2362 size_t len;
10757 6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines Christian Brabandt <cb@256bit.org> parents: 10025 diff changeset	2363 buf_T *was_curbuf = curbuf;
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines Christian Brabandt <cb@256bit.org> parents: 10025 diff changeset	2364
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2365 if (lua_init() == FAIL) return;
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2366 if (u_save(eap->line1 - 1, eap->line2 + 1) == FAIL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2367 {
15470 55ccc2d353bd patch 8.1.0743: giving error messages is not flexible Bram Moolenaar <Bram@vim.org> parents: 15328 diff changeset	2368 emsg(_("cannot save undo information"));
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2369 return;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2370 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2371 luaV_setrange(L, eap->line1, eap->line2);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2372 luaL_buffinit(L, &b);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2373 luaL_addlstring(&b, "return function(line, linenr) ", 30); // header
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2374 luaL_addlstring(&b, s, strlen(s));
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2375 luaL_addlstring(&b, " end", 4); // footer
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2376 luaL_pushresult(&b);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2377 s = lua_tolstring(L, -1, &len);
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2378 if (luaL_loadbuffer(L, s, len, LUAVIM_CHUNKNAME))
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2379 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2380 luaV_emsg(L);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2381 lua_pop(L, 1); // function body
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2382 return;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2383 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2384 lua_call(L, 0, 1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2385 lua_replace(L, -2); // function -> body
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2386 for (l = eap->line1; l <= eap->line2; l++)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2387 {
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2388 // Check the line number, the command my have deleted lines.
10757 6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines Christian Brabandt <cb@256bit.org> parents: 10025 diff changeset	2389 if (l > curbuf->b_ml.ml_line_count)
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines Christian Brabandt <cb@256bit.org> parents: 10025 diff changeset	2390 break;
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines Christian Brabandt <cb@256bit.org> parents: 10025 diff changeset	2391
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2392 lua_pushvalue(L, -1); // function
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2393 luaV_pushline(L, curbuf, l); // current line as arg
f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2394 lua_pushinteger(L, l); // current line number as arg
3459 5240610f2778 updated for version 7.3.494 Bram Moolenaar <bram@vim.org> parents: 3450 diff changeset	2395 if (lua_pcall(L, 2, 1, 0))
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2396 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2397 luaV_emsg(L);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2398 break;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2399 }
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2400 // Catch the command switching to another buffer.
10757 6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines Christian Brabandt <cb@256bit.org> parents: 10025 diff changeset	2401 if (curbuf != was_curbuf)
6c3d42d18366 patch 8.0.0268: may get ml_get error when :luado deletes lines Christian Brabandt <cb@256bit.org> parents: 10025 diff changeset	2402 break;
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2403 if (lua_isstring(L, -1)) // update line?
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2404 {
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2405 #ifdef HAVE_SANDBOX
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2406 luaV_checksandbox(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2407 #endif
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2408 ml_replace(l, luaV_toline(L, -1), TRUE);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2409 changed_bytes(l, 0);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2410 lua_pop(L, 1); // result from luaV_toline
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2411 }
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2412 lua_pop(L, 1); // line
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2413 }
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2414 lua_pop(L, 1); // function
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2415 check_cursor();
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2416 update_screen(NOT_VALID);
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2417 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2418
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2419 void
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2420 ex_luafile(exarg_T *eap)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2421 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2422 if (lua_init() == FAIL)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2423 return;
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2424 if (!eap->skip)
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2425 {
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2426 luaV_setrange(L, eap->line1, eap->line2);
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2427 if (luaL_loadfile(L, (char *) eap->arg) \|\| lua_pcall(L, 0, 0, 0))
ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2428 luaV_emsg(L);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2429 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2430 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2431
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2432 #define luaV_freetype(typ,tname) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2433 void \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2434 lua_##tname##_free(typ *o) \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2435 { \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2436 if (!lua_isopen()) return; \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2437 luaV_getfield(L, LUAVIM_FREE); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2438 lua_pushlightuserdata(L, (void *) o); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2439 lua_call(L, 1, 0); \
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2440 }
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2441
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2442 luaV_freetype(buf_T, buffer)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2443 luaV_freetype(win_T, window)
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2444
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2445 void
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2446 do_luaeval(char_u str, typval_T arg, typval_T *rettv)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2447 {
3450 b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2448 lua_init();
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2449 luaV_getfield(L, LUAVIM_LUAEVAL);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2450 lua_pushstring(L, (char *) str);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2451 lua_pushlightuserdata(L, (void *) arg);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2452 lua_pushlightuserdata(L, (void *) rettv);
b067b8b81be9 updated for version 7.3.490 Bram Moolenaar <bram@vim.org> parents: 3200 diff changeset	2453 lua_call(L, 3, 0);
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2454 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2455
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2456 int
16028 8ad2cda3757d patch 8.1.1019: Lua: may garbage collect function reference in use Bram Moolenaar <Bram@vim.org> parents: 16009 diff changeset	2457 set_ref_in_lua(int copyID)
2330 ea4bf6df1a8a Whitespace cleanup. Bram Moolenaar <bram@vim.org> parents: 2320 diff changeset	2458 {
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2459 int aborted = 0;
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2460
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2461 if (lua_isopen())
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2462 {
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2463 luaV_getfield(L, LUAVIM_SETREF);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2464 // call the function with 1 arg, getting 1 result back
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2465 lua_pushinteger(L, copyID);
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2466 lua_call(L, 1, 1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2467 // get the result
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2468 aborted = lua_tointeger(L, -1);
18798 f0f9692d4487 patch 8.1.2387: using old C style comments Bram Moolenaar <Bram@vim.org> parents: 18370 diff changeset	2469 // pop result off the stack
6565 38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2470 lua_pop(L, 1);
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2471 }
38add5a3d617 updated for version 7.4.609 Bram Moolenaar <bram@vim.org> parents: 5871 diff changeset	2472 return aborted;
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2473 }
966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2474
20609 054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2475 void
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2476 update_package_paths_in_lua()
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2477 {
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2478 if (lua_isopen())
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2479 {
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2480 lua_getglobal(L, "vim");
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2481 lua_getfield(L, -1, "_update_package_paths");
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2482
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2483 if (lua_pcall(L, 0, 0, 0))
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2484 luaV_emsg(L);
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2485 }
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2486 }
054ba681412d patch 8.2.0858: not easy to require Lua modules Bram Moolenaar <Bram@vim.org> parents: 20599 diff changeset	2487
21006 ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2488 /*
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2489 * Native C function callback
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2490 */
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2491 static int
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2492 luaV_call_lua_func(
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2493 int argcount,
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2494 typval_T *argvars,
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2495 typval_T *rettv,
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2496 void *state)
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2497 {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2498 int i;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2499 int luaargcount = argcount;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2500 luaV_CFuncState funcstate = (luaV_CFuncState)state;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2501 lua_rawgeti(funcstate->L, LUA_REGISTRYINDEX, funcstate->lua_funcref);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2502
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2503 if (funcstate->lua_tableref != LUA_NOREF)
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2504 {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2505 // First arg for metatable __call method is a table
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2506 luaargcount += 1;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2507 lua_rawgeti(funcstate->L, LUA_REGISTRYINDEX, funcstate->lua_tableref);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2508 }
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2509
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2510 for (i = 0; i < argcount; ++i)
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2511 luaV_pushtypval(funcstate->L, &argvars[i]);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2512
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2513 if (lua_pcall(funcstate->L, luaargcount, 1, 0))
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2514 {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2515 luaV_emsg(funcstate->L);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2516 return FCERR_OTHER;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2517 }
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2518
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2519 luaV_checktypval(funcstate->L, -1, rettv, "get return value");
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2520 return FCERR_NONE;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2521 }
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2522
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2523 /*
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2524 * Free up any lua references held by the func state.
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2525 */
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2526 static void
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2527 luaV_call_lua_func_free(void *state)
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2528 {
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2529 luaV_CFuncState funcstate = (luaV_CFuncState)state;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2530 luaL_unref(L, LUA_REGISTRYINDEX, funcstate->lua_funcref);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2531 funcstate->L = NULL;
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2532 if (funcstate->lua_tableref != LUA_NOREF)
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2533 luaL_unref(L, LUA_REGISTRYINDEX, funcstate->lua_tableref);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2534 VIM_CLEAR(funcstate);
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2535 }
ae185f35e256 patch 8.2.1054: not so easy to pass a lua function to Vim Bram Moolenaar <Bram@vim.org> parents: 20609 diff changeset	2536
2320 966a5609669e Added Lua interfae. (Luis Carvalho) Bram Moolenaar <bram@vim.org> parents: diff changeset	2537 #endif

Mercurial > vim

annotate src/if_lua.c @ 21030:08e284594211 v8.2.1066