From 4ddc16c4e656b5a0816b5cc35299c346a40152b7 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 26 Sep 2019 19:42:09 +0200
Subject: synth: handle alias for reshape.

---
 src/synth/synth-expr.adb | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/synth/synth-expr.adb b/src/synth/synth-expr.adb
index e73bd5fb2..714567176 100644
--- a/src/synth/synth-expr.adb
+++ b/src/synth/synth-expr.adb
@@ -706,6 +706,8 @@ package body Synth.Expr is
             return Create_Value_Wire (Val.W, Ntype);
          when Value_Net =>
             return Create_Value_Net (Val.N, Ntype);
+         when Value_Alias =>
+            return Create_Value_Alias (Val.A_Wid, Val.A_Off, Ntype);
          when others =>
             raise Internal_Error;
       end case;
-- 
cgit v1.2.3