1 files changed, 34 insertions, 0 deletions
diff --git a/testsuite/gna/issue476/repro2/pixel_column_pkg.vhd b/testsuite/gna/issue476/repro2/pixel_column_pkg.vhd
new file mode 100644
index 000000000..6583b6239
--- /dev/null
+++ b/testsuite/gna/issue476/repro2/pixel_column_pkg.vhd
@@ -0,0 +1,34 @@
+use work.pixel_pkg;
+
+package pixel_column_pkg is
+    generic(
+        NBITS                       : natural;
+        NBR_OF_CHROMA               : natural;
+        NBR_OF_ROW                  : natural;
+        package local_pixel_pkg is new pixel_pkg
+            generic map (<>)
+    );
+
+    use local_pixel_pkg.all;
+
+    type TYPE_PIXEL_COLUMN is array (NBR_OF_ROW-1 downto 0) of TYPE_PIXEL;
+
+    function bit_vector_to_pixel_column
+      (in_vector : in bit_vector(NBR_OF_ROW*NBR_OF_CHROMA*NBITS-1 downto 0))
+        return TYPE_PIXEL_COLUMN;
+
+end package pixel_column_pkg;
+
+package body pixel_column_pkg is
+
+    function bit_vector_to_pixel_column( in_vector : in bit_vector(NBR_OF_ROW*NBR_OF_CHROMA*NBITS-1 downto 0))
+    return TYPE_PIXEL_COLUMN is
+        variable pixel_column : TYPE_PIXEL_COLUMN; 
+    begin
+        for row in 0 to NBR_OF_ROW-1 loop
+            pixel_column(row) := bit_vector_to_pixel(in_vector((row+1)*NBR_OF_CHROMA*NBITS-1 downto row*NBR_OF_CHROMA*NBITS));
+        end loop;
+        return pixel_column;
+    end function bit_vector_to_pixel_column;
+end package body pixel_column_pkg;
+