From: fennecdjay <astor.jeremie@wanadoo.fr>
Date: Sun, 10 Mar 2019 11:06:29 +0000 (+0100)
Subject: :bug: Fix scan1_exp_unary
X-Git-Tag: nightly~2753^2~15
X-Git-Url: http://10.11.0.4:5575/?a=commitdiff_plain;h=5b0ad55f0733bea5cc53416d3ccf89388eb0344f;p=gwion.git

:bug: Fix scan1_exp_unary
---

diff --git a/src/parse/scan1.c b/src/parse/scan1.c
index 3faddf51..873db3a2 100644
--- a/src/parse/scan1.c
+++ b/src/parse/scan1.c
@@ -141,7 +141,9 @@ ANN static m_bool scan1_exp_if(const Env env, const Exp_If* exp_if) { GWDEBUG_EX
 }
 
 ANN static inline m_bool scan1_exp_unary(const restrict Env env, const Exp_Unary * unary) {
-  return !(unary->op == op_spork && unary->code) ? GW_OK : scan1_stmt(env, unary->code);
+  if(unary->op == op_spork && unary->code)
+    return scan1_stmt(env, unary->code);
+  return unary->exp ? scan1_exp(env, unary->exp) : GW_OK;
 }
 
 #define scan1_exp_lambda dummy_func