From 6bc78ff2ae95bb52a25c760f725664631a5a30fd Mon Sep 17 00:00:00 2001
From: Eric Kooistra <kooistra@astron.nl>
Date: Tue, 10 Mar 2020 17:30:11 +0100
Subject: [PATCH] Added array_init() for boolean array.
---
libraries/base/common/src/vhdl/common_pkg.vhd | 10 ++++++++++
1 file changed, 10 insertions(+)
diff --git a/libraries/base/common/src/vhdl/common_pkg.vhd b/libraries/base/common/src/vhdl/common_pkg.vhd
index dbbea6568e..fe7d12376a 100644
--- a/libraries/base/common/src/vhdl/common_pkg.vhd
+++ b/libraries/base/common/src/vhdl/common_pkg.vhd
@@ -299,6 +299,7 @@ PACKAGE common_pkg IS
FUNCTION sel_n(sel : NATURAL; a, b, c, d, e, f, g, h, i, j : STRING) RETURN STRING; -- 10
FUNCTION array_init(init : STD_LOGIC; nof : NATURAL) RETURN STD_LOGIC_VECTOR; -- useful to init a unconstrained array of size 1
+ FUNCTION array_init(init : BOOLEAN; nof : NATURAL) RETURN t_nat_boolean_arr; -- useful to init a unconstrained array of size 1
FUNCTION array_init(init, nof : NATURAL) RETURN t_natural_arr; -- useful to init a unconstrained array of size 1
FUNCTION array_init(init, nof : NATURAL) RETURN t_nat_natural_arr; -- useful to init a unconstrained array of size 1
FUNCTION array_init(init, nof, incr : NATURAL) RETURN t_natural_arr; -- useful to init an array with incrementing numbers
@@ -1342,6 +1343,15 @@ PACKAGE BODY common_pkg IS
RETURN v_arr;
END;
+ FUNCTION array_init(init : BOOLEAN; nof : NATURAL) RETURN t_nat_boolean_arr IS
+ VARIABLE v_arr : t_nat_boolean_arr(0 TO nof-1);
+ BEGIN
+ FOR I IN v_arr'RANGE LOOP
+ v_arr(I) := init;
+ END LOOP;
+ RETURN v_arr;
+ END;
+
FUNCTION array_init(init, nof : NATURAL) RETURN t_natural_arr IS
VARIABLE v_arr : t_natural_arr(0 TO nof-1);
BEGIN
--
GitLab