# HG changeset patch
# User Christian Brabandt <cb@256bit.org>
# Date 1483367404 -3600
# Node ID 89200fa1d174b995c9c2f866e59102530caa842e
# Parent  36f5306701e5716d43b3624dad0a6b411698f414
commit https://github.com/vim/vim/commit/777b30f827bcbe10a40640b1bf0361cb93a16be1
Author: Bram Moolenaar <Bram@vim.org>
Date:   Mon Jan 2 15:26:27 2017 +0100

    patch 8.0.0137
    Problem:    When 'maxfuncdepth' is set above 200 the nesting is limited to
                200. (Brett Stahlman)
    Solution:   Allow for Ex command recursion depending on 'maxfuncdepth'.

diff --git a/src/ex_docmd.c b/src/ex_docmd.c
--- a/src/ex_docmd.c
+++ b/src/ex_docmd.c
@@ -787,8 +787,9 @@ do_cmdline(
 #endif
 
     /* It's possible to create an endless loop with ":execute", catch that
-     * here.  The value of 200 allows nested function calls, ":source", etc. */
-    if (call_depth == 200)
+     * here.  The value of 200 allows nested function calls, ":source", etc.
+     * Allow 200 or 'maxfuncdepth', whatever is larger. */
+    if (call_depth >= 200 && call_depth >= p_mfd)
     {
 	EMSG(_("E169: Command too recursive"));
 #ifdef FEAT_EVAL
diff --git a/src/testdir/test_nested_function.vim b/src/testdir/test_nested_function.vim
--- a/src/testdir/test_nested_function.vim
+++ b/src/testdir/test_nested_function.vim
@@ -40,3 +40,24 @@ func Test_nested_argument()
   delfunc g:X
   unlet g:Y
 endfunc
+
+func Recurse(count)
+  if a:count > 0
+    call Recurse(a:count - 1)
+  endif
+endfunc
+
+func Test_max_nesting()
+  let call_depth_here = 2
+  let ex_depth_here = 5
+  set mfd&
+
+  call Recurse(99 - call_depth_here)
+  call assert_fails('call Recurse(' . (100 - call_depth_here) . ')', 'E132:')
+
+  set mfd=210
+  call Recurse(209 - ex_depth_here)
+  call assert_fails('call Recurse(' . (210 - ex_depth_here) . ')', 'E169:')
+
+  set mfd&
+endfunc
diff --git a/src/version.c b/src/version.c
--- a/src/version.c
+++ b/src/version.c
@@ -765,6 +765,8 @@ static char *(features[]) =
 static int included_patches[] =
 {   /* Add new patch number below this line */
 /**/
+    137,
+/**/
     136,
 /**/
     135,