diff options
author | Camil Staps | 2016-08-25 23:10:47 +0200 |
---|---|---|
committer | Camil Staps | 2016-08-25 23:10:47 +0200 |
commit | 686f487cd9506d6f16b8d90565bcfa035769324b (patch) | |
tree | ca1197b58c7d56376cb65124617a6a40d91e131c /interpreter/syntax.c | |
parent | Added examples (diff) |
Fix issue with trailing arguments
Diffstat (limited to 'interpreter/syntax.c')
-rw-r--r-- | interpreter/syntax.c | 9 |
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; |