From 664ac536d8731b17e88dec1a37a21069ef66b449 Mon Sep 17 00:00:00 2001 From: fennecdjay Date: Tue, 13 Dec 2022 15:44:25 +0100 Subject: [PATCH] :bug: check traverse_exp in sift ops --- src/lib/sift.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/lib/sift.c b/src/lib/sift.c index 8f16c61e..c8d266f6 100644 --- a/src/lib/sift.c +++ b/src/lib/sift.c @@ -41,13 +41,13 @@ static OP_CHECK(opck_ctrl) { const Exp call = new_exp_call(mp, dot, NULL, func->pos); func->d.exp_binary.lhs = call; func->d.exp_binary.op = chuck; - traverse_exp(env, func); + CHECK_BN(traverse_exp(env, func)); struct Stmt_ one = { .d = { .stmt_exp = { .val = func }}, .stmt_type = ae_stmt_exp, .pos = func->pos }; Exp samp = new_prim_id(mp, insert_symbol(env->gwion->st, "samp"), func->pos); Exp _now = new_prim_id(mp, insert_symbol(env->gwion->st, "now"), func->pos); Exp time = new_exp_binary(mp, samp, chuck, _now, func->pos); - traverse_exp(env, time); + CHECK_BN(traverse_exp(env, time)); struct Stmt_ two = { .d = { .stmt_exp = { .val = time }}, .stmt_type = ae_stmt_exp, .pos = func->pos }; free_exp(mp, bin->lhs); -- 2.43.0