Invoke application-specific binary operator evaluator only if op is binary.

diff --git a/lib/expr/exeval.c b/lib/expr/exeval.c
index 88163ea37554d4d7842db2a92624622a6c1185f2..8c61786d8d3558d3e158369aaada4c33f35524bc 100644 (file)
--- a/lib/expr/exeval.c
+++ b/lib/expr/exeval.c
@@ -1298,7 +1298,7 @@ static Extype_t eval(Expr_t * ex, register Exnode_t * expr, void *env)
     v = eval(ex, x, env);
     if ((x = expr->data.operand.right)) {
        r = eval(ex, x, env);
-       if (!BUILTIN(x->type)) {
+       if (!BUILTIN(x->type) && expr->binary) {
            tmp = *expr->data.operand.left;
            tmp.data.constant.value = v;
            rtmp = *x;