From 7eb71d12d9fc376926d1960457cdda7e0d54fcb4 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Mon, 30 Sep 2019 00:23:56 +0200
Subject: synth: refactoring of alias (allow alias of anything).

---
 src/synth/synth-decls.adb | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/synth/synth-decls.adb')

diff --git a/src/synth/synth-decls.adb b/src/synth/synth-decls.adb
index 57953ce9f..ba6d2d238 100644
--- a/src/synth/synth-decls.adb
+++ b/src/synth/synth-decls.adb
@@ -524,14 +524,14 @@ package body Synth.Decls is
          when Iir_Kind_Object_Alias_Declaration =>
             Synth_Declaration_Type (Syn_Inst, Decl);
             declare
-               Wid : Wire_Id;
+               Obj : Value_Acc;
                Off : Uns32;
                Typ : Type_Acc;
             begin
                Stmts.Synth_Assignment_Prefix (Syn_Inst, Get_Name (Decl),
-                                              Wid, Off, Typ);
+                                              Obj, Off, Typ);
                Create_Object (Syn_Inst, Decl,
-                              Create_Value_Alias (Wid, Off, Typ));
+                              Create_Value_Alias (Obj, Off, Typ));
             end;
          when Iir_Kind_Anonymous_Signal_Declaration =>
             Make_Object (Syn_Inst, Wire_Signal, Decl);
-- 
cgit v1.2.3