summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/testdir/test_vim9_func.vim14
-rw-r--r--src/version.c2
-rw-r--r--src/vim9execute.c14
3 files changed, 23 insertions, 7 deletions
diff --git a/src/testdir/test_vim9_func.vim b/src/testdir/test_vim9_func.vim
index f3aae7c6c..8c2349c34 100644
--- a/src/testdir/test_vim9_func.vim
+++ b/src/testdir/test_vim9_func.vim
@@ -1294,6 +1294,20 @@ def Test_call_closure_not_compiled()
GetResult(g:Ref)->assert_equal('sometext')
enddef
+def Test_double_closure_fails()
+ let lines =<< trim END
+ vim9script
+ def Func()
+ let var = 0
+ for i in range(2)
+ timer_start(0, {-> var})
+ endfor
+ enddef
+ Func()
+ END
+ CheckScriptFailure(lines, 'Multiple closures not supported yet')
+enddef
+
def Test_sort_return_type()
let res: list<number>
res = [1, 2, 3]->sort()
diff --git a/src/version.c b/src/version.c
index e47f0d19a..93f770144 100644
--- 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 */
/**/
+ 1706,
+/**/
1705,
/**/
1704,
diff --git a/src/vim9execute.c b/src/vim9execute.c
index 4332c03ed..5fe587892 100644
--- a/src/vim9execute.c
+++ b/src/vim9execute.c
@@ -2676,15 +2676,11 @@ call_def_function(
continue;
func_return:
- // Restore previous function. If the frame pointer is zero then there
- // is none and we are done.
+ // Restore previous function. If the frame pointer is where we started
+ // then there is none and we are done.
if (ectx.ec_frame_idx == initial_frame_idx)
- {
- if (handle_closure_in_use(&ectx, FALSE) == FAIL)
- // only fails when out of memory
- goto failed;
goto done;
- }
+
if (func_return(&ectx) == FAIL)
// only fails when out of memory
goto failed;
@@ -2703,6 +2699,10 @@ done:
ret = OK;
failed:
+ // Also deal with closures when failed, they may already be in use
+ // somewhere.
+ handle_closure_in_use(&ectx, FALSE);
+
// When failed need to unwind the call stack.
while (ectx.ec_frame_idx != initial_frame_idx)
func_return(&ectx);