aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorc2024-02-08 19:41:27 -0500
committerc2024-02-08 19:41:27 -0500
commit78bdd279d90ace6e53a853a898f4819327e82743 (patch)
tree0c5cf6eba0af38c297ac643bd120376af6feb23e
parent0085a59bbb0a47b3bb920f4be72a127788e7139c (diff)
Fixed broken test.
Calls and their arguments are now parsed correctly.
-rw-r--r--src/parser.c11
-rw-r--r--test/parser.c5
2 files changed, 10 insertions, 6 deletions
diff --git a/src/parser.c b/src/parser.c
index ac08a16..731df78 100644
--- a/src/parser.c
+++ b/src/parser.c
@@ -100,10 +100,17 @@ tree_t* parser_parse_kwd(parser_t* parser) {
call->data.call.target = parser->token->val;
parser->token->val = NULL;
-
- if (parser_nxt_token_match(parser, TOKEN_TYPE_APPLY)) {
+
+ /* Skip over keyword, check for arguments. */
+ if (
+ parser_nxt_token(parser) &&
+ parser->token->type == TOKEN_TYPE_APPLY
+ ) {
+ /* Expect some arguments. */
+ parser_nxt_token(parser);
call->data.call.arg = parser_parse_carg(parser);
} else {
+ /* There're no arguments. */
call->data.call.arg = NULL;
}
diff --git a/test/parser.c b/test/parser.c
index 3bceab1..503244f 100644
--- a/test/parser.c
+++ b/test/parser.c
@@ -716,7 +716,7 @@ void cargumented_call_of_call() {
char* target1 = tree1call->data.call.target = ecalloc(2, sizeof(char));
strcpy(target1, "x");
tree1call->data.call.arg = NULL;
- tree0call->data.carg.nxt = NULL;
+ tree0carg->data.carg.nxt = NULL;
tree->data.block.nxt = NULL;
pp = pp_init(src);
@@ -730,9 +730,6 @@ void cargumented_call_of_call() {
ASSERT(tree_cmp(parser->tree, tree) == 1);
- tree_print(tree, 0);
- tree_print(parser->tree, 0);
-
token_destroy(lexer->tokenl);
lexer_destroy(lexer);
free(pp->psrc);