From 40dabb3bac3f4fb07a2dcab331b3b8e680f11c60 Mon Sep 17 00:00:00 2001 From: Joe Bryan Date: Tue, 8 Sep 2020 13:11:29 -0700 Subject: [PATCH] u3: tweaks +stir jet for refcount clarity --- pkg/urbit/jets/e/parse.c | 19 +++++++++++-------- 1 file changed, 11 insertions(+), 8 deletions(-) diff --git a/pkg/urbit/jets/e/parse.c b/pkg/urbit/jets/e/parse.c index 0b32740dc..1ca166d13 100644 --- a/pkg/urbit/jets/e/parse.c +++ b/pkg/urbit/jets/e/parse.c @@ -52,6 +52,14 @@ } } + static u3_noun + _last_k(u3_noun zyc, u3_noun naz) + { + u3_noun pro = _last(zyc, naz); + u3z(zyc); u3z(naz); + return pro; + } + static u3_noun _next(u3_noun tub) { @@ -972,20 +980,15 @@ u3j_gate_prep(&raq_u, u3k(raq)); while ( len_w-- > 0 ) { - top = u3a_peek(sizeof(u3_noun)); - p_vex = *top; + top = u3a_peek(sizeof(u3_noun)); + p_vex = *top; u3a_pop(sizeof(u3_noun)); top = u3a_peek(sizeof(u3_noun)); puq_vex = *top; u3a_pop(sizeof(u3_noun)); - { - u3_noun p_gaw = _last(p_vex, p_wag); - u3z(p_vex); u3z(p_wag); - p_wag = p_gaw; - } - + p_wag = _last_k(p_vex, p_wag); puq_wag = u3j_gate_slam(&raq_u, u3nc(puq_vex, puq_wag)); }