From: K.Kosako <kosako@sofnec.co.jp>
Date: Thu, 20 Jul 2017 08:01:17 +0000 (+0900)
Subject: fix setting NST_RECURSION flag to call-node
X-Git-Tag: v6.5.0^2~51
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=42324e548bdde01048d75aa9e649cfcc6ff3753c;p=onig

fix setting NST_RECURSION flag to call-node
---

diff --git a/src/regcomp.c b/src/regcomp.c
index f192859..459a7c3 100644
--- a/src/regcomp.c
+++ b/src/regcomp.c
@@ -3449,7 +3449,10 @@ recursive_call_check(Node* node)
 
   case NODE_CALL:
     r = recursive_call_check(NODE_BODY(node));
-    if (r != 0) NODE_STATUS_ADD(node, NST_RECURSION);
+    if (r != 0) {
+      if (NODE_IS_RECURSION(NODE_BODY(node)))
+        NODE_STATUS_ADD(node, NST_RECURSION);
+    }
     break;
 
   case NODE_ENCLOSURE: