:art: Remove unused functions in partial.c

diff --git a/src/parse/partial.c b/src/parse/partial.c
index b4447da1563c63cd78c68c42f8da07c07e938319..52e34228f38a7e5f7225645ef4d94857e1db304f 100644 (file)
--- a/src/parse/partial.c
+++ b/src/parse/partial.c
@@ -180,17 +180,17 @@ ANN static Stmt_List partial_code(const Env env, Arg_List args, const Exp efun,
 
 ANN static uint32_t count_args_exp(Exp args) {
   uint32_t i = 0;
-  while(args && ++i) args = args->next;
+  do i++;
+  while ((args = args->next));
   return i;
 }
 
 ANN static uint32_t count_args_func(Func f, const uint32_t i) {
   uint32_t max = 0;
-  while(f) {
+  do {
     const uint32_t len =  mp_vector_len(f->def->base->args);
     if(len > i && len > max) max = len;
-    f = f->next;
-  }
+  } while ((f = f->next));
   return max;
 }