Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Extra tests of record assignment

  • Loading branch information...
commit 4bd301487ad46dcef743e6a1cedbb5395b835f10 1 parent 5cf3df0
@nickg authored
Showing with 6 additions and 0 deletions.
  1. +6 −0 test/regress/record1.vhd
View
6 test/regress/record1.vhd
@@ -7,6 +7,8 @@ architecture test of record1 is
x, y : integer;
end record;
+ constant k : r1 := (62, 75);
+
begin
process is
@@ -21,6 +23,10 @@ begin
assert (d.x = 99) and (d.y = 99);
a.x := 5;
assert a.x = 5;
+ a := b;
+ assert (a.x = 1) and (a.y = 2);
+ a := k;
+ assert (a.x = k.x) and (a.y = k.y);
wait;
end process;
Please sign in to comment.
Something went wrong with that request. Please try again.