blob: af19d38e3d409252a22e2d91f814e429f84c80ce (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
entity univ2 is
end entity;
architecture foo of univ2 is
begin
assert False
report "Time'HIGH = " & Time'IMAGE(Time'VAL(Time'POS(Time'HIGH)))
severity NOTE;
assert False
report "should produce 9223372036854775807"
severity NOTE;
end architecture;
-- 'POS returns universal integer
-- 'VAL parameter is any integer type (including universal integer)
|