testsuite/gna/issue1624/buggy.vhdl


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

entity buggy is
begin
end entity buggy;

architecture a of buggy is
begin

p: process
    variable v: real;
begin
    -- Remove the next line and GHDL does not crash
    v := real((now / (1 ns)) * 1.0e-9);
    wait;
end process;

end architecture a;