aboutsummaryrefslogtreecommitdiff
path: root/interpreter/syntax.c
diff options
context:
space:
mode:
authorCamil Staps2016-08-25 23:10:47 +0200
committerCamil Staps2016-08-25 23:10:47 +0200
commit686f487cd9506d6f16b8d90565bcfa035769324b (patch)
treeca1197b58c7d56376cb65124617a6a40d91e131c /interpreter/syntax.c
parentAdded examples (diff)
Fix issue with trailing arguments
Diffstat (limited to 'interpreter/syntax.c')
-rw-r--r--interpreter/syntax.c9
1 files changed, 9 insertions, 0 deletions
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;