testsuite/synth/issue2143/repro1.vhdl

   1 entity repro1 is
   2 end repro1;
   3
   4 architecture struct of repro1 is
   5         type entry_t is record
   6                 a : bit;
   7         end record;
   8
   9         type table_t is array (natural range<>, natural range<>) of entry_t;
  10
  11         function fun return table_t is
  12                 variable ret : table_t(0 to 7, 0 to 7);
  13         begin
  14                 return ret;
  15         end function;
  16
  17         constant entry : entry_t := fun(0, 0);
  18 begin
  19
  20 end architecture;