From df51f9c4ee0ee4ac22206513bcd60e6928b7eaeb Mon Sep 17 00:00:00 2001
From: Eugen Wissner <belka@caraus.de>
Date: Tue, 25 Aug 2026 13:31:38 +0200
Subject: Fix compatible procedure cast

---
 gcc/gcc/elna-generic.cc | 1 +
 1 file changed, 1 insertion(+)

(limited to 'gcc')

diff --git a/gcc/gcc/elna-generic.cc b/gcc/gcc/elna-generic.cc
index b657e92..659a8c1 100644
--- a/gcc/gcc/elna-generic.cc
+++ b/gcc/gcc/elna-generic.cc
@@ -130,6 +130,7 @@ namespace elna::gcc
         tree cast_target = get_inner_alias(expression->type_decoration, this->symbols);
 
         expression->value().accept(this);
+        this->current_expression = prepare_rvalue(this->current_expression);
         const location_t cast_location = get_location(&expression->position());
         auto source_slice = resolve_underlying_type(expression->value().type_decoration)
             .get<boot::slice_type>();
-- 
cgit v1.2.3