# HG changeset patch
# User Bram Moolenaar <Bram@vim.org>
# Date 1641472204 -3600
# Node ID fceb494e22de577ab000f5e6391bfea47ceb60f3
# Parent  3d561592f19b393e876b9c284371c0a867cc0c52
patch 8.2.4016: Vim9: incorrect error for argument that is shadowing var

Commit: https://github.com/vim/vim/commit/58493cfae255adec2d5b407593b82d07abcc0975
Author: Bram Moolenaar <Bram@vim.org>
Date:   Thu Jan 6 12:23:30 2022 +0000

    patch 8.2.4016: Vim9: incorrect error for argument that is shadowing var

    Problem:    Vim9: incorrect error for argument that is shadowing var.
    Solution:   Ignore variable that is not in block where the function was
                defined.

diff --git a/src/testdir/test_vim9_func.vim b/src/testdir/test_vim9_func.vim
--- a/src/testdir/test_vim9_func.vim
+++ b/src/testdir/test_vim9_func.vim
@@ -933,6 +933,21 @@ def Test_local_function_shadows_global()
       delfunc g:Func
   END
   CheckScriptSuccess(lines)
+
+  # This does not shadow "i" which is visible only inside the for loop
+  lines =<< trim END
+      vim9script
+
+      def Foo(i: number)
+        echo i
+      enddef
+
+      for i in range(3)
+        # Foo() is compiled here
+        Foo(i)
+      endfor
+  END
+  CheckScriptSuccess(lines)
 enddef
 
 func TakesOneArg(arg)
diff --git a/src/version.c b/src/version.c
--- a/src/version.c
+++ b/src/version.c
@@ -751,6 +751,8 @@ static char *(features[]) =
 static int included_patches[] =
 {   /* Add new patch number below this line */
 /**/
+    4016,
+/**/
     4015,
 /**/
     4014,
diff --git a/src/vim9compile.c b/src/vim9compile.c
--- a/src/vim9compile.c
+++ b/src/vim9compile.c
@@ -162,7 +162,6 @@ find_script_var(char_u *name, size_t len
     hashitem_T	    *hi;
     int		    cc;
     sallvar_T	    *sav;
-    sallvar_T	    *found_sav;
     ufunc_T	    *ufunc;
 
     // Find the list of all script variables with the right name.
@@ -198,7 +197,6 @@ find_script_var(char_u *name, size_t len
     // Go over the variables with this name and find one that was visible
     // from the function.
     ufunc = cctx->ctx_ufunc;
-    found_sav = sav;
     while (sav != NULL)
     {
 	int idx;
@@ -211,8 +209,8 @@ find_script_var(char_u *name, size_t len
 	sav = sav->sav_next;
     }
 
-    // Not found, assume variable at script level was visible.
-    return found_sav;
+    // Not found, variable was not visible.
+    return NULL;
 }
 
 /*