From 609af3a6513f0a35823089c090077171e87546c5 Mon Sep 17 00:00:00 2001
From: gingerBill <bill@gingerbill.org>
Date: Tue, 22 Sep 2020 12:06:05 +0100
Subject: Fix and clean up default procedure parameter code for non-constant
 types

---
 src/check_type.cpp | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/check_type.cpp')

diff --git a/src/check_type.cpp b/src/check_type.cpp
index 24434dba0..b6dfafcdc 100644
--- a/src/check_type.cpp
+++ b/src/check_type.cpp
@@ -1370,6 +1370,7 @@ bool is_expr_from_a_parameter(CheckerContext *ctx, Ast *expr) {
 
 ParameterValue handle_parameter_value(CheckerContext *ctx, Type *in_type, Type **out_type_, Ast *expr, bool allow_caller_location) {
 	ParameterValue param_value = {};
+	param_value.original_ast_expr = expr;
 	if (expr == nullptr) {
 		return param_value;
 	}
-- 
cgit v1.2.3