From 686f487cd9506d6f16b8d90565bcfa035769324b Mon Sep 17 00:00:00 2001
From: Camil Staps
Date: Thu, 25 Aug 2016 23:10:47 +0200
Subject: Fix issue with trailing arguments

---
 interpreter/syntax.c | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'interpreter/syntax.c')

diff --git a/interpreter/syntax.c b/interpreter/syntax.c
index 4eb845a..7a0dd39 100644
--- a/interpreter/syntax.c
+++ b/interpreter/syntax.c
@@ -20,6 +20,15 @@ unsigned empty_args_list(arg_list* list) {
 	return !list;
 }
 
+unsigned char len_arg_list(arg_list* list) {
+	unsigned char i = 0;
+	while (list) {
+		i++;
+		list = list->rest;
+	}
+	return i;
+}
+
 void cpy_expression(expression* dst, expression* src) {
 	free_expression(dst);
 	dst->kind = src->kind;
-- 
cgit v1.2.3