comparison src/evalfunc.c @ 17964:6d4d3bce365d v8.1.1978

patch 8.1.1978: the eval.c file is too big Commit: https://github.com/vim/vim/commit/1e1d30048e722906a13665bd6c3c24c87eb2fe25 Author: Bram Moolenaar <Bram@vim.org> Date: Wed Sep 4 14:41:14 2019 +0200 patch 8.1.1978: the eval.c file is too big Problem: The eval.c file is too big. Solution: Move filter() and map() to list.c.
author Bram Moolenaar <Bram@vim.org>
date Wed, 04 Sep 2019 14:45:04 +0200
parents 1f6d5f9ddeb0
children 46f95606b9ec
comparison
equal deleted inserted replaced
17963:5de9b5831cd4 17964:6d4d3bce365d
104 static void f_expandcmd(typval_T *argvars, typval_T *rettv); 104 static void f_expandcmd(typval_T *argvars, typval_T *rettv);
105 static void f_extend(typval_T *argvars, typval_T *rettv); 105 static void f_extend(typval_T *argvars, typval_T *rettv);
106 static void f_feedkeys(typval_T *argvars, typval_T *rettv); 106 static void f_feedkeys(typval_T *argvars, typval_T *rettv);
107 static void f_filereadable(typval_T *argvars, typval_T *rettv); 107 static void f_filereadable(typval_T *argvars, typval_T *rettv);
108 static void f_filewritable(typval_T *argvars, typval_T *rettv); 108 static void f_filewritable(typval_T *argvars, typval_T *rettv);
109 static void f_filter(typval_T *argvars, typval_T *rettv);
110 static void f_finddir(typval_T *argvars, typval_T *rettv); 109 static void f_finddir(typval_T *argvars, typval_T *rettv);
111 static void f_findfile(typval_T *argvars, typval_T *rettv); 110 static void f_findfile(typval_T *argvars, typval_T *rettv);
112 #ifdef FEAT_FLOAT 111 #ifdef FEAT_FLOAT
113 static void f_float2nr(typval_T *argvars, typval_T *rettv); 112 static void f_float2nr(typval_T *argvars, typval_T *rettv);
114 static void f_floor(typval_T *argvars, typval_T *rettv); 113 static void f_floor(typval_T *argvars, typval_T *rettv);
190 static void f_log10(typval_T *argvars, typval_T *rettv); 189 static void f_log10(typval_T *argvars, typval_T *rettv);
191 #endif 190 #endif
192 #ifdef FEAT_LUA 191 #ifdef FEAT_LUA
193 static void f_luaeval(typval_T *argvars, typval_T *rettv); 192 static void f_luaeval(typval_T *argvars, typval_T *rettv);
194 #endif 193 #endif
195 static void f_map(typval_T *argvars, typval_T *rettv);
196 static void f_maparg(typval_T *argvars, typval_T *rettv); 194 static void f_maparg(typval_T *argvars, typval_T *rettv);
197 static void f_mapcheck(typval_T *argvars, typval_T *rettv); 195 static void f_mapcheck(typval_T *argvars, typval_T *rettv);
198 static void f_match(typval_T *argvars, typval_T *rettv); 196 static void f_match(typval_T *argvars, typval_T *rettv);
199 static void f_matchend(typval_T *argvars, typval_T *rettv); 197 static void f_matchend(typval_T *argvars, typval_T *rettv);
200 static void f_matchlist(typval_T *argvars, typval_T *rettv); 198 static void f_matchlist(typval_T *argvars, typval_T *rettv);
3509 rettv->vval.v_string = fresult; 3507 rettv->vval.v_string = fresult;
3510 #endif 3508 #endif
3511 } 3509 }
3512 3510
3513 /* 3511 /*
3514 * "filter()" function
3515 */
3516 static void
3517 f_filter(typval_T *argvars, typval_T *rettv)
3518 {
3519 filter_map(argvars, rettv, FALSE);
3520 }
3521
3522 /*
3523 * "finddir({fname}[, {path}[, {count}]])" function 3512 * "finddir({fname}[, {path}[, {count}]])" function
3524 */ 3513 */
3525 static void 3514 static void
3526 f_finddir(typval_T *argvars, typval_T *rettv) 3515 f_finddir(typval_T *argvars, typval_T *rettv)
3527 { 3516 {
6797 6786
6798 str = tv_get_string_buf(&argvars[0], buf); 6787 str = tv_get_string_buf(&argvars[0], buf);
6799 do_luaeval(str, argvars + 1, rettv); 6788 do_luaeval(str, argvars + 1, rettv);
6800 } 6789 }
6801 #endif 6790 #endif
6802
6803 /*
6804 * "map()" function
6805 */
6806 static void
6807 f_map(typval_T *argvars, typval_T *rettv)
6808 {
6809 filter_map(argvars, rettv, TRUE);
6810 }
6811 6791
6812 /* 6792 /*
6813 * "maparg()" function 6793 * "maparg()" function
6814 */ 6794 */
6815 static void 6795 static void