testsuite/gna/issue810/repro.vhdl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17

entity repro is
end;

architecture behav of repro is
  type my_time is range -integer'low  to integer'high units
    fs;
    ps = 1000 fs;
    ns = 1000 ps;
    us = 1000 ns;
    ms = 1000 us;
    sec = 1000 ms;
    min = 60 sec;
    hr = 60 min;
  end units;
begin
end behav;