From 60077f4f060dea11929f91f8d88105039a4749b2 Mon Sep 17 00:00:00 2001
From: Maciej Suminski <maciej.suminski@cern.ch>
Date: Tue, 27 Jan 2015 16:30:56 +0100
Subject: [PATCH] vhdlpp: ExpBitstring elaborate_expr().

---
 vhdlpp/expression_elaborate.cc | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/vhdlpp/expression_elaborate.cc b/vhdlpp/expression_elaborate.cc
index 70fedaca4..b27deeff3 100644
--- a/vhdlpp/expression_elaborate.cc
+++ b/vhdlpp/expression_elaborate.cc
@@ -594,6 +594,10 @@ const VType*ExpBitstring::fit_type(Entity*, ScopeBase*, const VTypeArray*atype)
 int ExpBitstring::elaborate_expr(Entity*, ScopeBase*, const VType*)
 {
       int errors = 0;
+      std::vector<VTypeArray::range_t> range;
+      range.push_back(VTypeArray::range_t(new ExpInteger(value_.size() - 1), new ExpInteger(0)));
+      const VTypeArray*type = new VTypeArray(&primitive_STDLOGIC, range);
+      set_type(type);
       return errors;
 }