Browse Source

* allow assignment of empty dynarray to variant and empty vararray to dynarray.
+ test.

git-svn-id: trunk@7754 -

yury 18 years ago
parent
commit
8e45887e1b
2 changed files with 10 additions and 0 deletions
  1. 1 0
      .gitattributes
  2. 9 0
      tests/tbs/tb0537.pp

+ 1 - 0
.gitattributes

@@ -6327,6 +6327,7 @@ tests/tbs/tb0533.pp svneol=native#text/plain
 tests/tbs/tb0534.pp svneol=native#text/plain
 tests/tbs/tb0535.pp svneol=native#text/plain
 tests/tbs/tb0536.pp svneol=native#text/plain
+tests/tbs/tb0537.pp svneol=native#text/plain
 tests/tbs/ub0060.pp svneol=native#text/plain
 tests/tbs/ub0069.pp svneol=native#text/plain
 tests/tbs/ub0119.pp svneol=native#text/plain

+ 9 - 0
tests/tbs/tb0537.pp

@@ -0,0 +1,9 @@
+uses variants;
+
+var
+  d: array of variant;
+  v: variant;
+begin
+  v:=d;
+  d:=v;
+end.