From a830a63718f1e9a0a812e772bef6e891668afd17 Mon Sep 17 00:00:00 2001
From: "Arnold D. Robbins" <arnold@skeeve.com>
Date: Tue, 14 Apr 2015 15:02:27 +0300
Subject: Make indirect call of gensub with 3 args work.

---
 builtin.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'builtin.c')

diff --git a/builtin.c b/builtin.c
index a7853d7c..f650a9f8 100644
--- a/builtin.c
+++ b/builtin.c
@@ -3063,10 +3063,10 @@ call_sub(const char *name, int nargs)
 			PUSH(rhs);
 			nargs++;
 		}
-		PUSH(rhs);
+		else
+			PUSH(rhs);
 	}
 
-
 	unref(zero);
 	result = do_sub(nargs, flags);
 	if (flags != GENSUB)
-- 
cgit v1.2.3