patch 8.1.1940: script tests fail

Problem:    Script tests fail.
Solution:   Don't set vimvars type in set_vim_var_nr().
diff --git a/src/eval.c b/src/eval.c
index 9295993..fb2f804 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -7879,6 +7879,7 @@
 	    int		i;
 	    typval_T	tv;
 
+	    set_vim_var_type(VV_KEY, VAR_NUMBER);
 	    for (i = 0; i < b->bv_ga.ga_len; i++)
 	    {
 		tv.v_type = VAR_NUMBER;
@@ -7907,6 +7908,8 @@
 	else
 	{
 	    // argvars[0].v_type == VAR_LIST
+	    set_vim_var_type(VV_KEY, VAR_NUMBER);
+
 	    for (li = l->lv_first; li != NULL; li = nli)
 	    {
 		if (map && var_check_lock(li->li_tv.v_lock, arg_errmsg, TRUE))
diff --git a/src/evalvars.c b/src/evalvars.c
index c087d85..bbe1403 100644
--- a/src/evalvars.c
+++ b/src/evalvars.c
@@ -1691,12 +1691,20 @@
 }
 
 /*
+ * Set type of v: variable to "type".
+ */
+    void
+set_vim_var_type(int idx, vartype_T type)
+{
+    vimvars[idx].vv_type = type;
+}
+
+/*
  * Set number v: variable to "val".
  */
     void
 set_vim_var_nr(int idx, varnumber_T val)
 {
-    vimvars[idx].vv_type = VAR_NUMBER;
     vimvars[idx].vv_nr = val;
 }
 
diff --git a/src/proto/evalvars.pro b/src/proto/evalvars.pro
index fde1ada..6226d43 100644
--- a/src/proto/evalvars.pro
+++ b/src/proto/evalvars.pro
@@ -15,6 +15,7 @@
 void ex_lockvar(exarg_T *eap);
 int do_unlet(char_u *name, int forceit);
 char_u *get_user_var_name(expand_T *xp, int idx);
+void set_vim_var_type(int idx, vartype_T type);
 void set_vim_var_nr(int idx, varnumber_T val);
 typval_T *get_vim_var_tv(int idx);
 varnumber_T get_vim_var_nr(int idx);
diff --git a/src/version.c b/src/version.c
index a2e9bee..f0ccfe3 100644
--- a/src/version.c
+++ b/src/version.c
@@ -762,6 +762,8 @@
 static int included_patches[] =
 {   /* Add new patch number below this line */
 /**/
+    1940,
+/**/
     1939,
 /**/
     1938,