From 799878f2f33010fd2c9153efef7db6b4f6c7d4e4 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Mon, 30 Sep 2019 01:04:52 +0200
Subject: synth: handle conversion from slice to unbounded vector.

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

(limited to 'src')

diff --git a/src/synth/synth-values.adb b/src/synth/synth-values.adb
index a2c9f8623..7db1bfe99 100644
--- a/src/synth/synth-values.adb
+++ b/src/synth/synth-values.adb
@@ -311,6 +311,8 @@ package body Synth.Values is
             return Arr_Type.Arr_El;
          when Type_Unbounded_Array =>
             return Arr_Type.Uarr_El;
+         when Type_Unbounded_Vector =>
+            return Arr_Type.Uvec_El;
          when others =>
             raise Internal_Error;
       end case;
-- 
cgit v1.2.3