summaryrefslogtreecommitdiff
path: root/testsuite/vests/vhdl-93/clifton-labs/compliant/functional/objects/variable/simple-enumeration-assign.vhdl
blob: e324a398e9c87b8f3fa3aecf3478d137d45c4130 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
entity foo is
end foo;

use std.textio.all;

architecture only of foo is
begin  -- only
  process
    variable x : boolean := false;
  begin  -- process
    x := true;
    assert x = true report "TEST FAILED - x does not equal true" severity failure;
    assert x /= true report "TEST PASSED" severity note;
    wait;
  end process;
end only;