From d3decdb51a4d2b832fbccc3e9a94221b1f5c40b2 Mon Sep 17 00:00:00 2001
From: Nick Gasson <nick@nickg.me.uk>
Date: Mon, 16 Sep 2024 20:28:00 +0100
Subject: [PATCH] Add additional debug for issue #972

---
 src/lower.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/lower.c b/src/lower.c
index e8974956d..18c9a9c50 100644
--- a/src/lower.c
+++ b/src/lower.c
@@ -6048,6 +6048,10 @@ static void lower_signal_assign_target(lower_unit_t *lu, target_part_t **ptr,
          lower_check_scalar_bounds(lu, src_reg, type, where, p->target);
 
       if (!type_is_homogeneous(type)) {
+         // XXX: debug for issue #972
+         if (type_is_generic(type))
+            fatal_at(tree_loc(where), "generic type was not rewritten");
+
          vcode_reg_t args[2] = { reject, after };
          vcode_reg_t locus = lower_debug_locus(where);
          lower_for_each_field_2(lu, type, src_type, p->reg, src_reg, locus,