comparison src/eval.c @ 674:4b8583e82cb8 v7.0201

updated for version 7.0201
author vimboss
date Sat, 18 Feb 2006 22:14:51 +0000
parents 513866ffe6af
children e649c78407e6
comparison
equal deleted inserted replaced
673:513866ffe6af 674:4b8583e82cb8
619 static void f_substitute __ARGS((typval_T *argvars, typval_T *rettv)); 619 static void f_substitute __ARGS((typval_T *argvars, typval_T *rettv));
620 static void f_synID __ARGS((typval_T *argvars, typval_T *rettv)); 620 static void f_synID __ARGS((typval_T *argvars, typval_T *rettv));
621 static void f_synIDattr __ARGS((typval_T *argvars, typval_T *rettv)); 621 static void f_synIDattr __ARGS((typval_T *argvars, typval_T *rettv));
622 static void f_synIDtrans __ARGS((typval_T *argvars, typval_T *rettv)); 622 static void f_synIDtrans __ARGS((typval_T *argvars, typval_T *rettv));
623 static void f_system __ARGS((typval_T *argvars, typval_T *rettv)); 623 static void f_system __ARGS((typval_T *argvars, typval_T *rettv));
624 static void f_tabpagenr __ARGS((typval_T *argvars, typval_T *rettv));
624 static void f_taglist __ARGS((typval_T *argvars, typval_T *rettv)); 625 static void f_taglist __ARGS((typval_T *argvars, typval_T *rettv));
625 static void f_tagfiles __ARGS((typval_T *argvars, typval_T *rettv)); 626 static void f_tagfiles __ARGS((typval_T *argvars, typval_T *rettv));
626 static void f_tempname __ARGS((typval_T *argvars, typval_T *rettv)); 627 static void f_tempname __ARGS((typval_T *argvars, typval_T *rettv));
627 static void f_test __ARGS((typval_T *argvars, typval_T *rettv)); 628 static void f_test __ARGS((typval_T *argvars, typval_T *rettv));
628 static void f_tolower __ARGS((typval_T *argvars, typval_T *rettv)); 629 static void f_tolower __ARGS((typval_T *argvars, typval_T *rettv));
6981 {"substitute", 4, 4, f_substitute}, 6982 {"substitute", 4, 4, f_substitute},
6982 {"synID", 3, 3, f_synID}, 6983 {"synID", 3, 3, f_synID},
6983 {"synIDattr", 2, 3, f_synIDattr}, 6984 {"synIDattr", 2, 3, f_synIDattr},
6984 {"synIDtrans", 1, 1, f_synIDtrans}, 6985 {"synIDtrans", 1, 1, f_synIDtrans},
6985 {"system", 1, 2, f_system}, 6986 {"system", 1, 2, f_system},
6987 {"tabpagenr", 0, 1, f_tabpagenr},
6986 {"tagfiles", 0, 0, f_tagfiles}, 6988 {"tagfiles", 0, 0, f_tagfiles},
6987 {"taglist", 1, 1, f_taglist}, 6989 {"taglist", 1, 1, f_taglist},
6988 {"tempname", 0, 0, f_tempname}, 6990 {"tempname", 0, 0, f_tempname},
6989 {"test", 1, 1, f_test}, 6991 {"test", 1, 1, f_test},
6990 {"tolower", 1, 1, f_tolower}, 6992 {"tolower", 1, 1, f_tolower},
14863 mch_remove(infile); 14865 mch_remove(infile);
14864 vim_free(infile); 14866 vim_free(infile);
14865 } 14867 }
14866 rettv->v_type = VAR_STRING; 14868 rettv->v_type = VAR_STRING;
14867 rettv->vval.v_string = res; 14869 rettv->vval.v_string = res;
14870 }
14871
14872 /*
14873 * "tabpagenr()" function
14874 */
14875 /* ARGSUSED */
14876 static void
14877 f_tabpagenr(argvars, rettv)
14878 typval_T *argvars;
14879 typval_T *rettv;
14880 {
14881 int nr = 1;
14882 #ifdef FEAT_WINDOWS
14883 tabpage_T *tp;
14884 char_u *arg;
14885
14886 if (argvars[0].v_type != VAR_UNKNOWN)
14887 {
14888 arg = get_tv_string_chk(&argvars[0]);
14889 nr = 0;
14890 if (arg != NULL)
14891 {
14892 if (STRCMP(arg, "$") == 0)
14893 for (tp = first_tabpage; tp != NULL; tp = tp->tp_next)
14894 ++nr;
14895 else
14896 EMSG2(_(e_invexpr2), arg);
14897 }
14898 }
14899 else
14900 for (tp = first_tabpage; tp != curtab; tp = tp->tp_next)
14901 ++nr;
14902 #endif
14903 rettv->vval.v_number = nr;
14868 } 14904 }
14869 14905
14870 /* 14906 /*
14871 * "tagfiles()" function 14907 * "tagfiles()" function
14872 */ 14908 */