From aa747e4d540a1b9775a107fc73e6b88069db489b Mon Sep 17 00:00:00 2001
From: Heng Li <lh3@me.com>
Date: Thu, 21 May 2015 21:54:10 -0400
Subject: [PATCH] fixed a bug related to functions

---
 kexpr.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/kexpr.c b/kexpr.c
index b5e2988..83dba2c 100644
--- a/kexpr.c
+++ b/kexpr.c
@@ -193,6 +193,10 @@ static ke1_t *ke_parse_core(const char *_s, int *_n, int *err)
 				*err |= KEE_UNRP;
 				break;
 			} else --n_op; // pop out '('
+			if (n_op > 0 && op[n_op-1].ttype == KET_FUNC) {
+				u = push_back(&out, &n_out, &m_out);
+				*u = op[--n_op];
+			}
 			++p;
 		} else if (*p == ',') {
 			while (n_op > 0 && op[n_op-1].op >= 0) {
-- 
2.47.3