From b2fdb69b4dd7f52f42414139a257b3800eb51a90 Mon Sep 17 00:00:00 2001
From: Ginger Bill <bill@gingerbill.org>
Date: Sun, 11 Jun 2017 12:01:40 +0100
Subject: Named procedure calls

---
 src/parser.cpp | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'src/parser.cpp')

diff --git a/src/parser.cpp b/src/parser.cpp
index 120bb63cc..d741e569f 100644
--- a/src/parser.cpp
+++ b/src/parser.cpp
@@ -2128,6 +2128,11 @@ AstNode *parse_call_expr(AstFile *f, AstNode *operand) {
 		}
 
 		AstNode *arg = parse_expr(f, false);
+		if (f->curr_token.kind == Token_Eq) {
+			Token eq = expect_token(f, Token_Eq);
+			AstNode *value = parse_value(f);
+			arg = ast_field_value(f, arg, value, eq);
+		}
 		array_add(&args, arg);
 
 		if (!allow_token(f, Token_Comma)) {
-- 
cgit v1.2.3